fork download
  1. \ 1. Definizione della stringa
  2. : HELLO$ \ -- caddr
  3. C" Hello there " ;
  4.  
  5. \ 2. Definizione della parola di test che esegue tutte le stampe
  6. : TEST
  7. HELLO$ COUNT TYPE
  8. C" \n" \ Stampa un ritorno a capo esplicito per chiarezza
  9. HELLO$ 3 + C@ EMIT
  10. HELLO$ 4 + 4 TYPE
  11. ;
  12.  
  13. \ 3. Esecuzione della parola di test
  14. TEST
  15.  
Success #stdin #stdout 0.01s 5292KB
stdin
Standard input is empty
stdout
Hello there llo t