From c04b1538c8a69187b7146d80b74946d44d4eb45f Mon Sep 17 00:00:00 2001
From: johnvg
Date: Fri, 8 Nov 2013 15:18:21 +0000
Subject: 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
---
 backendC/CleanCompilerSources/codegen1.c | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'backendC/CleanCompilerSources')

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);
 }
-- 
cgit v1.2.3