diff options
author | Naren Ratan <narenratan@gmail.com> | 2019-12-11 22:15:15 +0000 |
---|---|---|
committer | Naren Ratan <narenratan@gmail.com> | 2019-12-11 22:15:15 +0000 |
commit | 40eb87453e3b248610d375eaefb07bf367224201 (patch) | |
tree | 2a8285e97780f82b49066b48b2d6a0079516377d | |
parent | b31dcba4ea3314343aece10e794ca12df94c78b1 (diff) | |
download | jonesforth_arm64_apl-40eb87453e3b248610d375eaefb07bf367224201.tar.gz |
Fix (( ))
-rw-r--r-- | jonesforth.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/jonesforth.f b/jonesforth.f index 18c3500..ce9449a 100644 --- a/jonesforth.f +++ b/jonesforth.f @@ -36,8 +36,8 @@ : ∥) I ' BNZ , H - , ; / ( A ∥) does A until false / : 1∥) I ' BR , H - , ; / ( A 1∥) does A indefinitely / -: (( I ' n! , [COMP] ( ; / n (( A )) does A n times / -: )) I ' n- , ' n , [COMP] ∥) ; +: (( I ' n! , [COMP] ( ' n , [COMP] ∥ ; / n (( A )) does A n times / +: )) I ' n- , [COMP] ) ; : ∇ I S { [COMP] ; | : } ; / ∇ starts and ends definitions / |