1 float test_s_not (string s) { return !s; }
2 float test_s_and (string s, string t) { return s && t; }
3 float test_s_or (string s, string t) { return s || t; }
4 float test_s_if (string s) { if (s) return 1; return 0; }
5 float test_s_ifnot(string s) { if not (s) return 1; return 0; }
7 void test(string s, string t) {
8 print(ftos(!!test_s_not (s)), " ");
9 print(ftos(!!test_s_and (s, t)), " ");
10 print(ftos(!!test_s_or (s, t)), " ");
11 print(ftos(!!test_s_if (s)), " ");
12 print(ftos(!!test_s_ifnot(s)), "\n");
17 print(" ! & | i N\n");
18 print("'str', 'str' -> "); test("FULL", "FULL");
19 print("'str', '' -> "); test("FULL", "" );
20 print("'str', 0 -> "); test("FULL", nuls );
21 print("'', 'str' -> "); test("", "FULL");
22 print("'', '' -> "); test("", "" );
23 print("'', 0 -> "); test("", nuls );
24 print("0, 'str' -> "); test(nuls, "FULL");
25 print("0, '' -> "); test(nuls, "" );
26 print("0, 0 -> "); test(nuls, nuls );