Changeset 180 for trunk/thune/mkboot.t

Show
Ignore:
Timestamp:
06/10/06 03:12:25 (3 years ago)
Author:
krobillard
Message:

Thune - Added 'each function.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • trunk/thune/mkboot.t

    r178 r180  
    6767proc :loop   ;(block count -- ) 
    6868 
     69[body] 
     70[ 
     71  [first body do] iter 
     72] func :each     ;(ser body -- ) 
     73 
    6974[| body words len-1] 
    7075[