fork download
  1. "Teste rápido de Sintaxe GST"
  2. | lista |
  3. lista := #(10 20 30 40 50).
  4. Transcript show: 'A soma é: '; show: (lista inject: 0 into: [:sum :each | sum + each]) printString; cr.
  5.  
  6. 5 timesRepeat: [ 'Smalltalk funciona!' printNl ].
Success #stdin #stdout 0.01s 7964KB
stdin
Standard input is empty
stdout
A soma é: 150
'Smalltalk funciona!'
'Smalltalk funciona!'
'Smalltalk funciona!'
'Smalltalk funciona!'
'Smalltalk funciona!'