Mindaugas,
oB:aaa := NIL is much more clean solution than ASIZE(oB, 0)
Yes, but ...
? "Test3"
oB := BBB(); oC := BBB()
oB:aaa := oC; oC:aaa := oB
// ASize(oB, 0); ASize(oC, 0)
oB := nil; oC := nil
HB_GCALL()
Wait
With .-
METHOD Destroy() CLASS BBB
? "bbb destructor", ValType( ::aaa )
RETURN NIL
The code prints .-
--------------------------------
Test3
bbb destructor O
bbb destructor A
Press any key to continue...
--------------------------------
OOOps... Is there AAAnything strange? ;)
--
Xavi
Mindaugas Kavaliauskas escribió:
Hi,
Xavi wrote:
oB:aaa := ALLOCAAA(oC); oC:aaa := ALLOCAAA(oB) // If you remarque
this line,
// oB:aaa := oC; oC:aaa := oB // please, remove this remarque,
ASize(oB, 0); ASize(oC, 0) // remarque this line.
oB := nil; oC := nil
HB_GCALL()
Wait
...
oB:aaa := NIL is much more clean solution than ASIZE(oB, 0)
Regards,
Mindaugas
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
