Return to cvt.awk CVS log

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

Annotation of 42BSD/ucb/lisp/cvt.awk, revision 1.1.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.