home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / MAWK113.ZIP / mawk113 / msdos / examples / texttest.awk < prev    next >
Text File  |  1992-12-05  |  299b  |  12 lines
  1. # Ben Myers <0003571400@mcimail.com>
  2.  
  3. /^#include/ {
  4. # got #include, see if it has at least one quote. We don't want #include <>        
  5.         z = gsub(/"/, "", $2)
  6.         while ((z > 0) && (getline x <$2 > 0)) 
  7. #        while (getline x <$2 > 0) 
  8.                 print x
  9.         next
  10. }
  11. { print }
  12.