aboutsummaryrefslogtreecommitdiff
path: root/frontend
diff options
context:
space:
mode:
Diffstat (limited to 'frontend')
-rw-r--r--frontend/overloading.dcl4
-rw-r--r--frontend/overloading.icl4
2 files changed, 4 insertions, 4 deletions
diff --git a/frontend/overloading.dcl b/frontend/overloading.dcl
index 2d29e6c..9bcec75 100644
--- a/frontend/overloading.dcl
+++ b/frontend/overloading.dcl
@@ -24,7 +24,7 @@ import syntax, check, typesupport
, si_tail_strict_list_instances :: ![ArrayInstance]
, si_next_TC_member_index :: !Index
, si_TC_instances :: ![GlobalTCInstance]
- , si_type_constructors_in_patterns :: ![!Index]
+ , si_type_constructors_in_patterns :: ![Index]
}
:: OverloadingState =
@@ -48,7 +48,7 @@ tryToSolveOverloading :: ![(Optional [TypeContext], [ExprInfoPtr], IdentPos, Ind
, tci_instances :: ![GlobalTCInstance]
, tci_type_var_heap :: !.TypeVarHeap
, tci_dcl_modules :: !{# DclModule}
- , tci_type_constructors_in_patterns :: ![!Index]
+ , tci_type_constructors_in_patterns :: ![Index]
}
removeOverloadedFunctions :: ![Index] ![LocalTypePatternVariable] !Int !*{#FunDef} !*{! FunctionType} !*ExpressionHeap
diff --git a/frontend/overloading.icl b/frontend/overloading.icl
index afb4230..1e6f6c9 100644
--- a/frontend/overloading.icl
+++ b/frontend/overloading.icl
@@ -50,7 +50,7 @@ import genericsupport, compilerSwitches, type_io_common
, si_tail_strict_list_instances :: ![ArrayInstance]
, si_next_TC_member_index :: !Index
, si_TC_instances :: ![GlobalTCInstance]
- , si_type_constructors_in_patterns :: ![!Index]
+ , si_type_constructors_in_patterns :: ![Index]
}
:: LocalTypePatternVariable =
@@ -1297,7 +1297,7 @@ getTCDictionary symb_name var_info_ptr (var_heap, error)
, tci_instances :: ![GlobalTCInstance]
, tci_type_var_heap :: !.TypeVarHeap
, tci_dcl_modules :: !{# DclModule}
- , tci_type_constructors_in_patterns :: ![!Index]
+ , tci_type_constructors_in_patterns :: ![Index]
}
class toTypeCodeExpression type :: !Ident type !(!*TypeCodeInfo,!*VarHeap,!*ErrorAdmin) -> (!TypeCodeExpression, !(!*TypeCodeInfo,!*VarHeap,!*ErrorAdmin))