summaryrefslogtreecommitdiff
path: root/iprofile.s
diff options
context:
space:
mode:
Diffstat (limited to 'iprofile.s')
-rw-r--r--iprofile.s31
1 files changed, 29 insertions, 2 deletions
diff --git a/iprofile.s b/iprofile.s
index 4072e41..94dcf89 100644
--- a/iprofile.s
+++ b/iprofile.s
@@ -659,12 +659,36 @@ write_functions_on_stack:
mov name(d1),a0
push a2
+
+#ifdef MODULE_NAMES
+ movl -4(a0),a1
+#endif
+
add $4,a0
- push a0
+#ifdef MODULE_NAMES
+ pushl (a1)
+ addl $4,a1
+ pushl a1
+#endif
+
+ pushl a0
call @ew_print_string
add $4,sp
+#ifdef MODULE_NAMES
+ pushl $module_string
+ call @ew_print_string
+ add $4,sp
+
+ call @ew_print_text
+ addl $8,sp
+
+ pushl $']'
+ call @ew_print_char
+ add $4,sp
+#endif
+
pushl $10
call @ew_print_char
add $4,sp
@@ -798,5 +822,8 @@ stack_trace_string:
.ascii "Stack trace:"
.byte 10
.byte 0
-
+#ifdef MODULE_NAMES
+module_string:
+ .asciz " [module: "
+#endif
align (2)