From 60d625dc9cde9b57c8917a55d73af73c8b7f5022 Mon Sep 17 00:00:00 2001
From: borutr <borutr@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Sat, 1 Mar 2008 18:45:45 +0000
Subject: [PATCH] implemented debug function name stack

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@5061 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 support/scripts/sdcc.nsi | 28 ++++++++++++++++++++++++++--
 1 file changed, 26 insertions(+), 2 deletions(-)

diff --git a/support/scripts/sdcc.nsi b/support/scripts/sdcc.nsi
index b85acea9..0714463f 100644
--- a/support/scripts/sdcc.nsi
+++ b/support/scripts/sdcc.nsi
@@ -80,6 +80,30 @@
 
 !ifdef SDCC.DEBUG
   Var SDCC.FunctionName
+  Var SDCC.StrStack0
+  Var SDCC.StrStack1
+  Var SDCC.StrStack2
+  Var SDCC.StrStack3
+  Var SDCC.StrStack4
+
+!define SDCC.PushStr "!insertmacro MACRO_SDCC_PushStr"
+!macro MACRO_SDCC_PushStr NAME
+  StrCpy $SDCC.StrStack4 $SDCC.StrStack3
+  StrCpy $SDCC.StrStack3 $SDCC.StrStack2
+  StrCpy $SDCC.StrStack2 $SDCC.StrStack1
+  StrCpy $SDCC.StrStack1 $SDCC.StrStack0
+  StrCpy $SDCC.StrStack0 $SDCC.FunctionName
+  StrCpy $SDCC.FunctionName ${NAME}
+!macroend
+
+!define SDCC.PopStr "!insertmacro MACRO_SDCC_PopStr"
+!macro MACRO_SDCC_PopStr
+  StrCpy $SDCC.FunctionName $SDCC.StrStack0
+  StrCpy $SDCC.StrStack0 $SDCC.StrStack1
+  StrCpy $SDCC.StrStack1 $SDCC.StrStack2
+  StrCpy $SDCC.StrStack2 $SDCC.StrStack3
+  StrCpy $SDCC.StrStack3 $SDCC.StrStack4
+!macroend
 !endif
 
 !define DebugMsg "!insertmacro MACRO_SDCC_DebugMsg"
@@ -93,14 +117,14 @@
 !macro MACRO_SDCC_Function NAME
   Function "${NAME}"
   !ifdef SDCC.DEBUG
-    StrCpy $SDCC.FunctionName ${NAME}
+    ${SDCC.PushStr} ${NAME}
   !endif
 !macroend
 
 !define FunctionEnd "!insertmacro MACRO_SDCC_FunctionEnd"
 !macro MACRO_SDCC_FunctionEnd
   !ifdef SDCC.DEBUG
-    StrCpy $SDCC.FunctionName ""
+    ${SDCC.PopStr}
   !endif
   FunctionEnd
 !macroend
-- 
2.30.2