14 lines
237 B
Text
14 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
|