13 lines
256 B
Text
13 lines
256 B
Text
(tagbody
|
|
beginning
|
|
(put-line "I am in the beginning")
|
|
(usleep 1000000)
|
|
(go end)
|
|
middle
|
|
(put-line "I am in the middle")
|
|
(usleep 1000000)
|
|
(go beginning)
|
|
end
|
|
(put-line "I am in the end")
|
|
(usleep 1000000)
|
|
(go middle))
|