repos / gbc

lexer.b

 1/* B comment */
 2// C++ comment
 3
 4assert_equal(actual, expected, message) {
 5    extrn printf, abort;
 6    printf("%s: ", message);
 7    if (actual != expected) {
 8        printf("FAIL\n");
 9        abort();
10    } else {
11        printf("OK\n");
12    }
13}
14
15main() {
16    extrn assert_equal;
17    assert_equal(0105, 69, "0105 == 69");
18    assert_equal(0x45, 69, "0x45 == 69");
19    assert_equal('E', 0x45, "'E' == 0x45");
20    assert_equal('EF', 0x4546, "'EF' == 0x4546");
21}