| tventi - plan9port - [fork] Plan 9 from user space | |
| git clone git://src.adamsgaard.dk/plan9port | |
| Log | |
| Files | |
| Refs | |
| README | |
| LICENSE | |
| --- | |
| tventi (423B) | |
| --- | |
| 1 defn logs() { | |
| 2 local h, p; | |
| 3 p = (vl+sizeofQLock); | |
| 4 loop 1, 1024 do | |
| 5 { | |
| 6 h = (VtLog)*p; | |
| 7 while h do | |
| 8 { | |
| 9 print("log(",h\X,") // ",*(h.name\s),"\n"); | |
| 10 h = (VtLog)h.next; | |
| 11 } | |
| 12 p = p+4; | |
| 13 } | |
| 14 } | |
| 15 | |
| 16 defn log(l) { | |
| 17 local c, nc; | |
| 18 | |
| 19 l = (VtLog)l; | |
| 20 c = l.w; | |
| 21 loop 1,l.nchunk do { | |
| 22 c = c+sizeofVtLogChunk; | |
| 23 if c == l.chunk+l.nchunk*sizeofVtLogChunk then | |
| 24 c = l.chunk; | |
| 25 c = (VtLogChunk)c; | |
| 26 print(stringn(c.p, c.wp-c.p)\s); | |
| 27 } | |
| 28 } |