diff options
| author | johnvg | 2008-04-02 14:05:18 +0000 |
|---|---|---|
| committer | johnvg | 2008-04-02 14:05:18 +0000 |
| commit | c035d59d33e922aef7b08cbf1e3ffe73c2c38c54 (patch) | |
| tree | eb397c3af7e598f8e5cfab319ff01d45143dd1e0 /backendC | |
| parent | handle NewType in function isTypeSynonym (diff) | |
fix bug in codegeneration for a redirection of an evaluated array to
an unknown type
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1698 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backendC')
| -rw-r--r-- | backendC/CleanCompilerSources/codegen3.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/backendC/CleanCompilerSources/codegen3.c b/backendC/CleanCompilerSources/codegen3.c index bf1b445..8e88087 100644 --- a/backendC/CleanCompilerSources/codegen3.c +++ b/backendC/CleanCompilerSources/codegen3.c @@ -263,7 +263,6 @@ void RedirectResultAndReturn (int asp,int bsp,int source_a_index,int source_b_in break; case ArrayState: GenBuildArray (asp-source_a_index); - ++asp; } GenUpdatePopA (0,asp); GenPopB (bsp); @@ -626,7 +625,7 @@ static void CodeRootApply (Node root,NodeId rootid,int asp,int bsp,CodeGenNodeId asp+=result_a_size-a_size; bsp+=result_b_size-b_size; - + RedirectResultAndReturn (asp,bsp,asp,bsp,root->node_state,resultstate,result_a_size,result_b_size); } else GenJmpAp (n_apply_args); |