diff options
Diffstat (limited to 'frontend/frontend.icl')
-rw-r--r-- | frontend/frontend.icl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/frontend/frontend.icl b/frontend/frontend.icl index 2786862..267d59b 100644 --- a/frontend/frontend.icl +++ b/frontend/frontend.icl @@ -16,7 +16,7 @@ import RWSDebug // trace macro (-*->) infixl (-*->) value trace - :== value // ---> trace + :== value ---> trace frontEndInterface :: !Ident !SearchPaths !*PredefinedSymbols !*HashTable !*Files !*File !*File !*File -> (!*PredefinedSymbols, !*HashTable, !*Files, !*File, !*File, !*File, !Optional *FrontEndSyntaxTree) frontEndInterface mod_ident search_paths predef_symbols hash_table files error io out @@ -41,8 +41,8 @@ frontEndInterface mod_ident search_paths predef_symbols hash_table files error i | not ok = (predef_symbols, hash_table, files, error, io, out, No) - # (components, fun_defs) = partitionateFunctions (fun_defs -*-> "partitionateFunctions") [ { ir_from = 0, ir_to = nr_of_global_funs }, icl_instances, icl_specials] -// (components, fun_defs, io) = showTypes components 0 fun_defs io + # (components, fun_defs) = partitionateFunctions (fun_defs -*-> "partitionateFunctions") [ { ir_from = 0, ir_to = nr_of_global_funs }, icl_instances, icl_specials] + (components, fun_defs, io) = showTypes components 0 fun_defs io // (components, fun_defs, out) = showComponents components 0 True fun_defs out |