diff options
author | johnvg | 2013-11-08 15:18:21 +0000 |
---|---|---|
committer | johnvg | 2013-11-08 15:18:21 +0000 |
commit | c04b1538c8a69187b7146d80b74946d44d4eb45f (patch) | |
tree | 31ea6d57affc87b876a985cf367bfa2342f377f0 /backendC/CleanCompilerSources | |
parent | fix comprehensions with a non lower case identifier as pattern, (diff) |
generate jsr_ap 1 instead of jsr e_system_sAP
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2319 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backendC/CleanCompilerSources')
-rw-r--r-- | backendC/CleanCompilerSources/codegen1.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/backendC/CleanCompilerSources/codegen1.c b/backendC/CleanCompilerSources/codegen1.c index 5a4a2f9..b64a90e 100644 --- a/backendC/CleanCompilerSources/codegen1.c +++ b/backendC/CleanCompilerSources/codegen1.c @@ -3966,10 +3966,7 @@ static void repl_overloaded_cons_arguments (NodeP node_p,int *asp_p,int *bsp_p,S ab_node_ids_p->a_node_ids=code_gen_node_ids.a_node_ids; ab_node_ids_p->b_node_ids=code_gen_node_ids.b_node_ids; - GenDAStackLayout (2); - MakeSymbolLabel (&apply_label,ApplyDef->sdef_module,s_pref,ApplyDef, 0); - GenJsr (&apply_label); - GenOAStackLayout (1); + GenJsrAp (1); GenReplArgs (2,2); } |