fork download
  1. USING: io kernel math math.parser formatting sequences prettyprint io.streams.byte-array io.streams.sequence ;
  2. IN: template
  3. :sq(x--y)
  4. dup*;
  5.  
  6. readln string>number
  7. (scratchpad)6 sq
  8.  
  9.  
  10.  
  11. number>string print
Runtime error #stdin #stdout 1.31s 165056KB
stdin
4
stdout
./prog.factor

3: :sq(x--y)
            ^
No word named “:sq(x--y)” found in current vocabulary search path