10 lines
185 B
Smalltalk
10 lines
185 B
Smalltalk
|
$ stx --repl
|
||
|
|
Welcome...
|
||
|
|
|
||
|
|
STX> |concat|\
|
||
|
|
concat := [ :a :b :c | (a,c,c,b) displayNl ].\
|
||
|
|
concat value: 'Rosetta' value: 'Code' value: ':'.
|
||
|
|
Rosetta::Code
|
||
|
|
-> (Answer): 'Rosetta::Code'
|
||
|
|
STX>
|