a_no_stl.fj

;start
IO: ;
start:


get_aaaaN

print_aaaa aaaaN
print_chars N, 'T'

println

loop:;loop


ns stl {
    def output_bit bit < IO {
        IO + (bit ? 1 : 0);
    }

    def output_char ascii {
        rep(8, i) .output_bit (ascii>>i)&1
    }
}