shithub: riscv

ref: 6118d778581b44e5c41a04a60d4aa8e6cad4a37c
dir: /rc/bin/wloc/

View raw version 
#!/bin/rc

rfork e
ifs='
'

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