| version 1.67, Tue Mar 4 17:49:55 1997 UTC | version 1.68, Tue Mar 11 16:00:41 1997 UTC | ||
|---|---|---|---|
|
|
||
| : | : | ||
| rp@ cell+ cell+ cell+ @ ; | rp@ cell+ cell+ cell+ @ ; | ||
| k -- n gforth | |||
| n = rp[4]; | |||
| : | |||
| rp@ [ 5 cells ] Literal + @ ; | |||
| \ digit is high-level: 0/0% | \ digit is high-level: 0/0% | ||
| move c_from c_to ucount -- core | move c_from c_to ucount -- core |
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |