aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormartinw2000-05-17 14:04:37 +0000
committermartinw2000-05-17 14:04:37 +0000
commit4c5752008b03b4c22783f4d2ef150be42930b47f (patch)
tree69c1dfccae605cd8e3b428bdfe26b163bbc3b9c3
parentbugfix (diff)
accepting changes
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@140 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
-rw-r--r--frontend/transform.icl2
1 files changed, 0 insertions, 2 deletions
diff --git a/frontend/transform.icl b/frontend/transform.icl
index 32a3a26..d6a34d9 100644
--- a/frontend/transform.icl
+++ b/frontend/transform.icl
@@ -1303,11 +1303,9 @@ where
collectVariables (MatchExpr opt_tuple cons_symb expr) free_vars cos
# (expr, free_vars, cos) = collectVariables expr free_vars cos
= (MatchExpr opt_tuple cons_symb expr, free_vars, cos)
-// MV ..
collectVariables (DynamicExpr dynamic_expr=:{dyn_expr}) free_vars cos
#! (dyn_expr, free_vars, cos) = collectVariables dyn_expr free_vars cos
= (DynamicExpr {dynamic_expr & dyn_expr = dyn_expr}, free_vars, cos);
-// .. MV
collectVariables expr free_vars cos
= (expr, free_vars, cos)