15 lines
222 B
Text
15 lines
222 B
Text
`Swap Syns &\a &\b'
|
|
{
|
|
new \temp
|
|
\temp = "\.word2."
|
|
\.word2. = "\.word3."
|
|
\.word3. = "\temp"
|
|
delete \temp
|
|
}
|
|
|
|
\quux = "one"
|
|
\xyzzy = "two"
|
|
Swap Syns &\quux &\xyzzy
|
|
|
|
show "\quux \xyzzy"
|
|
# prints "two one"
|