kraken/tests/to_parse.krak

import to_import: simple_print, simple_println, a, b, string_id

obj Something (ObjectTrait) {
    var member: int
    fun method(a: int):int {
        return 5+a+member + other_method()
    }
    fun other_method(): int return 7;
    fun return_this(): *Something {
        return this;
    }
}

/*fun some_function(): int return 0;*/
/*fun some_other_function(in: bool): float {*/
    /*return 0.0*/
/*}*/
fun main(): int {
    /*var a_declaration:int*/
    /*simple_print(1 + 2)*/
    /*var again = 2 + 4 - 1 * 400*/
    /*simple_print(again)*/
    /*again = 2 + (4 - 1) * 400*/
    /*simple_print(again)*/
    /*var another_declaration: int = 8.0*/
    /*simple_print(another_declaration)*/
    /*var yet_another_declaration = "Hello Marcus\n"*/
    /*simple_print(yet_another_declaration)*/
    /*simple_print("Hello World!\n")*/
    /*simple_print(1337)*/
    /*if (1 + 2 && false) simple_print("its true!")*/
    /*else simple_print("its false!")*/
    var counter = 10
    counter--
    --counter
    while (counter) simple_print(counter--)
    simple_print("\n")
    counter = 8
    while (counter) {
        simple_print(--counter)
        if (counter == 2)
            break
    }
    simple_print("\n")
    for (var j = 0; j < 10; j++;)
        if (j%2) continue
        else simple_print(j)
    var an_obj: Something
    an_obj.member = 20
    simple_print(an_obj.member)
    simple_print("here is thing")
    simple_print(123)
    simple_print("\n")
    simple_print(an_obj.method(1))
    simple_print("\n")
    simple_print(string_id("WoooopsEee\n"))
    var with_ptr = an_obj.return_this()
    simple_print(with_ptr->method(2))
    simple_print("\n")
    {
        defer simple_print("should_be_third\n")
        defer simple_print("should_be_second\n")
        simple_print("should be first\n")
    }
    for (var i = 1; i < 10; i++;) {
        defer simple_println("OUTER:happens every time, even when breaking or continueing")
        {
            defer simple_println("INNER:happens every time, even when breaking or continueing")
            if (i % 2 == 0)
                continue
            if (i == 9)
                break
            simple_println(i)
        }
    }
    defer simple_println("Here is a return defer outer")
    {
        defer simple_println("Here is a return defer inner")
        return 0
    }
    return 0
}