class Foo
public
sub Foo()
print "コンストラクタ"
endsub
sub ~Foo()
print "デストラクタ"
endsub
endclass
dim pobj as *Foo
dim size=10 as long
dim i as long
pobj = malloc(sizeof(Foo)*size)
for i=0 to ELM(size)
pobj.Foo()
next
for i=0 to ELM(size)
pobj.~Foo()'文法が間違っています
next
free(pobj)
class Foo
> public
> sub Foo()
> print "コンストラクタ"
> endsub
> sub ~Foo()
> print "デストラクタ"
> endsub
> endclass
>
> dim pobj as *Foo
> dim size=10 as long
> dim i as long
>
> pobj = malloc(sizeof(Foo)*size)
> for i=0 to ELM(size)
> pobj.Foo()
> next
>
> for i=0 to ELM(size)
> pobj.~Foo()'文法が間違っています
> next
> free(pobj)
class Foo
public
sub Foo()
print "コンストラクタ"
endsub
sub ~Foo()
print "デストラクタ"
endsub
endclass
dim pobj as *Foo
dim size=10 as long
dim i as long
pobj = new [size] Foo
for i=0 to ELM(size)
pobj.Foo()
next
delete pobj
#console
class Foo
public
sub Foo()
print "コンストラクタ"
endsub
sub ~Foo()
print "デストラクタ"
endsub
endclass
dim pobj as *Foo
dim size=10 as long
dim i as long
pobj = new [size] Foo
for i=0 to ELM(size)
pobj.Foo()
next
pobj.~Foo() 'デストラクタで文法エラー
delete pobj