15 lines
237 B
Text
15 lines
237 B
Text
|
Type Example
|
||
|
|
foo As Integer Ptr
|
||
|
|
Declare Constructor (x As Integer)
|
||
|
|
End Type
|
||
|
|
|
||
|
|
Constructor Example(x As Integer)
|
||
|
|
This.foo = New Integer
|
||
|
|
*This.foo = 42 + x
|
||
|
|
End Constructor
|
||
|
|
|
||
|
|
Dim As Example result = 5
|
||
|
|
Print *result.foo
|
||
|
|
|
||
|
|
Sleep
|