fork download
copy 
  1. : COMPOSE
  2.     >R >R
  3.     :NONAME
  4.     R> COMPILE, R> COMPILE,
  5.     POSTPONE ;
  6. ;
  7.  
  8. 5 10 ' + ' 2* COMPOSE EXECUTE .
Success #stdin #stdout 0s 22520KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
30
https://ideone.com/Nv1RTy
language:
Forth (gforth 0.7.3)
created:
7 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!