aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjohnvg2011-02-24 14:28:23 +0000
committerjohnvg2011-02-24 14:28:23 +0000
commitb8d710cd1aa2ba780e1bcc86e8359bf51b4b9464 (patch)
tree3e2596e659fbac668ac7e910e333c30aa09e0424
parentmore: write generic functions in constructors to .tcl and .typ files, (diff)
check_completeness of type of generic function definition
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1863 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
-rw-r--r--frontend/explicitimports.icl6
1 files changed, 5 insertions, 1 deletions
diff --git a/frontend/explicitimports.icl b/frontend/explicitimports.icl
index da48fc2..dc5222e 100644
--- a/frontend/explicitimports.icl
+++ b/frontend/explicitimports.icl
@@ -494,7 +494,7 @@ checkExplicitImportCompleteness dcls_explicit explicit_qualified_imports dcl_mod
# (macro,ccs) = ccs!box_ccs.ccs_macro_defs.[mod_index,decl_index]
= check_completeness macro cci ccs
continuation STE_Generic dcl_common dcl_functions cci ccs
- = ccs // check_completeness not yet implemented
+ = check_completeness dcl_common.com_generic_defs.[decl_index] cci ccs
instance toString STE_Kind where
toString (STE_FunctionOrMacro _) = "function/macro"
@@ -682,6 +682,10 @@ instance check_completeness FunType where
check_completeness {ft_type} cci ccs
= check_completeness ft_type cci ccs
+instance check_completeness GenericDef where
+ check_completeness {gen_type} cci ccs
+ = check_completeness gen_type cci ccs
+
instance check_completeness (Global x) | check_completeness x where
check_completeness { glob_object } cci ccs
= check_completeness glob_object cci ccs