aboutsummaryrefslogtreecommitdiff
path: root/frontend/postparse.icl
diff options
context:
space:
mode:
authorjohnvg2010-07-02 14:25:22 +0000
committerjohnvg2010-07-02 14:25:22 +0000
commit38098c81804942ff27f3c47e5d7920ad8655e517 (patch)
tree4bdf689df4f7435265978067bed6ee9edff9b494 /frontend/postparse.icl
parentremove use of icl_functions by call of checkExplicitImportCompleteness (diff)
pass Ident name instead of Ident to functions to create generic idents
in genericsupport git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1790 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/postparse.icl')
-rw-r--r--frontend/postparse.icl2
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/postparse.icl b/frontend/postparse.icl
index 4eb6a1d..29b3a03 100644
--- a/frontend/postparse.icl
+++ b/frontend/postparse.icl
@@ -1440,7 +1440,7 @@ reorganiseDefinitions icl_module [PD_GenericCase gc : defs] cons_count sel_count
, pb_position = gc.gc_pos
}
#! bodies = [body : bodies ]
- #! fun_name = genericIdentToFunIdent gc.gc_ident gc.gc_type_cons
+ #! fun_name = genericIdentToFunIdent gc.gc_ident.id_name gc.gc_type_cons
#! fun = MakeNewImpOrDefFunction fun_name gc.gc_arity bodies (FK_Function cNameNotLocationDependent) NoPrio No gc.gc_pos
#! inst = { gc & gc_body = GCB_FunDef fun }
#! c_defs = {c_defs & def_generic_cases = [inst : c_defs.def_generic_cases]}