"Teste rápido de Sintaxe GST"
| lista |
lista := #(10 20 30 40 50).
Transcript show: 'A soma é: '; show: (lista inject: 0 into: [:sum :each | sum + each]) printString; cr.
5 timesRepeat: [ 'Smalltalk funciona!' printNl ].
IlRlc3RlIHLDoXBpZG8gZGUgU2ludGF4ZSBHU1QiCnwgbGlzdGEgfApsaXN0YSA6PSAjKDEwIDIwIDMwIDQwIDUwKS4KVHJhbnNjcmlwdCBzaG93OiAnQSBzb21hIMOpOiAnOyBzaG93OiAobGlzdGEgaW5qZWN0OiAwIGludG86IFs6c3VtIDplYWNoIHwgc3VtICsgZWFjaF0pIHByaW50U3RyaW5nOyBjci4KCjUgdGltZXNSZXBlYXQ6IFsgJ1NtYWxsdGFsayBmdW5jaW9uYSEnIHByaW50TmwgXS4=