RosettaCodeData/Task/Closures-Value-capture/Oforth/closures-value-capture.oforth
2016-12-05 23:44:36 +01:00

2 lines
69 B
Text

: newClosure(i) #[ i sq ] ;
10 seq map(#newClosure) at(7) perform .