fork download
  1. USING: kernel sequences locals io formatting strings math math.functions math.parser ;
  2. IN: main
  3. "Hello, World" print
  4. :: loop ( i -- )
  5. i "%d " printf
  6. ;
  7. readln string>number
  8. 10 iota [ dup loop ] each
Runtime error #stdin #stdout 1.34s 165056KB
stdin
30
stdout
Hello, World
0 1 2 3 4 5 6 7 8 9 Quotation's stack effect does not match call site
quot      [ "Hello, World" print readln string>number 10 iota ~quotation~...
call-site (( -- ))