tweaky

gap-system · Sep 6, 2018 · 0e37351 · 0e37351
1 parent 9a9e4ae
commit 0e37351
Showing 1 changed file with 7 additions and 4 deletions.
diff --git a/src/intrprtr.c b/src/intrprtr.c
@@ -90,14 +90,17 @@
       InterpreterHook(GetInputFilenameID(), STATE(InterpreterStartLine),     \
                       STATE(IntrReturning) ||   STATE(IntrIgnoring));        \
     }                                                                        \
-    STATE(InterpreterStartLine) = 0;
+    STATE(InterpreterStartLine) = 0;                                         \
 
-#define SKIP_IF_RETURNING()                                                  \
-    INTERPRETER_PROFILE_HOOK();                                              \
+
+#define SKIP_IF_RETURNING_NO_PROFILE()                                       \
     if (STATE(IntrReturning) > 0) {                                          \
         return;                                                              \
     }
 
+#define SKIP_IF_RETURNING() \
+    INTERPRETER_PROFILE_HOOK(); SKIP_IF_RETURNING_NO_PROFILE();
+
 #define SKIP_IF_IGNORING()  if ( STATE(IntrIgnoring)  > 0 ) { return; }
 
 
@@ -391,7 +394,7 @@ void            IntrFuncCallEnd (
     UInt                i;              /* loop variable                   */
 
     /* ignore or code                                                      */
-    SKIP_IF_RETURNING();
+    SKIP_IF_RETURNING_NO_PROFILE();
     SKIP_IF_IGNORING();
     if ( STATE(IntrCoding)    > 0 ) {
       CodeFuncCallEnd( funccall, options, nr );