code wiki / _hdl_build / nx_popqueue_probe.nx
nx_popqueue_probe.nx source
↩ module page · 9 lines · 647 B
1import "nx_workstream_popqueue.nx"
2import "nx_syscalls.nx"
3func _w(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 }
4func _n(v: i64) -> i64 { let bb: *u8=sys_mmap(28); var m: i64=v; if m<0{m=0-m;sys_write(1,"-" as *u8,1)}; let t: *u8=sys_mmap(28); var k: i64=0; if m==0{t[0]=48 as u8;k=1}; while m>0{t[k]=(48+(m%10)) as u8;m=m/10;k=k+1}; var i: i64=0; while i<k{bb[i]=t[k-1-i];i=i+1}; sys_write(1,bb,k); return 0 }
5func main() -> i64 {
6 let m: i64 = pq_count_matches("knowledge/store/ws-" as *u8, "knowledge/registry/assignment_queue.tsv" as *u8)
7 _w("matches="); _n(m); _w("\n" as *u8)
8 return 0
9}