;;;; strip-blanks.scm - Strip blank lines

(use awk extras)

(awk (read-line) (line) ()
  ("[^ \t]" (print line)) )