From 79f26e125640252f634c6beb19d4a6dc9455f7d2 Mon Sep 17 00:00:00 2001 From: johnvg Date: Fri, 13 Jul 2001 11:22:07 +0000 Subject: bug fix: reverse order of functions (in components) (backendconvert.icl,backend.c) git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@544 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- backendC/CleanCompilerSources/backend.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'backendC') diff --git a/backendC/CleanCompilerSources/backend.c b/backendC/CleanCompilerSources/backend.c index 49eedca..ae4c7f1 100644 --- a/backendC/CleanCompilerSources/backend.c +++ b/backendC/CleanCompilerSources/backend.c @@ -29,7 +29,7 @@ extern void InitARC_Info (void); /* from typeconv.h */ # include -# if 1 +# if 0 # include "dbprint.h" # endif @@ -387,7 +387,7 @@ BEDeclareIclModule (CleanString name, int nFunctions, int nTypes, int nConstruct icl->beicl_module = ConvertAllocType (ImpRepr); icl->beicl_dcl_module = gBEState.be_modules [main_dcl_module_n]; - icl->beicl_previousAncestor = UINT_MAX; + icl->beicl_previousAncestor = 0; scc_dependency_list = NULL; icl->beicl_depsP = &scc_dependency_list; @@ -414,7 +414,7 @@ BEDeclareIclModule (CleanString name, int nFunctions, int nTypes, int nConstruct locallyGeneratedFunction = &gLocallyGeneratedFunctions [i]; - DeclareFunctionC (locallyGeneratedFunction->lgf_name, locallyGeneratedFunction->lgf_arity, nFunctions-ArraySize(gLocallyGeneratedFunctions)+i, UINT_MAX); + DeclareFunctionC (locallyGeneratedFunction->lgf_name, locallyGeneratedFunction->lgf_arity, nFunctions-ArraySize(gLocallyGeneratedFunctions)+i,0); } /* +++ hack */ @@ -2187,7 +2187,7 @@ DeclareFunctionC (char *name, int arity, int functionIndex, unsigned int ancesto functions = module->bem_functions; Assert (functions != NULL); - Assert (icl->beicl_previousAncestor >= ancestor); + Assert (icl->beicl_previousAncestor <= ancestor); icl->beicl_previousAncestor = ancestor; Assert (functionIndex < module->bem_nFunctions); -- cgit v1.2.3