oakc 0.6.1

A portable programming language with a compact backend
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

#[std]
#[memory(512)]
#[include("str.ok")]

fn input(buffer: &char) {
    let i = 0;
    for (let ch = get_char(); ch != '\n'; ch = get_char()) {
        buffer[i] = ch;
        i = i + 1;
    }
}

fn main() {
    let size = 256;
    let s = alloc(size) as &char;
    putstr("Enter some text: "); input(s);
    putstr("You said \""); putstr(s); putcharln('"');

    putstr("Which is "); putnum(strlen(s)); putstrln(" chars long!");
    free s: size;
}