diff options
Diffstat (limited to 'slof/engine.in')
-rw-r--r-- | slof/engine.in | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/slof/engine.in b/slof/engine.in index 3ab62da..2799c1e 100644 --- a/slof/engine.in +++ b/slof/engine.in @@ -102,7 +102,7 @@ col(-ROLL DUP ?DUP 0BRANCH(9) >R ROT R> SWAP >R 1 - BRANCH(-12) ?DUP 0BRANCH(6) col(2>R R> ROT >R SWAP >R >R) col(2R> R> R> R> ROT >R SWAP) col(2R@ R> R> R@ OVER >R ROT >R SWAP) - +cod(?PICK) // Arithmetic. col(2* 1 LSHIFT) @@ -135,7 +135,6 @@ col(U>= U< 0=) col(WITHIN ROT DUP ROT >= 0BRANCH(3) 2DROP FALSE EXIT > 0BRANCH(2) FALSE EXIT TRUE) col(BETWEEN 1 + WITHIN) - // Double-cell single-bit shifts. col(D2* 2* OVER 0< - >R 2* R>) col(UD2/ >R U2/ R@ LIT(8*CELLSIZE-1) LSHIFT OR R> U2/) |