Hi all

Is it expected behavior that this program does not output "Destructor"?

#include "hbclass.ch"

static oMSCAL

function main()
    MSCALInit()
    //oMSCAL := nil
return nil

procedure MSCalInit()
    oMSCAL := HActiveX():New()
return

CLASS HActiveX
    METHOD New
    DESTRUCTOR Dtor
ENDCLASS

METHOD New() CLASS HActiveX
return self

PROCEDURE Dtor() CLASS HActiveX
    ? "Destructor"
RETURN

If I set oMSCAL to nil it does work of course.

Regards
Alex
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to