diff options
author | Ori Bernstein <ori@eigenstate.org> | 2017-03-19 23:42:17 -0700 |
---|---|---|
committer | Ori Bernstein <ori@eigenstate.org> | 2017-03-19 23:42:17 -0700 |
commit | 5cf18de659c44f4287c103dd81298c5f6b7e0951 (patch) | |
tree | d6d545c14aa340a6b405ff16b7b35a8972ee6add /support | |
parent | 0eae465b2ba82f8a0e49c869bddd37b85ec2e5ae (diff) | |
download | mc-5cf18de659c44f4287c103dd81298c5f6b7e0951.tar.gz |
Add acid debug file for Myrddin
Diffstat (limited to 'support')
-rw-r--r-- | support/acid/myr | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/support/acid/myr b/support/acid/myr new file mode 100644 index 0000000..daaea06 --- /dev/null +++ b/support/acid/myr @@ -0,0 +1,16 @@ +// acid support for Myrddin. + +// Myrddin doesn't use the Plan 9 ABI, so we +// define our own stack function. +defn myrstk() +{ + local b + b = *BP; + while *b do { + line = pcline(*(b + 8)); + file = pcfile(*(b + 8)); + func = fmt(*(b + 8), 'a'); + print(file, ":", line, ":\t", func, "\n"); + b = *b; + } +} |