aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjohnvg2001-11-21 10:31:40 +0000
committerjohnvg2001-11-21 10:31:40 +0000
commit1c0a9ef25065b3e98e6aefe32662f8753e0ae16c (patch)
treebd7b67a6a632f4805284ee07ac1fbc7ea44a1b80
parentnew release (diff)
bug fix for state of selections of selections of tuples
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@898 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
-rw-r--r--backendC/CleanCompilerSources/codegen2.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/backendC/CleanCompilerSources/codegen2.c b/backendC/CleanCompilerSources/codegen2.c
index e2bb39b..abac86a 100644
--- a/backendC/CleanCompilerSources/codegen2.c
+++ b/backendC/CleanCompilerSources/codegen2.c
@@ -5277,6 +5277,10 @@ static int FillNodeDefs (NodeDefs nds,int node_id_number,int *asp_p,int *bsp_p,N
decrement_reference_count_of_node_id (node_id,&code_gen_node_ids_p->free_node_ids);
}
+
+ /* added 22-10-2001 */
+ result_state_p=tuple_state_p;
+ /* */
arg=node->node_arguments;
if (arg->arg_node->node_kind==NodeIdNode){