repos / gbc

name.b

 1read_name(name, n) {
 2    extrn getchar;
 3    auto i;
 4    i = 0; while (i < n) {
 5        auto a;
 6        a = getchar();
 7        name[i++] = a;
 8        if (a == '\n') return (i);
 9    }
10    return (n);
11}
12
13print_name(name, n) {
14    extrn putchar;
15    auto i;
16    i = 0; while (i < n) {
17        putchar(name[i++]);
18    }
19}
20
21main() {
22    extrn malloc, printf, getchar, putchar;
23    auto name, n, i;
24    n = 256;
25    name = malloc(n);
26    printf("What is your name?\n");
27    n = read_name(name, n);
28    printf("Hello, ");
29    print_name(name, n);
30}