diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-01-29 21:05:57 -0500 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-01-29 21:05:57 -0500 |
| commit | b5640364a736cc559508d980feb91f3d93ce662f (patch) | |
| tree | 7cf510a7f08f9dd229bd40948baa2305774ab546 /test/cases/bytecode.bqn | |
| parent | f9a18e8b0ee57eee32ea526de9897c1cc30bb8e0 (diff) | |
If that last one passes then probably your scoping is good
Diffstat (limited to 'test/cases/bytecode.bqn')
| -rw-r--r-- | test/cases/bytecode.bqn | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test/cases/bytecode.bqn b/test/cases/bytecode.bqn index 70c71b7e..0cf0860a 100644 --- a/test/cases/bytecode.bqn +++ b/test/cases/bytecode.bqn @@ -26,3 +26,12 @@ 2 % ({aβ©2βπ©}{π©βa}{aβ©3βπ©})aβ4 # ordering 8 % aβ3βa{π©}β©8βa # 13 SETM 4 % aβΏbβ2βΏ1βaβΏb{π©βΏπ¨}β©4βa # lists + +# Further tests for lexical scoping +1 % aβ1β{aβ2}βa +2 % aβ1β{aβ©2}βa +6 % fβΏgβ{aβ2β{aβ©π©}βΏ{π©βa}}βF 6βG 0 +5 % Lβ{π©{ππ}}β{ππ€}L L L 5 +3 % _lβ{π©{ππ} π½}β{ππ€} {π©}_l 3 _l 5 +1 % 1{π¨}{π½{π©π½π¨}πΎπ½}{π©}0 # 0β 1 via Church booleans +2 % 0βΏ(0βΏ{π©}){{aβΏbβπ©βtβπ€β{π€βTβ©{π€β{aβΏbβπ©βa}}}{Bπ}0β(T b){aβΏbβπ©βπ½b}}π} 0βΏ(1βΏ(2βΏ(3βΏ(4βΏ{π©})))) |
