Author: | Sean Chapel |
---|---|
Mode: | factor |
Date: | Sat, 18 Apr 2009 03:13:57 |
: user-get ( int -- user ) userid>filename utf8 file-lines concat json> ! get data values reverse [ ] each ! turn data into strings <user> ; In word: user-get Unbalanced branches: [ iterate-step iterate-next (each-integer) ] ( -- object ) [ 3drop ] ( -- )