15 lines
227 B
Smalltalk
15 lines
227 B
Smalltalk
[
|
|
Transcript showCR:'boring stuff'.
|
|
] loop
|
|
|
|
[true] whileTrue:[
|
|
Transcript showCR:'also borinh'.
|
|
]
|
|
|
|
[
|
|
Transcript showCR:'poor cpu'.
|
|
] doUntil:[false]
|
|
|
|
[
|
|
Transcript showCR:'please press CTRL-c!'.
|
|
] doWhile:[true]
|