mercurylang/mercury
1
0
Fork 0
mirror of https://github.com/Mercury-Language/mercury.git synced 2025-12-13 21:04:00 +00:00
Code Issues Projects Releases Wiki Activity

Invoke the new module

Browse Source 
Invoke the new module
This commit is contained in:
Zoltan Somogyi
2018-10-25 23:09:19 +11:00
parent 70240c064a
commit d3e3ea9245
2 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/mercury_compile_front_end.m
View File

@@ -91,6 +91,7 @@
:- import_module check_hlds.oisu_check.
:- import_module check_hlds.polymorphism.
:- import_module check_hlds.post_typecheck.
:- import_module check_hlds.pre_typecheck.
:- import_module check_hlds.purity.
:- import_module check_hlds.simplify.
:- import_module check_hlds.simplify.simplify_proc.
@@ -250,6 +251,7 @@ frontend_pass_after_typeclass_check(OpModeAugment, FoundUndefModeError,
ExceededTypeCheckIterationLimit = no
;
TypeCheckConstraints = no,
prepare_for_typecheck_module(!HLDS),
typecheck_module(!HLDS, TypeCheckSpecs, FoundSyntaxError,
ExceededTypeCheckIterationLimit)
),

4
compiler/pre_typecheck.m
View File

@@ -36,7 +36,7 @@
:- import_module hlds.
:- import_module hlds.hlds_module.
:- pred prepape_for_typecheck_module(module_info::in, module_info::out) is det.
:- pred prepare_for_typecheck_module(module_info::in, module_info::out) is det.
%---------------------------------------------------------------------------%
%---------------------------------------------------------------------------%
@@ -72,7 +72,7 @@
%---------------------------------------------------------------------------%
prepape_for_typecheck_module(!ModuleInfo) :-
prepare_for_typecheck_module(!ModuleInfo) :-
module_info_get_valid_pred_id_set(!.ModuleInfo, OrigValidPredIdSet),
module_info_get_preds(!.ModuleInfo, PredMap0),
map.to_sorted_assoc_list(PredMap0, PredIdsInfos0),