[dimanche13]

SuperStrict

Type A
	Field test%
End Type

Global t1:A = New A
Global t2:A = Null 'error

While Not KeyHit(key_ESCAPE)
	t1.test = 1
	t2.test = 2
	Print GCMemAlloced()
Wend

End

С дебагом не компилится, а без дебага ничего не вешает.