fork download
copy 
  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. iota [ dup loop ] each
Runtime error #stdin #stdout 1.33s 165056KB
comments (?)
stdin
copy 
30
stdout
copy 
Hello, World
0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 Quotation's stack effect does not match call site
quot      [ "Hello, World" print readln string>number iota ~quotation~...
call-site (( -- ))
https://ideone.com/Ngnk7
language:
Factor (factor-0.93)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!