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.   iota "%d " printf
  6. ;
  7. readln string>number
  8. iota [ dup loop ] each
Runtime error #stdin #stdout 1.3s 165056KB
comments (?)
stdin 
30
stdout 
Hello, World
The word loop cannot be executed because it failed to compile

Stack effect declaration is wrong
inferred (( x x -- ))
declared (( i -- ))
https://ideone.com/akgMe
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!