plan9port

fork of plan9port with libvec, libstr and libsdb
Log | Files | Refs | README | LICENSE

commit d9c2aa3a3366b60d5054c575801692579162a47f
parent 0a61c07d591273b76da21fb8386b669989da3707
Author: rsc <devnull@localhost>
Date:   Mon, 19 Apr 2004 18:19:09 +0000

whoops

Diffstat:
Dacid/core | 0
Dacid/elflink | 54------------------------------------------------------
2 files changed, 0 insertions(+), 54 deletions(-)

diff --git a/acid/core b/acid/core Binary files differ. diff --git a/acid/elflink b/acid/elflink @@ -1,54 +0,0 @@ -aggr Rdebug -{ - 'X' 0 version; - 'X' 4 map; -}; - -aggr Rmap -{ - 'X' 0 addr; - 'X' 4 name; - 'X' 8 dynsect; - 'X' 12 next; - 'X' 16 prev; -}; - -defn -rdebug() -{ - local a; - - a = _DYNAMIC; - while *a != 0 do { - if *a == 21 then // 21 == DT_DEBUG - return *(a+4); - a = a+8; - } - return 0; -} - -defn -rlink() -{ - local r, m, n; - - r = rdebug(); - if r == 0 then - return {}; - complex Rdebug r; - print("version ", r.version, "\n"); - - m = r.map; - n = 0; - while m != 0 && n < 100 do { - complex Rmap m; - print("map ", m\X, " base ", m.addr\X, " next ", m.next\X, " name "); - if m.name then - print(*(m.name\s)); - else - print("''"); - print("\n"); - m = m.next; - n = n+1; - } -}