home *** CD-ROM | disk | FTP | other *** search
- \ Balraj Sidhu Set: 14D4
- \ Comp 462 - Forth
- \ Date: April 16, 1990
- \ Problem 4.16
-
-
- create data 20 allot
-
- : clear-dataf ( -- )
- data 20 0 fill ;
-
- : clear-datae ( -- )
- data 20 erase ;
-
- COMMENT:
-
- In the above words the clear-dataf (using fill) is faster then
- clear-datae (using erase). This is because the word erase calls the word
- fill with a 0 for the fill operation.
-
- COMMENT;
-
-
-
-
-
-
-