diff options
author | Eduardo Julian | 2019-05-28 18:48:01 -0400 |
---|---|---|
committer | Eduardo Julian | 2019-05-28 18:48:01 -0400 |
commit | 926c3e1dcc392dc21b77a93200fa3e01eb113cf2 (patch) | |
tree | 72a57dde416f7d263514190950a6686714008dee /stdlib/source/lux/tool/compiler/phase/generation/js/case.lux | |
parent | a420abd8ef1d5a008a5a0b6f75590cab2a9baac5 (diff) |
Applied several tweaks to make the code easier to process by the new compiler.
Diffstat (limited to 'stdlib/source/lux/tool/compiler/phase/generation/js/case.lux')
-rw-r--r-- | stdlib/source/lux/tool/compiler/phase/generation/js/case.lux | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/js/case.lux b/stdlib/source/lux/tool/compiler/phase/generation/js/case.lux index edfa2d038..e1182c4b5 100644 --- a/stdlib/source/lux/tool/compiler/phase/generation/js/case.lux +++ b/stdlib/source/lux/tool/compiler/phase/generation/js/case.lux @@ -100,8 +100,6 @@ (def: fail-pm! _.break) -(exception: #export unrecognized-path) - (def: (multi-pop-cursor! pops) (-> Nat Statement) (.let [popsJS (_.i32 (.int pops))] @@ -200,10 +198,7 @@ right! (pattern-matching' generate rightP)] (wrap (<combinator> left! right!)))) ([/////synthesis.path/seq _.then] - [/////synthesis.path/alt alternation]) - - _ - (////.throw unrecognized-path []))) + [/////synthesis.path/alt alternation]))) (def: (pattern-matching generate pathP) (-> Phase Path (Operation Statement)) |