Return to cvt.awk CVS log

Up to [CSRG BSD Unix] / 43BSD / ucb / lisp

Annotation of 43BSD/ucb/lisp/cvt.awk, revision 1.1

1.1     ! root        1: 
        !             2: { if(begin != 1)
        !             3:   { if($1 != "") flags[$1] = "on"
        !             4:     if($2 != "") flags[$2] = "on"
        !             5:     if($3 != "") flags[$3] = "on"
        !             6:     if($4 != "") flags[$4] = "on"
        !             7:     if($5 != "") flags[$5] = "on"
        !             8:     skip = 0
        !             9:     begin = 1
        !            10:     next } }
        !            11: /#ifdef/||/#elseif/ { if (flags[$2] != "") skip = -1; else skip = 1
        !            12:                      print $0
        !            13:                      next }
        !            14: /#ifndef/ { if (flags[$2] != "") skip = 1; else skip = -1
        !            15:                      print $0
        !            16:                      next }
        !            17: /#else/ { skip = -skip; print $0; next}
        !            18: /#endif/ { skip = 0 ; print $0; next}
        !            19: { if(skip > 0)
        !            20:     { if(substr($0,1,1) != "#") print "#" $0; else print $0;
        !            21:       next }}
        !            22: { if(skip < 0)
        !            23:     { if(substr($0,1,1) == "#") 
        !            24:           print substr($0,2,length($0)-1) 
        !            25:          else print $0
        !            26:       next }}
        !            27: { print $0 }
        !            28: 
        !            29: 

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