mirror of https://github.com/ArduPilot/ardupilot
30 lines
594 B
Plaintext
30 lines
594 B
Plaintext
|
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
|