aboutsummaryrefslogtreecommitdiff
path: root/frontend
diff options
context:
space:
mode:
Diffstat (limited to 'frontend')
-rw-r--r--frontend/typesupport.icl12
1 files changed, 6 insertions, 6 deletions
diff --git a/frontend/typesupport.icl b/frontend/typesupport.icl
index 53601e9..3034302 100644
--- a/frontend/typesupport.icl
+++ b/frontend/typesupport.icl
@@ -1225,12 +1225,12 @@ where
where
is_predefined {glob_module} = glob_module == cPredefinedModuleIndex
- is_list {id_name} = id_name == "_list"
- is_tuple {id_name} tup_arity = id_name == "_tuple" +++ toString tup_arity
- is_lazy_array {id_name} = id_name == "_array"
- is_strict_array {id_name} = id_name == "_!array"
- is_unboxed_array {id_name} = id_name == "_#array"
- is_string_type {id_name} = id_name == "_string"
+ is_list {id_name} = id_name == "_List"
+ is_tuple {id_name} tup_arity = id_name == "_Tuple" +++ toString tup_arity
+ is_lazy_array {id_name} = id_name == "_Array"
+ is_strict_array {id_name} = id_name == "_!Array"
+ is_unboxed_array {id_name} = id_name == "_#Array"
+ is_string_type {id_name} = id_name == "_String"
writeType file opt_beautifulizer (form, arg_type --> res_type)
| checkProperty form cBrackets