11 lines
210 B
Text
11 lines
210 B
Text
|
' person.bi file
|
||
|
|
Type Person
|
||
|
|
name As String
|
||
|
|
age As UInteger
|
||
|
|
Declare Operator Cast() As String
|
||
|
|
End Type
|
||
|
|
|
||
|
|
Operator Person.Cast() As String
|
||
|
|
Return "[" + This.name + ", " + Str(This.age) + "]"
|
||
|
|
End Operator
|