repos / gbc

GBC - Go B Compiler
git clone https://github.com/xplshn/gbc.git

gbc / tests
xplshn  ·  2025-08-13

compare.b

B
 1assert_equal(actual, expected, message) {
 2    extrn printf, abort;
 3    printf("%s: ", message);
 4    if (actual != expected) {
 5        printf("FAIL\n");
 6        abort();
 7    } else {
 8        printf("OK\n");
 9    }
10}
11
12main() {
13    extrn assert_equal;
14    assert_equal(5 == 3, 0, "5 == 3");
15    assert_equal(3 == 3, 1, "3 == 3");
16    assert_equal(5 != 3, 1, "5 != 3");
17    assert_equal(3 != 3, 0, "3 != 3");
18    assert_equal(5 >= 3, 1, "5 >= 3");
19    assert_equal(3 >= 5, 0, "3 >= 5");
20    assert_equal(3 >= 3, 1, "3 >= 3");
21    assert_equal(3 >  3, 0, "3 >  3");
22    assert_equal(5 >  3, 1, "5 >  3");
23}