diff options
| author | clean | 2000-11-29 12:27:49 +0000 |
|---|---|---|
| committer | clean | 2000-11-29 12:27:49 +0000 |
| commit | b5261af55b9dfac4c38fe3ee6e61a101062c43fd (patch) | |
| tree | ee492c57564a9996564a5cc761fec0632c213f73 | |
| parent | restored binary commit (diff) | |
more node_number=0 statements
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@285 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
| -rw-r--r-- | backendC/CleanCompilerSources/backend.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/backendC/CleanCompilerSources/backend.c b/backendC/CleanCompilerSources/backend.c index 360cbaa..f2023a6 100644 --- a/backendC/CleanCompilerSources/backend.c +++ b/backendC/CleanCompilerSources/backend.c @@ -1179,6 +1179,7 @@ BENormalNode (BESymbolP symbol, BEArgP args) node->node_symbol = symbol; node->node_arity = CountArgs (args); node->node_arguments = args; + node->node_number=0; /* +++ hackerdiehack */ if (symbol->symb_kind == definition) @@ -1202,6 +1203,7 @@ BEMatchNode (int arity, BESymbolP symbol, BENodeP node) matchNode->node_symbol = symbol; matchNode->node_arity = arity; matchNode->node_arguments = BEArgs (node, NULL); + matchNode->node_number=0; return (matchNode); } /* BEMatchNode */ @@ -1315,6 +1317,7 @@ BEUpdateNode (BEArgP args) node->node_symbol = recordSymbol; node->node_arity = 2; node->node_arguments = args; + node->node_number=0; return (node); } /* BEUpdateNode */ @@ -1819,6 +1822,7 @@ BEAdjustArrayFunction (BEArrayFunKind arrayFunKind, int functionIndex, int modul BEModule module; module = &gBEState.be_modules [moduleIndex]; + functionSymbol = &module->bem_functions [functionIndex]; sdef = functionSymbol->symb_def; |