code wiki / _hdl_build / nx_surrogate_diag.nx

nx_surrogate_diag.nx

buildroot/runtime/_hdl_build/nx_surrogate_diag.nx

3160 B38 linesdepth 7pulls 23 transitivereach 0 importersview sourcekind tooltopic surrogate
docsdependenciesstructsconstsfunctions

about

nx_surrogate_diag.nx -- Tests JavaScript engine support for specific preamble features by checking fetches in controlled code snippets.

dependencies 3 imports · 0 importers

nx_gate_base.nx nx_syscalls.nx nx_js_eval.nx nx_surrogate_diag.nx

imports: nx_gate_base.nxnx_syscalls.nxnx_js_eval.nx

imported by: nobody (leaf or entry point)

call flow from main pre-order; caps 40 nodes / depth 6 declared; ↻ = already shown

main gw sys_write t fires sys_mmap nxa_die sys_write ↻ sys_exit nxa_lock_take nxa_lock_addr sys_write ↻ nxa_lock_give nxa_lock_addr ↻ nxa_report_overrun sys_write ↻ nxa_dump_printable sys_write ↻ nxa_dump_sizes sys_write ↻ gsl gw ↻ js_pending_url ev_str_bytes str_flatten ev_str_new nx_pool_alloc ev_str_len contains gsl ↻ gw ↻ sys_exit ↻

structs

none

consts

6const K_MAGIC_4096: i64 = 4096

functions

8func grow(name: *u8, ok: i64) -> i64 { if ok==1 { gw(" PASS " as *u8) } else { gw(" FAIL " as *u8) } gw(name); gw("
calls 1: gw
10func gsl(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} return n }
called by 1: fires calls 1: gsl
11func contains(hay: *u8, hl: i64, needle: *u8) -> i64 { let nl: i64=gsl(needle); if nl>hl {return 0} var i: i64=0; let last: i64=hl-nl; while i<=last { var j: i64=0; var m: i64=1; while j<nl { if (hay[i+j]&0xff)!=(needle[j]&0xff){m=0;j=nl} else {j=j+1} } if m==1 {return 1} i=i+1 } return 0 }
12func fires(src: *u8, want: *u8) -> i64
22func t(name: *u8, src: *u8, want: *u8) -> i64 { if fires(src, want)==1 { gw(" OK "); gw(name); gw("\n"); return 1 } gw(" FAIL "); gw(name); gw("\n"); return 0 }
24func main() -> i64