11 lines
175 B
Text
11 lines
175 B
Text
|
define :person [
|
||
|
|
init: constructor [name surname]
|
||
|
|
|
||
|
|
sayHello: method [][
|
||
|
|
print ["Hello" \name "!"]
|
||
|
|
]
|
||
|
|
]
|
||
|
|
|
||
|
|
p: to :person ["John" "Doe"]!
|
||
|
|
print.lines methods p
|