Author: | jedahu |
---|---|
Mode: | factor |
Date: | Tue, 25 Nov 2008 04:43:30 |
USING: hashtables kernel math ; IN: foo TUPLE: abc a b c ; : <abc> ( -- abc ) 3 [ H{ } clone ] times abc boa ; ! ( scratchpad ) "foo.factor" run-file ! Loading foo.factor ! :errors - print 1 semantic errors. ! ( scratchpad ) :errors ! While compiling <abc>: ! In word: <abc> ! Unbalanced branches: ! [ iterate-step iterate-next (each-integer) ] ( -- object ) ! [ 3drop ] ( -- )