tacid on freebsd - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit 6c8856475f496f9e36038d253a4653a23b5db187
 (DIR) parent ebd395452e7f81ece3d3877a04fbe26a324f6a3d
 (HTM) Author: rsc <devnull@localhost>
       Date:   Tue, 20 Apr 2004 05:51:36 +0000
       
       acid on freebsd
       
       Diffstat:
         M acid/386                            |       4 ++--
         M src/cmd/acid/builtin.c              |       1 +
       
       2 files changed, 3 insertions(+), 2 deletions(-)
       ---
 (DIR) diff --git a/acid/386 b/acid/386
       t@@ -175,7 +175,7 @@ linkdebug()
        defn
        dynamicmap()
        {
       -        if systype == "linux" then {
       +        if systype == "linux"  || systype == "freebsd" then {
                        local r, m, n;
                
                        r = linkdebug();
       t@@ -185,7 +185,7 @@ dynamicmap()
                                n = 0;
                                while m != 0 && n < 100 do {
                                        complex Linkmap m;
       -                                if m.name && *(m.name\b) then
       +                                if m.name && *(m.name\b) && access(*(m.name\s)) then
                                                textfile({*(m.name\s), m.addr\X});
                                        m = m.next;
                                        n = n+1;
 (DIR) diff --git a/src/cmd/acid/builtin.c b/src/cmd/acid/builtin.c
       t@@ -633,6 +633,7 @@ doaccess(Node *r, Node *args)
        
                r->op = OCONST;
                r->type = TINT;
       +        r->store.fmt = 'D';
                r->store.u.ival = 0;                
                if(access(res.store.u.string->string, 4) == 0)
                        r->store.u.ival = 1;