Annotation of lucent/sys/src/9/port/f002549, revision 1.1.1.1

1.1       root        1: #!/bin/rc
                      2: 
                      3: if(! ~ $#* 1){
                      4:        echo usage: mkdevlist file >[2=1]
                      5:        exit 1
                      6: }
                      7: 
                      8: fn mkextract{
                      9:        
                     10:        sed '/^$/d; /^#/d' $2 | awk '
                     11:        BEGIN { doprint=0 }
                     12:        doprint && /^[^ ]/      { doprint=0 }
                     13:        doprint                 { print "dev" $1 "'.$O'"; for(i=3; i <= NF; i++)
                     14:                                                                print $i "'.$O'"; }
                     15:        $0 ~ field              { doprint=1; next }
                     16:        ' 'field=^'$1
                     17: }
                     18: 
                     19: mkextract dev $1

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.