You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
29 lines
594 B
29 lines
594 B
handle SIGXCPU SIG33 SIG35 SIGPWR nostop noprint |
|
|
|
define mono_backtrace |
|
select-frame 0 |
|
set $i = 0 |
|
while ($i < $arg0) |
|
set $foo = (char*) mono_pmip ($pc) |
|
if ($foo) |
|
printf "#%d %p in %s\n", $i, $pc, $foo |
|
else |
|
frame |
|
end |
|
up-silently |
|
set $i = $i + 1 |
|
end |
|
end |
|
|
|
|
|
define mono_stack |
|
set $mono_thread = mono_thread_current () |
|
if ($mono_thread == 0x00) |
|
printf "No mono thread associated with this thread\n" |
|
else |
|
set $ucp = malloc (sizeof (ucontext_t)) |
|
call (void) getcontext ($ucp) |
|
call (void) mono_print_thread_dump ($ucp) |
|
call (void) free ($ucp) |
|
end |
|
end
|
|
|