Du kan inte välja fler än 25 ämnen
Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.
|
- : BLK! ( -- )
- BLK> @ BLK!* @ EXECUTE
- 0 BLKDTY !
- ;
- : FLUSH BLKDTY @ IF BLK! THEN ;
- : BLK@ ( n -- )
- DUP BLK> @ = IF DROP EXIT THEN
- FLUSH DUP BLK> ! BLK@* @ EXECUTE ;
-
- : BLK!! 1 BLKDTY ! ;
|