; 'hello' shows you The Message.

define

hello

[

"Hello, "

swap

string-append

"!

"

string-append

print

]

; All hail The Message.

"World"

hello

; Use the magic word 'upquote' to peek into the future of the program.

define

hello-forwards

[

upquote

hello

]

; It's actually not magic, sorry.

; 'upquote' is a combination of 'quote' (from Lisp) and 'uplevel' (from Tcl).

hello-forwards

"friends"

; 'quote' takes the next piece of source code and puts it on the data stack.

; 'uplevel' lets you mess with the call stack.

define

greetings

[

quote

hello-forwards

uplevel

]

greetings

"human"