rc/bin/wloc

   1 #!/bin/rc
   2
   3 rfork e
   4 ifs='
   5 '
   6
   7 for(i in `{ls /dev/wsys}) {
   8         echo window -r `{syscall -o read 0 buf 59 < $i/window >[2] /dev/null |
   9         sed 's/............//; s/^ *//; s/  */ /g'} `{cat $i/label}
  10 }