msdos/examples/texttest.awk

   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 }