1 # print msg to screen if a != b, otherwise print "." 2 fn check-ints-equal _a: int, b: int, msg: (addr array byte) { 3 var a/eax: int <- copy _a 4 compare a, b 5 { 6 break-if-= 7 draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0, msg, 3 # 3=cyan 8 count-test-failure 9 return 10 } 11 { 12 break-if-!= 13 draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0, ".", 3 # 3=cyan 14 } 15 } 16 17 fn test-check-ints-equal { 18 check-ints-equal 0, 0, "abc" 19 }