Paste: hello world + stdout ?

#! ./factor

USING: io accessors ;
IN: hello

: hello-world ( -- )
  "hello one" write ;

MAIN: hello-world

Annotation: output test

USING: io io.files io.encodings.utf8 namespaces prettyprint ;
IN: hello2

SYMBOL: output-tmp

: main ( -- )
  output-stream get output-tmp set
  "data.txt" utf8 <file-writer> [ output-tmp get . ] with-output-stream ;

MAIN: main

New Annotation