2012-01-31 20:04 UTC+0100 Viktor Szakats (harbour syenar.net)

* src/rdd/usrrdd/rdds/arrayrdd.prg
  * contrib/gtwvg/wvgax.prg
  * contrib/hbwin/tests/testgdi.prg
  * contrib/hbgd/tests/test_out.prg
  * contrib/hbtip/tests/loadhtml.prg
  * contrib/hbide/ideactions.prg
  * tests/parseini.prg
  * examples/httpsrv/cgifunc.prg
  * examples/httpsrv/modules/tableservletdb.prg
  * examples/httpsrv/session.prg
    * HB_HASH() -> { => }

harbour/examples/httpsrv/cgifunc.prg

@@ -63,7 +63,7 @@
 MEMVAR _SERVER, _GET, _POST, _COOKIE, _REQUEST, _HTTP_REQUEST
 
 FUNCTION uhttpd_GetVars( cFields, cSeparator )
-   LOCAL hHashVars := hb_Hash()
+   LOCAL hHashVars := { => }
    LOCAL aField, cField, aFields
    LOCAL cName, xValue
    DEFAULT cSeparator TO "&"
@@ -130,7 +130,7 @@ FUNCTION uhttpd_GetVars( cFields, cSeparator )
 
 */
 FUNCTION uhttpd_SplitUrl( cUrl )
-   LOCAL hUrl := hb_Hash()
+   LOCAL hUrl := { => }
    LOCAL nPos, cTemp, cUserNamePassword, cHostnamePort
    LOCAL cProto, cHost, cPort, nPort, cUser, cPass, cPath, cQuery, cFragment
    LOCAL cUri

harbour/examples/httpsrv/modules/tableservletdb.prg

@@ -71,7 +71,7 @@ FUNCTION HRBMAIN()
 
    hGets := _REQUEST
 
-   DEFAULT hGets TO hb_Hash()
+   DEFAULT hGets TO { => }
 
    IF HB_HHasKey( hGets, "page" )
 
@@ -186,7 +186,7 @@ METHOD Read() CLASS TableManager
       //n := 0
       DO WHILE table->( !Eof() ) //.AND. ++n < 50
 
-         hMap := hb_Hash()
+         hMap := { => }
          hMap[ "recno"   ] := StrZero( table->( RecNo() ), 4 )
          hMap[ "name"    ] := RTrim( table->first ) + " " + RTrim( table->last )
          hMap[ "address" ] := RTrim( table->street )

harbour/examples/httpsrv/session.prg

@@ -674,7 +674,7 @@ METHOD SessionDestroy( cID ) CLASS uhttpd_Session
   //TraceLog( "SessionDestroy() - cID", cID )
   DEFAULT cID TO ::cSID
 
-  _SESSION := hb_Hash()
+  _SESSION := { => }
   ::oCookie:DeleteCookie( ::cName )
 
   //TraceLog( "SessionDestroy() - cID, oCGI:h_Session", cID, DumpValue( oCGI:h_Session ) )