diff options
Diffstat (limited to 'frontend/overloading.icl')
| -rw-r--r-- | frontend/overloading.icl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/frontend/overloading.icl b/frontend/overloading.icl index a0f9947..ec04b37 100644 --- a/frontend/overloading.icl +++ b/frontend/overloading.icl @@ -1408,9 +1408,9 @@ where | isEmpty uni_vars = (DynamicExpr { dyn & dyn_expr = dyn_expr, dyn_type_code = type_code }, ui) = (DynamicExpr { dyn & dyn_expr = dyn_expr, dyn_type_code = TCE_UniType uni_vars type_code }, ui) - updateExpression group_index (MatchExpr opt_tuple cons_symbol expr) ui + updateExpression group_index (MatchExpr cons_symbol expr) ui # (expr, ui) = updateExpression group_index expr ui - = (MatchExpr opt_tuple cons_symbol expr, ui) + = (MatchExpr cons_symbol expr, ui) updateExpression group_index (TupleSelect symbol argn_nr expr) ui # (expr, ui) = updateExpression group_index expr ui = (TupleSelect symbol argn_nr expr, ui) |