#!/cmd/rc

rfork e
IFS='
'

for(i in `{ls /dev/wsys}) {
	echo window -r `{sys/call -o pread 0 buf 59 -1 < $i/window >[2] /dev/null |
	sed 's/............//; s/^ *//; s/  */ /g'} `{cat $i/label}
}