nx_research_landscape_test.nx source

1// nx_research_landscape_test.nx -- KAT: a multi-source, multi-option claim set -> 2// a corroborated competitive landscape (Gartner-grade, exceeding it). FMOD seen 3// by 3 sources (CONFIRMED leader), Wwise by 2 (CONFIRMED), OpenAL by 1 (flagged). 4// Conclusion = the sovereign-build target that must exceed the leader. expect_exit: 0. 5 6import "nx_syscalls.nx" 7import "nx_research_extract.nx" 8import "nx_research_landscape.nx" 9 10func w(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } sys_write(1, s, n); return 0 } 11func wn(v: i64) -> i64 { 12 let b: *u8 = sys_mmap(28); var m: i64 = v 13 if m < 0 { m = 0 - m; sys_write(1, "-" as *u8, 1) } 14 let t: *u8 = sys_mmap(28); var k: i64 = 0 15 if m == 0 { t[0] = 48 as u8; k = 1 } 16 while m > 0 { t[k] = (48 + (m % 10)) as u8; m = m / 10; k = k + 1 } 17 var i: i64 = 0; while i < k { b[i] = t[k - 1 - i]; i = i + 1 } 18 sys_write(1, b, k); return 0 19} 20func chk(cond: i64, pass: *i64, fail: *i64, label: *u8) -> i64 { 21 if cond == 1 { pass[0] = pass[0] + 1; w(" ok " as *u8); w(label); w("\n" as *u8) } 22 else { fail[0] = fail[0] + 1; w(" XX " as *u8); w(label); w("\n" as *u8) } 23 return 0 24} 25 26func main() -> i64 { 27 let pass: *i64 = (sys_mmap(8)) as *i64 28 let fail: *i64 = (sys_mmap(8)) as *i64 29 pass[0] = 0 30 fail[0] = 0 31 32 let subjs: *i64 = (sys_mmap(64)) as *i64 33 let rels: *i64 = (sys_mmap(64)) as *i64 34 let objs: *i64 = (sys_mmap(64)) as *i64 35 let srcs: *i64 = (sys_mmap(64)) as *i64 36 37 subjs[0] = ("FMOD" as *u8) as i64; rels[0] = ("IS_A" as *u8) as i64; objs[0] = ("audio library" as *u8) as i64; srcs[0] = 0 38 subjs[1] = ("FMOD" as *u8) as i64; rels[1] = ("PROVIDES" as *u8) as i64; objs[1] = ("low-latency mixing" as *u8) as i64; srcs[1] = 1 39 subjs[2] = ("FMOD" as *u8) as i64; rels[2] = ("SUPPORTS" as *u8) as i64; objs[2] = ("3D positional audio" as *u8) as i64; srcs[2] = 2 40 subjs[3] = ("Wwise" as *u8) as i64; rels[3] = ("IS_A" as *u8) as i64; objs[3] = ("audio middleware" as *u8) as i64; srcs[3] = 0 41 subjs[4] = ("Wwise" as *u8) as i64; rels[4] = ("PROVIDES" as *u8) as i64; objs[4] = ("interactive music" as *u8) as i64; srcs[4] = 1 42 subjs[5] = ("OpenAL" as *u8) as i64; rels[5] = ("IS_A" as *u8) as i64; objs[5] = ("audio API" as *u8) as i64; srcs[5] = 0 43 44 let out: *u8 = sys_mmap(16384) 45 let opt: i64 = ls_render(subjs, rels, objs, srcs, 6, out) 46 w("=== nx_research_landscape KAT (corroborated, Gartner-exceeding) ===\n" as *u8) 47 w(out) 48 w("options=" as *u8); wn(opt); w("\n--- checks ---\n" as *u8) 49 50 let on: i64 = re_strlen(out) 51 chk(opt == 3, pass, fail, "3 options found" as *u8) 52 chk(re_has(out, on, "[3 sources] CONFIRMED" as *u8), pass, fail, "FMOD 3-source CONFIRMED" as *u8) 53 chk(re_has(out, on, "[2 sources] CONFIRMED" as *u8), pass, fail, "Wwise 2-source CONFIRMED" as *u8) 54 chk(re_has(out, on, "UNCONFIRMED (single source)" as *u8), pass, fail, "OpenAL single-source FLAGGED" as *u8) 55 chk(re_has(out, on, "LEADER (bar to beat): FMOD" as *u8), pass, fail, "leader = most-corroborated (FMOD)" as *u8) 56 chk(re_has(out, on, "BUILD sovereign AUDIO ENGINE" as *u8), pass, fail, "sovereign-build target emitted" as *u8) 57 chk(re_has(out, on, "never adopt: FMOD" as *u8), pass, fail, "benchmark-to-exceed, never adopt" as *u8) 58 chk(re_has(out, on, "EXCEED-GARTNER axes" as *u8), pass, fail, "exceed-Gartner axes stated" as *u8) 59 60 w("=== VERDICT pass=" as *u8); wn(pass[0]); w(" fail=" as *u8); wn(fail[0]); w(" ===\n" as *u8) 61 if fail[0] == 0 { return 0 } 62 return 1 63}