* src/hc08/gen.c (genPcall): fix for bug #1601032

[fw/sdcc] / src / hc08 / gen.c

diff --git a/src/hc08/gen.c b/src/hc08/gen.c
index 2897a99541cdfeaecc10c23c2eb0e211f37dce2e..5659f555c396a7bd46ae0851a4c36519ed41dba0 100644 (file)
--- a/src/hc08/gen.c
+++ b/src/hc08/gen.c
@@ -2735,6 +2735,8 @@ genPcall (iCode * ic)
   emitBranch ("bsr", tlbl);
   emitBranch ("bra", rlbl);
   emitLabel (tlbl);
+  _G.stackPushes += 2; /* account for the bsr return address now on stack */
+  updateCFA();
 
   /* Push the function's address */
   aopOp (IC_LEFT (ic), ic, FALSE);
@@ -2753,6 +2755,8 @@ genPcall (iCode * ic)
   emitcode ("rts", "");
 
   emitLabel (rlbl);
+  _G.stackPushes -= 4; /* account for rts here & in called function */
+  updateCFA();
 
 
   /* if we need assign a result value */