Paste: scratch

Author: j
Mode: factor
Date: Mon, 19 Sep 2011 01:10:35
Plain Text |
IN: scratch
: mseq ( quot -- seq ) { } make ; inline

: foo ( -- x ) [ 1 2 + , 3 4 + , ] mseq ;

[ 1 2 + , 3 4 + , ] mseq .
foo .

New Annotation

Summary:
Author:
Mode:
Body: