aboutsummaryrefslogtreecommitdiff
path: root/frontend/mergecases.icl
diff options
context:
space:
mode:
Diffstat (limited to 'frontend/mergecases.icl')
-rw-r--r--frontend/mergecases.icl4
1 files changed, 2 insertions, 2 deletions
diff --git a/frontend/mergecases.icl b/frontend/mergecases.icl
index 452c002..193a933 100644
--- a/frontend/mergecases.icl
+++ b/frontend/mergecases.icl
@@ -120,10 +120,10 @@ where
-> (Yes cees, var_heap, symbol_heap)
No
-*/
+
-> (No, var_heap, symbol_heap)
_
- -> (No, var_heap, symbol_heap)
+*/ -> (No, var_heap, symbol_heap)
| otherwise
= (No, var_heap, symbol_heap)
split_case split_var_info_ptr (Let lad=:{let_expr,let_strict_binds,let_lazy_binds}) var_heap symbol_heap