real relative imports

.gitignore

@@ -2,3 +2,5 @@
 /out*
 /TODO
 /vscode
+/fuzz
+/perf.data*

README.md

@@ -4,20 +4,21 @@ A very cool language
 
 ## Features
 * Clean indentation-based syntax
-* Compiles to x86_64 Assembly
+* Compiles to x86-64 Assembly
-* Growing [standard library](https://git.ton1.dev/toni/zern/src/branch/main/src/std)
-* Produces tiny static executables (11KB for `hello.zr`)
 * No libc required!
-* Has type inference, pipe operator, variadics, dynamic arrays, hashmaps, DNS resolver, etc.
+* Produces tiny static executables (11KB for `hello.zr`)
+* Has static typing, [UFCS](https://en.wikipedia.org/wiki/Uniform_function_call_syntax), variadics, dynamic arrays, hashmaps, DNS resolver, etc.
 
 ## Syntax
 ```rust
+include "$/io.zr"
+
 func main[] : i64
-    answer := math.abs(os.urandom_i64()) % 100
+    answer := os.urandom_i64()->abs() % 100
 
     while true
         io.println("Guess a number: ")
-        guess := io.read_line() |> str.trim() |> str.parse_i64()
+        guess := io.read_line()->parse_i64()
 
         if guess == answer
             io.println("You win!")
@@ -28,20 +29,6 @@ func main[] : i64
             io.println("Too high!")
 ```
 
-```rust
-func square[x: i64] : i64
-    return x * x
-
-func sum[a: i64, b: i64] : i64
-    return a + b
-
-func main[] : i64
-    [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13]
-    |> alg.map(^square)
-    |> alg.reduce(^sum, 0)
-    |> io.println_i64()
-```
-
 ## Quickstart
 ```
 cargo install --git https://git.ton1.dev/toni/zern

examples/brainfuck.zr

@@ -1,7 +1,9 @@
+include "$/io.zr"
+
 func main[] : i64
     // https://brainfuck.org/sierpinski.b
     src := "++++++++[>+>++++<<-]>++>>+<[-[>>+<<-]+>>]>+[-<<<[->[+[-]+>++>>>-<<]<[<]>>++++++[<<+++++>>-]+<<++.[-]<<]>.>+[>>]>+]"
-    src_len := str.len(src)
+    src_len := src->len()
     i := 0
 
     memory := mem.alloc(30000)
@@ -46,4 +48,4 @@ func main[] : i64
 
         i += 1
 
-    mem.free(memory)
+    memory->free()

examples/chip8.zr

@@ -1,4 +1,7 @@
 // needs to be compiled with -m -C "-lraylib"
+include "$/io.zr"
+include "$/os.zr"
+
 extern InitWindow
 extern SetTargetFPS
 extern WindowShouldClose
@@ -21,8 +24,7 @@ struct CHIP8
     display: ptr
     keyboard_map: Array
 
-func chip8_create[] : CHIP8
+func CHIP8.init[c: CHIP8] : void
-    c := new* CHIP8
     c->memory = mem.alloc(4096)
     mem.zero(c->memory, 4096)
     c->display = mem.alloc(64*32)
@@ -35,26 +37,24 @@ func chip8_create[] : CHIP8
 
     fonts := [0xf0, 0x90, 0x90, 0x90, 0xf0, 0x20, 0x60, 0x20, 0x20, 0x70, 0xf0, 0x10, 0xf0, 0x80, 0xf0, 0xf0, 0x10, 0xf0, 0x10, 0xf0, 0x90, 0x90, 0xf0, 0x10, 0x10, 0xf0, 0x80, 0xf0, 0x10, 0xf0, 0xf0, 0x80, 0xf0, 0x90, 0xf0, 0xf0, 0x10, 0x20, 0x40, 0x40, 0xf0, 0x90, 0xf0, 0x90, 0xf0, 0xf0, 0x90, 0xf0, 0x10, 0xf0, 0xf0, 0x90, 0xf0, 0x90, 0x90, 0xe0, 0x90, 0xe0, 0x90, 0xe0, 0xf0, 0x80, 0x80, 0x80, 0xf0, 0xe0, 0x90, 0x90, 0x90, 0xe0, 0xf0, 0x80, 0xf0, 0x80, 0xf0, 0xf0, 0x80, 0xf0, 0x80, 0x80]
     for i in 0..80
-        c->memory[i] = array.nth(fonts, i)
+        c->memory[i] = fonts->nth(i)
-    array.free(fonts)
+    fonts->free()
 
     c->pc = 0x200
 
     // see KeyboardKey in raylib.h
     c->keyboard_map = [49, 50, 51, 52, 53, 265, 32, 263, 264, 262, 87, 69, 82, 84, 89, 85]
 
-    return c
+func CHIP8.free[c: CHIP8] : void
+    c->memory->free()
+    c->stack->free()
+    c->reg->free()
+    c->keyboard->free()
+    c->display->free()
+    c->keyboard_map->free()
+    (c as ptr)->free()
 
-func chip8_free[c: CHIP8] : void
+func CHIP8.disassemble[c: CHIP8, ins_count: i64] : void
-    mem.free(c->memory)
-    array.free(c->stack)
-    mem.free(c->reg)
-    array.free(c->keyboard)
-    mem.free(c->display)
-    array.free(c->keyboard_map)
-    mem.free(c)
-
-func chip8_disassemble[c: CHIP8, ins_count: i64] : void
     for i in 0..ins_count
         io.printf("0x%x: ", c->pc)
 
@@ -153,7 +153,7 @@ func chip8_disassemble[c: CHIP8, ins_count: i64] : void
         else
             io.printf("??? (%x)\n", ins)
 
-func chip8_step[c: CHIP8] : void
+func CHIP8.step[c: CHIP8] : void
     high := c->memory[c->pc] as i64
     low := c->memory[c->pc + 1] as i64
     c->pc += 2
@@ -170,13 +170,13 @@ func chip8_step[c: CHIP8] : void
         if nnn == 0x0e0
             mem.zero(c->display, 64 * 32)
         else if nnn == 0x0ee
-            c->pc = array.nth(c->stack, c->sp)
+            c->pc = c->stack->nth(c->sp)
             c->sp = c->sp - 1
     else if op == 0x1
         c->pc = nnn
     else if op == 0x2
         c->sp += 1
-        array.set(c->stack, c->sp, c->pc)
+        c->stack->set(c->sp, c->pc)
         c->pc = nnn
     else if op == 0x3
         if c->reg[x] == kk
@@ -224,7 +224,7 @@ func chip8_step[c: CHIP8] : void
     else if op == 0xb
         c->pc = nnn + c->reg[0]
     else if op == 0xc
-        c->reg[x] = (math.abs(os.urandom_i64()) % 256) & kk
+        c->reg[x] = (os.urandom_i64()->abs() % 256) & kk
     else if op == 0xd
         c->reg[0xf] = 0
         for row in 0..n
@@ -239,10 +239,10 @@ func chip8_step[c: CHIP8] : void
                     c->display[offset] = c->display[offset] ^ 1
     else if op == 0xe
         if kk == 0x9e
-            if IsKeyDown(array.nth(c->keyboard_map, c->reg[x] as i64))
+            if IsKeyDown(c->keyboard_map->nth(c->reg[x] as i64))
                 c->pc += 2
         else if kk == 0xa1
-            if !IsKeyDown(array.nth(c->keyboard_map, c->reg[x] as i64))
+            if !IsKeyDown(c->keyboard_map->nth(c->reg[x] as i64))
                 c->pc += 2
     else if op == 0xf
         if kk == 0x07
@@ -251,7 +251,7 @@ func chip8_step[c: CHIP8] : void
             key_pressed := false
             while !key_pressed && !WindowShouldClose()
                 for i in 0..16
-                    if IsKeyDown(array.nth(c->keyboard_map, i))
+                    if IsKeyDown(c->keyboard_map->nth(i))
                         key_pressed = true
                         break
         else if kk == 0x15
@@ -278,8 +278,8 @@ func main[argc: i64, argv: ptr] : i64
     disassemble := false
 
     for i in 1..argc
-        arg := mem.read64(argv + i * 8) as str
+        arg := os.arg(argv, i)
-        if str.equal(arg, "-d")
+        if arg->equal("-d")
             disassemble = true
         else
             path = arg
@@ -288,9 +288,10 @@ func main[argc: i64, argv: ptr] : i64
         io.println("Usage: chip8 -d <path>")
         return 1
     
-    c := chip8_create()
+    c := new CHIP8
+    c->init()
 
-    ~buffer, ok := io.read_binary_file(path)
+    buffer, ok := io.read_binary_file(path)
     if !ok
         panic("failed to read file")
 
@@ -298,7 +299,7 @@ func main[argc: i64, argv: ptr] : i64
         c->memory[0x200 + i] = buffer->data[i]
 
     if disassemble
-        chip8_disassemble(c, buffer->size / 2)
+        c->disassemble(buffer->size / 2)
         return 0
     
     InitWindow(640, 320, "CHIP-8")
@@ -312,7 +313,7 @@ func main[argc: i64, argv: ptr] : i64
             // TODO: buzzer
         
         for i in 0..25
-            chip8_step(c)
+            c->step()
         
         BeginDrawing()
 

examples/curl.zr

@@ -1,19 +1,22 @@
+include "$/io.zr"
+include "$/net.zr"
+
 func main[argc: i64, argv: ptr] : i64
     if argc < 2
         io.println("ERROR: url is missing")
         return 1
 
-    url := mem.read64(argv + 8) as str
+    url := os.arg(argv, 1)
 
-    if str.len(url) <= 7
+    if url->len() <= 7
         io.println("ERROR: invalid url (Did you forget \"http://\"?)")
         return 1
 
-    if !str.equal(str.substr(url, 0, 7), "http://")
+    if !url->substr_n(0, 7)->equal("http://")
         io.println("ERROR: only http scheme is supported")
         return 1
     
-    url_len := str.len(url)
+    url_len := url->len()
     host_start := 7
     i := host_start
     while i < url_len
@@ -21,27 +24,19 @@ func main[argc: i64, argv: ptr] : i64
             break
         i += 1
 
-    host := str.substr(url, host_start, i - host_start)
+    host := url->substr_n(host_start, i - host_start)
     path := "/"
     if i < url_len
-        path = str.substr(url, i, url_len - i)
+        path = url->substr_n(i, url_len - i)
     
-    ~addr, ok := net.resolve(host)
+    s, ok := net.connect(host, 80)
-    if !ok
-        panic("failed to resolve host")
-
-    ~s, ok := net.connect(addr, 80)
     if !ok
         panic("failed to connect")
 
-    req := new str.Builder
+    // seems reasonable
-    str.Builder.append(req, "GET ")
+    req := _stackalloc(4096) as str
-    str.Builder.append(req, path)
+    req_size := req->format_into(4096, "GET %s HTTP/1.0\r\nHost: %s\r\nConnection: close\r\n\r\n", path, host)
-    str.Builder.append(req, " HTTP/1.0\r\nHost: ")
+    net.send(s, req as ptr, req_size)
-    str.Builder.append(req, host)
-    str.Builder.append(req, "\r\nConnection: close\r\n\r\n")
-    net.send(s, req->data, req->size)
-    mem.free(req->data)
 
     header_buf := mem.alloc(8192) as str
     header_size := 0
@@ -64,7 +59,7 @@ func main[argc: i64, argv: ptr] : i64
 
     if end_index < header_size
         io.print_sized(header_buf as ptr + end_index, header_size as i64 - end_index)
-    mem.free(header_buf)
+    header_buf->free()
 
     buffer := mem.alloc(4096)
     while true
@@ -72,6 +67,6 @@ func main[argc: i64, argv: ptr] : i64
         if n <= 0
             break
         io.print_sized(buffer, n)
-    mem.free(buffer)
+    buffer->free()
 
     net.close(s)

examples/euler/euler_00.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     sum := 0
 

examples/euler/euler_01.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     sum := 0
 

examples/euler/euler_02.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     sum := 0
     a := 0

examples/euler/euler_03.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     n := 600851475143
     f := 2

examples/euler/euler_04.zr

@@ -0,0 +1,15 @@
+include "$/io.zr"
+
+func main[] : i64
+    out := 0
+
+    for a in 500..1000
+        for b in 500..1000
+            if a * b > out
+                s := (a * b)->to_str()
+                s_rev := s->reverse()
+                if s->equal(s_rev)
+                    out = a * b
+                s->free()
+                s_rev->free()
+    io.println_i64(out)

examples/euler/euler_05.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     out := 1
 

examples/euler/euler_06.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     sum_of_squares := 0
     for i in 1..101

examples/euler/euler_07.zr

@@ -1,9 +1,11 @@
+include "$/io.zr"
+
 func main[] : i64
     found := 0
 
     i := 1
     while true
-        if math.is_prime(i)
+        if i->is_prime()
             found += 1
             if found == 10001
                 io.println_i64(i)

examples/euler/euler_08.zr

@@ -1,8 +1,10 @@
+include "$/io.zr"
+
 func main[] : i64
     n := "7316717653133062491922511967442657474235534919493496983520312774506326239578318016984801869478851843858615607891129494954595017379583319528532088055111254069874715852386305071569329096329522744304355766896648950445244523161731856403098711121722383113622298934233803081353362766142828064444866452387493035890729629049156044077239071381051585930796086670172427121883998797908792274921901699720888093776657273330010533678812202354218097512545405947522435258490771167055601360483958644670632441572215539753697817977846174064955149290862569321978468622482839722413756570560574902614079729686524145351004748216637048440319989000889524345065854122758866688116427171479924442928230863465674813919123162824586178664583591245665294765456828489128831426076900422421902267105562632111110937054421750694165896040807198403850962455444362981230987879927244284909188845801561660979191338754992005240636899125607176060588611646710940507754100225698315520005593572972571636269561882670428252483600823257530420752963450"
 
     out := 0
-    max := str.len(n) - 13
+    max := n->len() - 13
     for i in 0..max
         s := 1
         j := 0

examples/euler/euler_09.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     for a in 1..1000
         for b in 1..1000

examples/euler/euler_10.zr

@@ -1,7 +1,9 @@
+include "$/io.zr"
+
 func main[] : i64
     sum := 0
 
     for i in 0..2000000
-        if math.is_prime(i)
+        if i->is_prime()
             sum += i
     io.println_i64(sum)

examples/euler/euler_11.zr

@@ -0,0 +1,39 @@
+include "$/io.zr"
+include "$/containers.zr"
+
+func main[] : i64
+    N := 20
+
+    grid := []
+    grid->push([8, 2, 22, 97, 38, 15, 0, 40, 0, 75, 4, 5, 7, 78, 52, 12, 50, 77, 91, 8])
+    grid->push([49, 49, 99, 40, 17, 81, 18, 57, 60, 87, 17, 40, 98, 43, 69, 48, 4, 56, 62, 0])
+    grid->push([81, 49, 31, 73, 55, 79, 14, 29, 93, 71, 40, 67, 53, 88, 30, 3, 49, 13, 36, 65])
+    grid->push([52, 70, 95, 23, 4, 60, 11, 42, 69, 24, 68, 56, 1, 32, 56, 71, 37, 2, 36, 91])
+    grid->push([22, 31, 16, 71, 51, 67, 63, 89, 41, 92, 36, 54, 22, 40, 40, 28, 66, 33, 13, 80])
+    grid->push([24, 47, 32, 60, 99, 3, 45, 2, 44, 75, 33, 53, 78, 36, 84, 20, 35, 17, 12, 50])
+    grid->push([32, 98, 81, 28, 64, 23, 67, 10, 26, 38, 40, 67, 59, 54, 70, 66, 18, 38, 64, 70])
+    grid->push([67, 26, 20, 68, 2, 62, 12, 20, 95, 63, 94, 39, 63, 8, 40, 91, 66, 49, 94, 21])
+    grid->push([24, 55, 58, 5, 66, 73, 99, 26, 97, 17, 78, 78, 96, 83, 14, 88, 34, 89, 63, 72])
+    grid->push([21, 36, 23, 9, 75, 0, 76, 44, 20, 45, 35, 14, 0, 61, 33, 97, 34, 31, 33, 95])
+    grid->push([78, 17, 53, 28, 22, 75, 31, 67, 15, 94, 3, 80, 4, 62, 16, 14, 9, 53, 56, 92])
+    grid->push([16, 39, 5, 42, 96, 35, 31, 47, 55, 58, 88, 24, 0, 17, 54, 24, 36, 29, 85, 57])
+    grid->push([86, 56, 0, 48, 35, 71, 89, 7, 5, 44, 44, 37, 44, 60, 21, 58, 51, 54, 17, 58])
+    grid->push([19, 80, 81, 68, 5, 94, 47, 69, 28, 73, 92, 13, 86, 52, 17, 77, 4, 89, 55, 40])
+    grid->push([4, 52, 8, 83, 97, 35, 99, 16, 7, 97, 57, 32, 16, 26, 26, 79, 33, 27, 98, 66])
+    grid->push([88, 36, 68, 87, 57, 62, 20, 72, 3, 46, 33, 67, 46, 55, 12, 32, 63, 93, 53, 69])
+    grid->push([4, 42, 16, 73, 38, 25, 39, 11, 24, 94, 72, 18, 8, 46, 29, 32, 40, 62, 76, 36])
+    grid->push([20, 69, 36, 41, 72, 30, 23, 88, 34, 62, 99, 69, 82, 67, 59, 85, 74, 4, 36, 16])
+    grid->push([20, 73, 35, 29, 78, 31, 90, 1, 74, 31, 49, 71, 48, 86, 81, 16, 23, 57, 5, 54])
+    grid->push([1, 70, 54, 71, 83, 51, 54, 69, 16, 92, 33, 48, 61, 43, 52, 1, 89, 19, 67, 48])
+
+    out := 0
+
+    for i in 0..N-3
+        for j in 0..N-3
+            h  : i64 = (grid->nth(i) as Array)->nth(j) * (grid->nth(i) as Array)->nth(j+1) * (grid->nth(i) as Array)->nth(j+2) * (grid->nth(i) as Array)->nth(j+3)
+            v  : i64 = (grid->nth(j) as Array)->nth(i) * (grid->nth(j+1) as Array)->nth(i) * (grid->nth(j+2) as Array)->nth(i) * (grid->nth(j+3) as Array)->nth(i)
+            d1 : i64 = (grid->nth(i) as Array)->nth(j) * (grid->nth(i+1) as Array)->nth(j+1) * (grid->nth(i+2) as Array)->nth(j+2) * (grid->nth(i+3) as Array)->nth(j+3)
+            d2 : i64 = (grid->nth(i) as Array)->nth(N-j-1) * (grid->nth(i+1) as Array)->nth(N-j-2) * (grid->nth(i+2) as Array)->nth(N-j-3) * (grid->nth(i+3) as Array)->nth(N-j-4)
+            out = math.max(out, math.max(h, math.max(v, math.max(d1, d2))))
+
+    io.println_i64(out)

examples/euler/euler_12.zr

@@ -1,5 +1,7 @@
+include "$/io.zr"
+
 func num_divisors[n: i64] : i64
-    end := math.isqrt(n)
+    end := n->isqrt()
 
     out := 0
     for i in 1..end+1

examples/euler/euler_13.zr

@@ -0,0 +1,5 @@
+include "$/io.zr"
+
+func main[] : i64
+    n := 37107287533 + 46376937677 + 74324986199 + 91942213363 + 23067588207 + 89261670696 + 28112879812 + 44274228917 + 47451445736 + 70386486105 + 62176457141 + 64906352462 + 92575867718 + 58203565325 + 80181199384 + 35398664372 + 86515506006 + 71693888707 + 54370070576 + 53282654108 + 36123272525 + 45876576172 + 17423706905 + 81142660418 + 51934325451 + 62467221648 + 15732444386 + 55037687525 + 18336384825 + 80386287592 + 78182833757 + 16726320100 + 48403098129 + 87086987551 + 59959406895 + 69793950679 + 41052684708 + 65378607361 + 35829035317 + 94953759765 + 88902802571 + 25267680276 + 36270218540 + 24074486908 + 91430288197 + 34413065578 + 23053081172 + 11487696932 + 63783299490 + 67720186971 + 95548255300 + 76085327132 + 37774242535 + 23701913275 + 29798860272 + 18495701454 + 38298203783 + 34829543829 + 40957953066 + 29746152185 + 41698116222 + 62467957194 + 23189706772 + 86188088225 + 11306739708 + 82959174767 + 97623331044 + 42846280183 + 55121603546 + 32238195734 + 75506164965 + 62177842752 + 32924185707 + 99518671430 + 73267460800 + 76841822524 + 97142617910 + 87783646182 + 10848802521 + 71329612474 + 62184073572 + 66627891981 + 60661826293 + 85786944089 + 66024396409 + 64913982680 + 16730939319 + 94809377245 + 78639167021 + 15368713711 + 40789923115 + 44889911501 + 41503128880 + 81234880673 + 82616570773 + 22918802058 + 77158542502 + 72107838435 + 20849603980 + 53503534226
+    io.println(n->to_str()->substr_n(0, 10))

examples/euler/euler_14.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func collatz_num[n: i64] : i64
     if n % 2 == 0
         return n / 2

examples/euler/euler_15.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     n := 40
     r := 20

examples/euler/euler_16.zr

@@ -1,19 +1,21 @@
+include "$/io.zr"
+include "$/containers.zr"
+
 func main[] : i64
-    n := []
+    n := [1]
-    array.push(n, 1)
 
     for j in 0..1000
         carry := 0
         for i in 0..n->size
-            tmp : i64 = array.nth(n, i) * 2 + carry
+            tmp : i64 = n->nth(i) * 2 + carry
-            array.set(n, i, tmp % 10)
+            n->set(i, tmp % 10)
             carry = tmp / 10
         while carry > 0
-            array.push(n, carry % 10)
+            n->push(carry % 10)
             carry = carry / 10
     
     sum := 0
     for i in 0..n->size
-        sum += array.nth(n, i)
+        sum += n->nth(i)
 
     io.println_i64(sum)

examples/euler/euler_17.zr

@@ -0,0 +1,29 @@
+include "$/io.zr"
+include "$/containers.zr"
+
+func main[] : i64
+    s1 := [0, 3, 3, 5, 4, 4, 3, 5, 5, 4]
+    s2 := [3, 6, 6, 8, 8, 7, 7, 9, 8, 8]
+    s3 := [0, 0, 6, 6, 5, 5, 5, 7, 6, 6]
+
+    sum := 0
+
+    for i in 1..10
+        sum += s1->nth(i)
+    for i in 0..10
+        sum += s2->nth(i)
+    for i in 20..100
+        sum += s3->nth(i / 10) + s1->nth(i % 10)
+
+    for i in 1..10
+        sum += s1->nth(i) + 7
+        for j in 1..10
+            sum += s1->nth(i) + 7 + 3 + s1->nth(j)
+        for j in 0..10
+            sum += s1->nth(i) + 7 + 3 + s2->nth(j)
+        for j in 20..100
+            sum += s1->nth(i) + 7 + 3 + s3->nth(j / 10) + s1->nth(j % 10)
+    
+    sum += s1->nth(1) + 8
+
+    io.println_i64(sum)

examples/euler/euler_18.zr

@@ -0,0 +1,31 @@
+include "$/io.zr"
+include "$/containers.zr"
+
+func findmax[triangle: Array, row: i64, col: i64] : i64
+    if row == 14
+        return (triangle->nth(row) as Array)->nth(col)
+
+    left := findmax(triangle, row + 1, col)
+    right := findmax(triangle, row + 1, col + 1)
+
+    return (triangle->nth(row) as Array)->nth(col) + math.max(left, right)
+
+func main[] : i64
+    triangle := []
+    triangle->push([75])
+    triangle->push([95, 64])
+    triangle->push([17, 47, 82])
+    triangle->push([18, 35, 87, 10])
+    triangle->push([20, 4, 82, 47, 65])
+    triangle->push([19, 1, 23, 75, 3, 34])
+    triangle->push([88, 2, 77, 73, 7, 63, 67])
+    triangle->push([99, 65, 4, 28, 6, 16, 70, 92])
+    triangle->push([41, 41, 26, 56, 83, 40, 80, 70, 33])
+    triangle->push([41, 48, 72, 33, 47, 32, 37, 16, 94, 29])
+    triangle->push([53, 71, 44, 65, 25, 43, 91, 52, 97, 51, 14])
+    triangle->push([70, 11, 33, 28, 77, 73, 17, 78, 39, 68, 17, 57])
+    triangle->push([91, 71, 52, 38, 17, 14, 91, 43, 58, 50, 27, 29, 48])
+    triangle->push([63, 66, 4, 68, 89, 53, 67, 30, 73, 16, 69, 87, 40, 31])
+    triangle->push([4, 62, 98, 27, 23, 9, 70, 98, 73, 93, 38, 53, 60, 4, 23])
+
+    io.println_i64(findmax(triangle, 0, 0))

examples/euler/euler_19.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func days[y: i64, m: i64] : i64
     if m == 2
         if (((y % 4 == 0) && (y % 100 != 0)) || (y % 400 == 0))

examples/euler/euler_20.zr

@@ -1,11 +1,14 @@
+include "$/io.zr"
+include "$/containers.zr"
+
 func multiply[n: Array, x: i64] : void
     carry := 0
     for i in 0..n->size
-        prod : i64 = array.nth(n, i) * x + carry
+        prod : i64 = n->nth(i) * x + carry
-        array.set(n, i, prod % 10)
+        n->set(i, prod % 10)
         carry = prod / 10
     while carry > 0
-        array.push(n, carry % 10)
+        n->push(carry % 10)
         carry = carry / 10
 
 func main[] : i64
@@ -16,6 +19,6 @@ func main[] : i64
 
     sum := 0
     for i in 0..n->size
-        sum += array.nth(n, i)
+        sum += n->nth(i)
     
     io.println_i64(sum)

examples/euler/euler_21.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func divisors_sum[n: i64] : i64
     k := n
     sum := 1

examples/fib.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     a := 0
     b := 1

examples/fizzbuzz.zr

@@ -1,3 +1,5 @@
+include "$/io.zr"
+
 func main[] : i64
     for i in 1..40
         if i % 15 == 0

examples/functional.zr

@@ -1,11 +0,0 @@
-func square[x: i64] : i64
-    return x * x
-
-func sum[a: i64, b: i64] : i64
-    return a + b
-
-func main[] : i64
-    [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13]
-    |> alg.map(^square)
-    |> alg.reduce(^sum, 0)
-    |> io.println_i64()

examples/guess_number.zr

@@ -1,9 +1,12 @@
+include "$/io.zr"
+include "$/os.zr"
+
 func main[] : i64
-    answer := math.abs(os.urandom_i64()) % 100
+    answer := os.urandom_i64()->abs() % 100
 
     while true
         io.println("Guess a number: ")
-        guess := io.read_line() |> str.trim() |> str.parse_i64()
+        guess := io.read_line()->parse_i64()
 
         if guess == answer
             io.println("You win!")

examples/hello.zr

@@ -1,2 +0,0 @@
-func main[] : i64
-    io.println("Hello, World!")

examples/puzzles/aoc2024_01.zr

@@ -1,39 +0,0 @@
-func part1[l1: Array, l2: Array] : void
-    out := 0
-    
-    for i in 0..l1->size
-        out += math.abs(array.nth(l1, i) - array.nth(l2, i))
-
-    io.println_i64(out)
-
-func part2[l1: Array, l2: Array] : void
-    out := 0
-
-    for i in 0..l1->size
-        out += array.nth(l1, i) * alg.count(l2, array.nth(l1, i))
-
-    io.println_i64(out)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    lines := str.split(input, "\n")
-
-    l1 := []
-    l2 := []
-
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-        
-        parts := str.split(line, "   ")
-
-        array.push(l1, str.parse_i64(array.nth(parts, 0)))
-        array.push(l2, str.parse_i64(array.nth(parts, 1)))
-
-    alg.quicksort(l1)
-    alg.quicksort(l2)
-
-    part1(l1, l2)
-    part2(l1, l2)

examples/puzzles/aoc2024_02.zr

@@ -1,59 +0,0 @@
-func check[report: Array] : bool
-    increasing := array.nth(report, 0) < array.nth(report, 1)
-
-    for i in 0..report->size-1
-        if array.nth(report, i) > array.nth(report, i + 1) && increasing
-            return false
-        if array.nth(report, i) < array.nth(report, i + 1) && !increasing
-            return false
-
-        diff := math.abs(array.nth(report, i) - array.nth(report, i + 1))
-        if diff < 1 || diff > 3
-            return false
-
-    return true
-
-func part1[data: Array] : void
-    out := 0
-
-    for i in 0..data->size
-        if check(array.nth(data, i))
-            out += 1
-
-    io.println_i64(out)
-
-func part2[data: Array] : void
-    out := 0
-
-    for i in 0..data->size
-        if check(array.nth(data, i))
-            out += 1
-        else
-            arr : Array = array.nth(data, i)
-            for j in 0..arr->size
-                sliced := array.concat(array.slice(arr, 0, j), array.slice(arr, j + 1, arr->size - (j + 1)))
-                
-                if check(sliced)
-                    out += 1
-                    break
-
-    io.println_i64(out)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    lines := str.split(input, "\n")
-
-    data := []
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-
-        report := str.split(line, " ")
-        for i in 0..report->size
-            array.set(report, i, str.parse_i64(array.nth(report, i)))
-        array.push(data, report)
-
-    part1(data)
-    part2(data)

examples/puzzles/aoc2024_04.zr

@@ -1,66 +0,0 @@
-func check[lines: Array, x: i64, y: i64, dx: i64, dy: i64] : bool
-    if x + dx * 3 < 0 || x + dx * 3 >= lines->size || y + dy * 3 < 0 || y + dy * 3 >= str.len(array.nth(lines, 0))
-        return false
-    
-    if array.nth(lines, x)[y] != 'X'
-        return false
-    if array.nth(lines, x + dx)[y + dy] != 'M'
-        return false
-    if array.nth(lines, x + dx * 2)[y + dy * 2] != 'A'
-        return false
-    if array.nth(lines, x + dx * 3)[y + dy * 3] != 'S'
-        return false
-    
-    return true
-
-func part1[lines: Array] : void
-    out := 0
-
-    for x in 0..lines->size
-        for y in 0..str.len(array.nth(lines, x))
-            if check(lines, x, y, 0, 1)
-                out += 1
-            if check(lines, x, y, 0, -1)
-                out += 1
-            if check(lines, x, y, 1, 0)
-                out += 1
-            if check(lines, x, y, -1, 0)
-                out += 1
-            if check(lines, x, y, 1, 1)
-                out += 1
-            if check(lines, x, y, -1, -1)
-                out += 1
-            if check(lines, x, y, 1, -1)
-                out += 1
-            if check(lines, x, y, -1, 1)
-                out += 1
-
-    io.println_i64(out)
-
-func part2[lines: Array] : void
-    out := 0
-    s := _stackalloc(5) as str
-
-    for x in 1..lines->size-1
-        for y in 1..str.len(array.nth(lines, x))-1
-            if array.nth(lines, x)[y] == 'A'
-                s[0] = array.nth(lines, x - 1)[y - 1]
-                s[1] = array.nth(lines, x + 1)[y - 1]
-                s[2] = array.nth(lines, x + 1)[y + 1]
-                s[3] = array.nth(lines, x - 1)[y + 1]
-                s[4] = 0
-
-                if str.equal(s, "MSSM") || str.equal(s, "SMMS") || str.equal(s, "MMSS") || str.equal(s, "SSMM")
-                    out += 1
-
-    io.println_i64(out)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    lines := str.split(input, "\n")
-
-    part1(lines)
-    part2(lines)

examples/puzzles/aoc2024_05.zr

@@ -1,77 +0,0 @@
-func rule_exists[rules_left: Array, rules_right: Array, a: i64, b: i64] : bool
-    for k in 0..rules_left->size
-        if array.nth(rules_left, k) == a && array.nth(rules_right, k) == b
-            return true
-    return false
-
-func check[update: Array, rules_left: Array, rules_right: Array] : bool
-    for i in 0..update->size
-        for j in 0..i
-            if rule_exists(rules_left, rules_right, array.nth(update, i), array.nth(update, j))
-                return false
-    return true
-
-func sort_by_rules[update: Array, rules_left: Array, rules_right: Array] : void
-    swapped := true
-
-    while swapped
-        swapped = false
-        for i in 0..update->size-1
-            a : i64 = array.nth(update, i)
-            b : i64 = array.nth(update, i+1)
-            if rule_exists(rules_left, rules_right, b, a)
-                tmp := a
-                array.set(update, i, b)
-                array.set(update, i+1, tmp)
-                swapped = true
-
-func part1[updates: Array, rules_left: Array, rules_right: Array] : void
-    out := 0
-
-    for i in 0..updates->size
-        update : Array = array.nth(updates, i)
-        if check(update, rules_left, rules_right)
-            out += array.nth(update, update->size / 2)
-
-    io.println_i64(out)
-
-func part2[updates: Array, rules_left: Array, rules_right: Array] : void
-    out := 0
-
-    for i in 0..updates->size
-        update : Array = array.nth(updates, i)
-        if !check(update, rules_left, rules_right)
-            sort_by_rules(update, rules_left, rules_right)
-            out += array.nth(update, update->size / 2)
-
-    io.println_i64(out)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    data := str.split(input, "\n\n")
-
-    rules_left := []
-    rules_right := []
-    rules_lines := str.split(array.nth(data, 0), "\n")
-    for i in 0..rules_lines->size
-        line : str = array.nth(rules_lines, i)
-        parts := str.split(line, "|")
-
-        array.push(rules_left, str.parse_i64(array.nth(parts, 0)))
-        array.push(rules_right, str.parse_i64(array.nth(parts, 1)))
-
-    updates := []
-    updates_lines := str.split(array.nth(data, 1), "\n")
-    for i in 0..updates_lines->size
-        line : str = array.nth(updates_lines, i)
-        xs := str.split(line, ",")
-
-        for i in 0..xs->size
-            array.set(xs, i, str.parse_i64(array.nth(xs, i)))
-        array.push(updates, xs)
-
-    part1(updates, rules_left, rules_right)
-    part2(updates, rules_left, rules_right)

examples/puzzles/aoc2024_07.zr

@@ -1,76 +0,0 @@
-func concat[a: i64, b: i64] : i64
-    ab_str := _stackalloc(50) as str
-    io.snprintf(ab_str, 50, "%d%d", a, b)
-    return str.parse_i64(ab_str)
-
-func solve[ops: Array, e: Array] : i64
-    e_1 : Array = array.nth(e, 1)
-    n := e_1->size - 1
-    indices := []
-    for i in 0..n
-        array.push(indices, 0)
-
-    while true
-        res : i64 = array.nth(e_1, 0)
-        for i in 0..n
-            op : str = array.nth(ops, array.nth(indices, i))
-
-            if str.equal(op, "add")
-                res += array.nth(e_1, i + 1)
-            else if str.equal(op, "mul")
-                res = res * array.nth(e_1, i + 1)
-            else if str.equal(op, "concat")
-                res = concat(res, array.nth(e_1, i + 1))
-        if res == array.nth(e, 0)
-            return res
-
-        done := true
-        i := n - 1
-
-        while i >= 0
-            array.set(indices, i, array.nth(indices, i) + 1)
-            if array.nth(indices, i) < ops->size
-                done = false
-                break
-            array.set(indices, i, 0)
-            i -= 1
-        
-        if done
-            return 0
-
-func part1[equations: Array] : void
-    out := 0
-
-    for i in 0..equations->size
-        out += solve(["add", "mul"], array.nth(equations, i))
-
-    io.println_i64(out)
-
-func part2[equations: Array] : void
-    out := 0
-
-    for i in 0..equations->size
-        out += solve(["add", "mul", "concat"], array.nth(equations, i))
-
-    io.println_i64(out)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    lines := str.split(input, "\n")
-    equations := []
-
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-        parts := str.split(line, ": ")
-
-        xs := str.split(array.nth(parts, 1), " ")
-        for j in 0..xs->size
-            array.set(xs, j, str.parse_i64(array.nth(xs, j)))
-
-        array.push(equations, [str.parse_i64(array.nth(parts, 0)), xs])
-
-    part1(equations)
-    part2(equations)

examples/puzzles/aoc2025_01.zr

@@ -1,57 +0,0 @@
-func part1[lines: Array] : void
-    password := 0
-    dial := 50
-
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-        dir := line[0]
-        n := str.substr(line, 1, str.len(line) - 1) |> str.parse_i64()
-
-        if dir == 'L'
-            dial -= n
-            while dial < 0
-                dial += 100
-        else
-            dial += n
-            while dial >= 100
-                dial -= 100
-
-        if dial == 0
-            password += 1
-    
-    io.println_i64(password)
-
-func part2[lines: Array] : void
-    password := 0
-    dial := 50
-
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-        dir := line[0]
-        n := str.substr(line, 1, str.len(line) - 1) |> str.parse_i64()
-
-        if dir == 'L'
-            for i in 0..n
-                dial -= 1
-                if dial == 0
-                    password += 1
-                if dial == -1
-                    dial = 99
-        else
-            for i in 0..n
-                dial += 1
-                if dial == 100
-                    dial = 0
-                    password += 1
-    
-    io.println_i64(password)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    lines := str.split(input, "\n")
-
-    part1(lines)
-    part2(lines)

examples/puzzles/aoc2025_02.zr

@@ -1,64 +0,0 @@
-func part1_is_invalid_id[s: str] : bool
-    len := str.len(s)
-    if len % 2 != 0
-        return false
-
-    first := str.substr(s, 0, len / 2)
-    second := str.substr(s, len / 2, len / 2)
-
-    return str.equal(first, second)
-
-func part1[ranges: Array] : void
-    sum := 0
-
-    for i in 0..ranges->size
-        parts := array.nth(ranges, i) |> str.split("-")
-        start := array.nth(parts, 0) |> str.parse_i64()
-        end := array.nth(parts, 1) |> str.parse_i64()
-
-        for n in (start)..end+1
-            if part1_is_invalid_id(str.from_i64(n))
-                sum += n
-    
-    io.println_i64(sum)
-
-// had to cheat this one
-func part2_is_invalid_id[s: str] : bool
-    len := str.len(s)
-    if len < 2
-        return false
-    for div in 1..(len / 2 + 1)
-        if len % div == 0
-            u := str.substr(s, 0, div)
-            is_repeat := true
-            for k in 1..(len / div)
-                segment := str.substr(s, k * div, div)
-                if !str.equal(segment, u)
-                    is_repeat = false
-            if is_repeat
-                return true
-    return false
-
-func part2[ranges: Array] : void
-    sum := 0
-
-    for i in 0..ranges->size
-        parts := array.nth(ranges, i) |> str.split("-")
-        start := array.nth(parts, 0) |> str.parse_i64()
-        end := array.nth(parts, 1) |> str.parse_i64()
-
-        for n in (start)..end+1
-            if part2_is_invalid_id(str.from_i64(n))
-                sum += n
-    
-    io.println_i64(sum)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    ranges := str.split(input, ",")
-
-    part1(ranges)
-    part2(ranges)

examples/puzzles/aoc2025_03.zr

@@ -1,55 +0,0 @@
-func part1[lines: Array] : void
-    sum := 0
-    s := _stackalloc(3) as str
-
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-
-        largest := 0
-        for j in 0..str.len(line)
-            for k in (j+1)..str.len(line)
-                s[0] = line[j]
-                s[1] = line[k]
-                s[2] = 0
-                n := str.parse_i64(s)
-                if n > largest
-                    largest = n
-
-        sum += largest
-    io.println_i64(sum)
-
-// had to cheat this one
-func part2_rec[bank: str, start: i64, remaining: i64] : i64
-    largest := 0
-    largest_idx := start
-    len := str.len(bank)
-
-    for i in (start)..(len-remaining+1)
-        v := (bank[i] - '0') as i64
-        if v > largest
-            largest = v
-            largest_idx = i
-
-    if remaining > 1
-        return largest * math.pow(10, remaining - 1) + part2_rec(bank, largest_idx + 1, remaining - 1)
-    else
-        return largest
-
-func part2[lines: Array] : void
-    sum := 0
-
-    for i in 0..lines->size
-        line : str = array.nth(lines, i)
-
-        sum += part2_rec(line, 0, 12)
-    io.println_i64(sum)
-
-func main[] : i64
-    ~input, ok := io.read_text_file("input.txt")
-    if !ok
-        panic("failed to open input.txt")
-    
-    lines := str.split(input, "\n")
-
-    part1(lines)
-    part2(lines)

examples/puzzles/euler_04.zr

@@ -1,13 +0,0 @@
-func main[] : i64
-    out := 0
-
-    for a in 500..1000
-        for b in 500..1000
-            if a * b > out
-                s := str.from_i64(a * b)
-                s_rev := str.reverse(s)
-                if str.equal(s, s_rev)
-                    out = a * b
-                mem.free(s)
-                mem.free(s_rev)
-    io.println_i64(out)

examples/puzzles/euler_11.zr

@@ -1,36 +0,0 @@
-func main[] : i64
-    N := 20
-
-    grid := []
-    array.push(grid, [8, 2, 22, 97, 38, 15, 0, 40, 0, 75, 4, 5, 7, 78, 52, 12, 50, 77, 91, 8])
-    array.push(grid, [49, 49, 99, 40, 17, 81, 18, 57, 60, 87, 17, 40, 98, 43, 69, 48, 4, 56, 62, 0])
-    array.push(grid, [81, 49, 31, 73, 55, 79, 14, 29, 93, 71, 40, 67, 53, 88, 30, 3, 49, 13, 36, 65])
-    array.push(grid, [52, 70, 95, 23, 4, 60, 11, 42, 69, 24, 68, 56, 1, 32, 56, 71, 37, 2, 36, 91])
-    array.push(grid, [22, 31, 16, 71, 51, 67, 63, 89, 41, 92, 36, 54, 22, 40, 40, 28, 66, 33, 13, 80])
-    array.push(grid, [24, 47, 32, 60, 99, 3, 45, 2, 44, 75, 33, 53, 78, 36, 84, 20, 35, 17, 12, 50])
-    array.push(grid, [32, 98, 81, 28, 64, 23, 67, 10, 26, 38, 40, 67, 59, 54, 70, 66, 18, 38, 64, 70])
-    array.push(grid, [67, 26, 20, 68, 2, 62, 12, 20, 95, 63, 94, 39, 63, 8, 40, 91, 66, 49, 94, 21])
-    array.push(grid, [24, 55, 58, 5, 66, 73, 99, 26, 97, 17, 78, 78, 96, 83, 14, 88, 34, 89, 63, 72])
-    array.push(grid, [21, 36, 23, 9, 75, 0, 76, 44, 20, 45, 35, 14, 0, 61, 33, 97, 34, 31, 33, 95])
-    array.push(grid, [78, 17, 53, 28, 22, 75, 31, 67, 15, 94, 3, 80, 4, 62, 16, 14, 9, 53, 56, 92])
-    array.push(grid, [16, 39, 5, 42, 96, 35, 31, 47, 55, 58, 88, 24, 0, 17, 54, 24, 36, 29, 85, 57])
-    array.push(grid, [86, 56, 0, 48, 35, 71, 89, 7, 5, 44, 44, 37, 44, 60, 21, 58, 51, 54, 17, 58])
-    array.push(grid, [19, 80, 81, 68, 5, 94, 47, 69, 28, 73, 92, 13, 86, 52, 17, 77, 4, 89, 55, 40])
-    array.push(grid, [4, 52, 8, 83, 97, 35, 99, 16, 7, 97, 57, 32, 16, 26, 26, 79, 33, 27, 98, 66])
-    array.push(grid, [88, 36, 68, 87, 57, 62, 20, 72, 3, 46, 33, 67, 46, 55, 12, 32, 63, 93, 53, 69])
-    array.push(grid, [4, 42, 16, 73, 38, 25, 39, 11, 24, 94, 72, 18, 8, 46, 29, 32, 40, 62, 76, 36])
-    array.push(grid, [20, 69, 36, 41, 72, 30, 23, 88, 34, 62, 99, 69, 82, 67, 59, 85, 74, 4, 36, 16])
-    array.push(grid, [20, 73, 35, 29, 78, 31, 90, 1, 74, 31, 49, 71, 48, 86, 81, 16, 23, 57, 5, 54])
-    array.push(grid, [1, 70, 54, 71, 83, 51, 54, 69, 16, 92, 33, 48, 61, 43, 52, 1, 89, 19, 67, 48])
-
-    out := 0
-
-    for i in 0..N-3
-        for j in 0..N-3
-            h : i64 = array.nth(array.nth(grid, i), j) * array.nth(array.nth(grid, i), j+1) * array.nth(array.nth(grid, i), j+2) * array.nth(array.nth(grid, i), j+3)
-            v : i64 = array.nth(array.nth(grid, j), i) * array.nth(array.nth(grid, j+1), i) * array.nth(array.nth(grid, j+2), i) * array.nth(array.nth(grid, j+3), i)
-            d1 : i64 = array.nth(array.nth(grid, i), j) * array.nth(array.nth(grid, i+1), j+1) * array.nth(array.nth(grid, i+2), j+2) * array.nth(array.nth(grid, i+3), j+3)
-            d2 : i64 = array.nth(array.nth(grid, i), N-j-1) * array.nth(array.nth(grid, i+1), N-j-2) * array.nth(array.nth(grid, i+2), N-j-3) * array.nth(array.nth(grid, i+3), N-j-4)
-            out = math.max(out, math.max(h, math.max(v, math.max(d1, d2))))
-
-    io.println_i64(out)

examples/puzzles/euler_13.zr

@@ -1,6 +0,0 @@
-func main[] : i64
-    // leaks a bit of memory but looks very cool
-    37107287533 + 46376937677 + 74324986199 + 91942213363 + 23067588207 + 89261670696 + 28112879812 + 44274228917 + 47451445736 + 70386486105 + 62176457141 + 64906352462 + 92575867718 + 58203565325 + 80181199384 + 35398664372 + 86515506006 + 71693888707 + 54370070576 + 53282654108 + 36123272525 + 45876576172 + 17423706905 + 81142660418 + 51934325451 + 62467221648 + 15732444386 + 55037687525 + 18336384825 + 80386287592 + 78182833757 + 16726320100 + 48403098129 + 87086987551 + 59959406895 + 69793950679 + 41052684708 + 65378607361 + 35829035317 + 94953759765 + 88902802571 + 25267680276 + 36270218540 + 24074486908 + 91430288197 + 34413065578 + 23053081172 + 11487696932 + 63783299490 + 67720186971 + 95548255300 + 76085327132 + 37774242535 + 23701913275 + 29798860272 + 18495701454 + 38298203783 + 34829543829 + 40957953066 + 29746152185 + 41698116222 + 62467957194 + 23189706772 + 86188088225 + 11306739708 + 82959174767 + 97623331044 + 42846280183 + 55121603546 + 32238195734 + 75506164965 + 62177842752 + 32924185707 + 99518671430 + 73267460800 + 76841822524 + 97142617910 + 87783646182 + 10848802521 + 71329612474 + 62184073572 + 66627891981 + 60661826293 + 85786944089 + 66024396409 + 64913982680 + 16730939319 + 94809377245 + 78639167021 + 15368713711 + 40789923115 + 44889911501 + 41503128880 + 81234880673 + 82616570773 + 22918802058 + 77158542502 + 72107838435 + 20849603980 + 53503534226
-    |> str.from_i64()
-    |> str.substr(0, 10)
-    |> io.println()

examples/puzzles/euler_17.zr

@@ -1,26 +0,0 @@
-func main[] : i64
-    s1 := [0, 3, 3, 5, 4, 4, 3, 5, 5, 4]
-    s2 := [3, 6, 6, 8, 8, 7, 7, 9, 8, 8]
-    s3 := [0, 0, 6, 6, 5, 5, 5, 7, 6, 6]
-
-    sum := 0
-
-    for i in 1..10
-        sum += array.nth(s1, i)
-    for i in 0..10
-        sum += array.nth(s2, i)
-    for i in 20..100
-        sum += array.nth(s3, i / 10) + array.nth(s1, i % 10)
-
-    for i in 1..10
-        sum += array.nth(s1, i) + 7
-        for j in 1..10
-            sum += array.nth(s1, i) + 7 + 3 + array.nth(s1, j)
-        for j in 0..10
-            sum += array.nth(s1, i) + 7 + 3 + array.nth(s2, j)
-        for j in 20..100
-            sum += array.nth(s1, i) + 7 + 3 + array.nth(s3, j / 10) + array.nth(s1, j % 10)
-    
-    sum += array.nth(s1, 1) + 8
-
-    io.println_i64(sum)

examples/puzzles/euler_18.zr

@@ -1,28 +0,0 @@
-func findmax[triangle: Array, row: i64, col: i64] : i64
-    if row == 14
-        return array.nth(array.nth(triangle, row), col)
-
-    left := findmax(triangle, row + 1, col)
-    right := findmax(triangle, row + 1, col + 1)
-
-    return array.nth(array.nth(triangle, row), col) + math.max(left, right)
-
-func main[] : i64
-    triangle := []
-    array.push(triangle, [75])
-    array.push(triangle, [95, 64])
-    array.push(triangle, [17, 47, 82])
-    array.push(triangle, [18, 35, 87, 10])
-    array.push(triangle, [20, 4, 82, 47, 65])
-    array.push(triangle, [19, 1, 23, 75, 3, 34])
-    array.push(triangle, [88, 2, 77, 73, 7, 63, 67])
-    array.push(triangle, [99, 65, 4, 28, 6, 16, 70, 92])
-    array.push(triangle, [41, 41, 26, 56, 83, 40, 80, 70, 33])
-    array.push(triangle, [41, 48, 72, 33, 47, 32, 37, 16, 94, 29])
-    array.push(triangle, [53, 71, 44, 65, 25, 43, 91, 52, 97, 51, 14])
-    array.push(triangle, [70, 11, 33, 28, 77, 73, 17, 78, 39, 68, 17, 57])
-    array.push(triangle, [91, 71, 52, 38, 17, 14, 91, 43, 58, 50, 27, 29, 48])
-    array.push(triangle, [63, 66, 4, 68, 89, 53, 67, 30, 73, 16, 69, 87, 40, 31])
-    array.push(triangle, [4, 62, 98, 27, 23, 9, 70, 98, 73, 93, 38, 53, 60, 4, 23])
-
-    io.println_i64(findmax(triangle, 0, 0))

examples/quicksort.zr

@@ -1,15 +0,0 @@
-func main[] : i64
-    arr := []
-    for i in 0..10
-        array.push(arr, math.abs(os.urandom_i64()) % 1000)
-
-    for i in 0..arr->size
-        io.println_i64(array.nth(arr, i))
-    io.println("------------")
-
-    alg.quicksort(arr)
-
-    for i in 0..arr->size
-        io.println_i64(array.nth(arr, i))
-
-    array.free(arr)

examples/raylib.zr

@@ -1,4 +1,6 @@
 // needs to be compiled with -m -C "-lraylib"
+include "$/io.zr"
+
 extern InitWindow
 extern SetTargetFPS
 extern WindowShouldClose

examples/rule110.zr

@@ -1,23 +1,26 @@
+include "$/io.zr"
+include "$/containers.zr"
+
 func rule110_step[state: Array] : void
     new_state := []
 
     for i in 0..state->size
         left := false
         if i - 1 >= 0
-            left = array.nth(state, i - 1)
+            left = state->nth(i - 1)
-        center : bool = array.nth(state, i)
+        center : bool = state->nth(i)
         right := false
         if i + 1 < state->size
-            right = array.nth(state, i + 1)
+            right = state->nth(i + 1)
 
-        array.push(new_state, !((!left && !center && !right) || (left && !center && !right) || (left && center && right)))
+        new_state->push(!((!left && !center && !right) || (left && !center && !right) || (left && center && right)))
 
     mem.copy(new_state->data, state->data, state->size * 8)
-    array.free(new_state)
+    new_state->free()
 
 func print_state[state: Array]: void
     for i in 0..state->size
-        if array.nth(state, i)
+        if state->nth(i)
             io.print_char('#')
         else
             io.print_char(' ')
@@ -28,12 +31,12 @@ func main[] : i64
 
     state := []
     for i in 0..SIZE
-        array.push(state, false)
+        state->push(false)
-    array.push(state, true)
+    state->push(true)
 
     print_state(state)
     for i in 0..SIZE
         rule110_step(state)
         print_state(state)
 
-    array.free(state)
+    state->free()

examples/serve.zr

@@ -0,0 +1,96 @@
+// needs to be compiled with -m -C "-lpthread"
+include "$/net.zr"
+
+extern pthread_create
+extern pthread_detach
+
+struct ConnData
+    sock: i64
+    addr: str
+
+func handle_connection[conn: ConnData] : void
+    req := _stackalloc(10001) as str
+    n := net.read(conn->sock, req as ptr, 10000)
+    if n <= 0
+        net.close(conn->sock)
+        conn->addr->free()
+        (conn as ptr)->free()
+        return
+
+    req[n] = 0
+
+    pos := req->find("\r\n")
+    if pos == -1
+        panic("TODO: bad request")
+
+    first_line := req->substr_n(0, pos)
+    parts := first_line->split(" ")
+    method := parts->nth(0) as str
+    path := parts->nth(1) as str
+
+    if !method->equal("GET")
+        // TODO: method not supported
+        return
+    
+    if path->equal("/")
+        // TODO: index
+        return
+    
+    // TODO: ANY validation
+    file_path := "."->concat(path)
+
+    file_size, ok := os.get_file_size(file_path)
+    if !ok
+        // TODO: not found
+        return
+
+    fd := _builtin_syscall(SYS_openat, AT_FDCWD, file_path, O_RDONLY, 0)
+    if fd < 0
+        // TODO: not found
+        return
+    
+    resp := "HTTP/1.1 200 OK\r\nConnection: close\r\n\r\n"
+    net.send(conn->sock, resp as ptr, resp->len())
+    
+    offset := 0
+    while offset < file_size
+        sent := _builtin_syscall(SYS_sendfile, conn->sock, fd, ^offset, IP_MAXPACKET)
+        if sent <= 0
+            break
+
+    net.close(conn->sock)
+
+    _builtin_syscall(SYS_close, fd)
+    file_path->free()
+    first_line->free()
+    parts->free_with_items()
+    conn->addr->free()
+    (conn as ptr)->free()
+
+func main[argc: i64, argv: ptr] : i64
+    port := 8000
+
+    if argc > 1
+        port = os.arg(argv, 1)->parse_i64()
+
+    server_sock, ok := net.listen("0.0.0.0", port)
+    if !ok
+        panic("failed to listen")
+
+    io.printf("Listening on :%d...\n", port)
+
+    addr := _stackalloc(16)
+    while true
+        conn := net.accept(server_sock, addr)
+        if conn < 0
+            io.println("ERROR: failed to accept connection")
+            continue
+
+        conn_data := new* ConnData
+        conn_data->sock = conn
+        conn_data->addr = mem.alloc(30) as str
+        conn_data->addr->format_into(30, "%d.%d.%d.%d:%d", addr[4], addr[5], addr[6], addr[7], mem.read16be(addr + 2))
+
+        thread := 0
+        pthread_create(^thread, 0, ^handle_connection, conn_data)
+        pthread_detach(thread)

examples/sqlite_todo.zr

@@ -1,4 +1,6 @@
 // needs to be compiled with -m -C "-lsqlite3"
+include "$/io.zr"
+
 extern sqlite3_open
 extern sqlite3_exec
 extern sqlite3_prepare_v2
@@ -10,6 +12,9 @@ extern sqlite3_column_int
 extern sqlite3_column_text
 extern sqlite3_finalize
 
+const SQLITE_ROW  = 100
+const SQLITE_DONE = 101
+
 func main[] : i64
     rc := 0
     db := 0
@@ -30,7 +35,7 @@ func main[] : i64
         io.println("0. Quit")
         io.print("\n> ")
 
-        choice := io.read_line() |> str.parse_i64()
+        choice := io.read_line()->parse_i64()
 
         if choice == 0
             break
@@ -38,29 +43,29 @@ func main[] : i64
             io.println("============")
             sqlite3_prepare_v2(db, "SELECT * FROM todo", -1, ^stmt, 0)
 
-            while sqlite3_step(stmt) == 100
+            while sqlite3_step(stmt) == SQLITE_ROW
-                id := sqlite3_column_int(stmt, 0)
+                id := sqlite3_column_int(stmt, 0) as i64
-                task := sqlite3_column_text(stmt, 1)
+                task := sqlite3_column_text(stmt, 1) as str
                 io.printf("%d - %s\n", id, task)
 
             io.println("============")
         else if choice == 2
             io.print("\nEnter new task: ")
-            task := io.read_line() |> str.trim()
+            task := io.read_line()->trim()
 
             sqlite3_prepare_v2(db, "INSERT INTO todo(task) VALUES (?);", -1, ^stmt, 0)
             sqlite3_bind_text(stmt, 1, task, -1, 0)
-            if sqlite3_step(stmt) != 101
+            if sqlite3_step(stmt) != SQLITE_DONE
                 panic(sqlite3_errmsg(db))
 
             io.println("\nTask added\n")
         else if choice == 3
             io.print("\nEnter task id: ")
-            id := io.read_line() |> str.parse_i64()
+            id := io.read_line()->parse_i64()
 
             sqlite3_prepare_v2(db, "DELETE FROM todo WHERE id = ?;", -1, ^stmt, 0)
             sqlite3_bind_int(stmt, 1, id, -1, 0)
-            if sqlite3_step(stmt) != 101
+            if sqlite3_step(stmt) != SQLITE_DONE
                 panic(sqlite3_errmsg(db))
 
             io.println("\nTask deleted\n")

examples/tcp_server.zr

@@ -1,23 +0,0 @@
-func main[] : i64
-    ~s, ok := net.listen(net.pack_addr(127, 0, 0, 1), 8000)
-    if !ok
-        panic("failed to listen")
-
-    io.println("Listening on port 8000...")
-
-    resp := mem.alloc(60000)
-    addr := _stackalloc(16)
-    while true
-        conn := net.accept(s, addr)
-        if conn < 0
-            continue
-
-        io.printf("%d.%d.%d.%d:%d\n", addr[4], addr[5], addr[6], addr[7], mem.read16be(addr + 2))
-
-        n := net.read(conn, resp, 60000)
-        
-        io.print_sized(resp, n)
-        io.println("")
-
-        net.send(conn, resp, n)
-        net.close(conn)

examples/udp_server.zr

@@ -1,13 +1,16 @@
+include "$/io.zr"
+include "$/net.zr"
+
 func main[] : i64
-    ~s, ok := net.create_udp_server(net.pack_addr(127, 0, 0, 1), 8000)
+    s, ok := net.create_udp_server("127.0.0.1", 8000)
     if !ok
         panic("net.create_udp_server failed")
 
     io.println("Listening on port 8000...")
     while true
-        pkt := net.udp_receive(s, 60000)
+        pkt := s->receive(IP_MAXPACKET)
         if pkt->size <= 0
-            net.UDPPacket.free(pkt)
+            pkt->free()
             continue
 
         io.printf("%d.%d.%d.%d:%d\n", pkt->source_addr[4], pkt->source_addr[5], pkt->source_addr[6], pkt->source_addr[7], mem.read16be(pkt->source_addr + 2))
@@ -15,5 +18,5 @@ func main[] : i64
         io.print_sized(pkt->data, pkt->size)
         io.println("")
 
-        net.udp_send_to(s, pkt->source_addr, pkt->data, pkt->size)
+        s->send_to(pkt->source_addr, pkt->data, pkt->size)
-        net.UDPPacket.free(pkt)
+        pkt->free()

src/codegen_x86_64.rs

@@ -100,41 +100,60 @@ impl<'a> CodegenX86_64<'a> {
     }
 
     pub fn get_output(&self) -> String {
-        format!("section .data\n{}{}", self.data_section, self.output)
+        format!(".section .data\n{}{}", self.data_section, self.output)
     }
 
     pub fn emit_prologue(&mut self, use_crt: bool) -> Result<(), ZernError> {
         emit!(
             &mut self.output,
-            "section .note.GNU-stack
+            ".intel_syntax noprefix
-    db 0
 
-section .bss
+.section .note.GNU-stack
-    _heap_head: resq 1
+    .byte 0
-    _heap_tail: resq 1
-    _environ: resq 1
 
-section .text._builtin_heap_head
+.section .bss
+    _heap_head: .zero 8
+    _heap_tail: .zero 8
+    _environ: .zero 8
+
+.section .text._builtin_heap_head
 _builtin_heap_head:
-    lea rax, [rel _heap_head]
+    lea rax, [rip + _heap_head]
     ret
 
-section .text._builtin_heap_tail
+.section .text._builtin_heap_tail
 _builtin_heap_tail:
-    lea rax, [rel _heap_tail]
+    lea rax, [rip + _heap_tail]
     ret
 
-section .text._builtin_read64
+.section .text._builtin_read64
 _builtin_read64:
-    mov rax, QWORD [rdi]
+    mov rax, QWORD PTR [rdi]
     ret
 
-section .text._builtin_set64
+.section .text._builtin_set64
 _builtin_set64:
     mov [rdi], rsi
     ret
 
-section .text._builtin_syscall
+.section .text._builtin_cvtsi2sd
+_builtin_cvtsi2sd:
+    cvtsi2sd xmm0, rdi
+    movq rax, xmm0
+    ret
+
+.section .text._builtin_cvttsd2si
+_builtin_cvttsd2si:
+    cvttsd2si rax, xmm0
+    ret
+
+.section .text._builtin_f64_to_f32
+_builtin_f64_to_f32:
+    cvtsd2ss xmm0, xmm0
+    movd eax, xmm0
+    ret
+
+.section .text._builtin_syscall
 _builtin_syscall:
     mov rax, rdi
     mov rdi, rsi
@@ -152,26 +171,26 @@ _builtin_syscall:
             emit!(
                 &mut self.output,
                 "
-section .text._builtin_environ
+.section .text._builtin_environ
 _builtin_environ:
-    lea rax, [rel _environ]
+    lea rax, [rip + _environ]
     mov rax, [rax]
     ret
 
-global _start
+.globl _start
-section .text
+.section .text
 _start:
     xor rbp, rbp
-    ; setup args
+    // setup args
     pop rdi
     mov rsi, rsp
-    ; save environ
+    // save environ
     lea rdx, [rsi + rdi*8 + 8]
-    lea rax, [rel _environ]
+    lea rax, [rip + _environ]
     mov [rax], rdx
-    ; align stack
+    // align stack
     and rsp, -16
-    ; exit(main())
+    // exit(main())
     call main
     mov rdi, rax
     mov rax, 60
@@ -182,10 +201,10 @@ _start:
             emit!(
                 &mut self.output,
                 "
-section .text._builtin_environ
+.section .text._builtin_environ
 _builtin_environ:
-    extern environ
+    .extern environ
-    mov rax, [rel environ]
+    mov rax, [rip + environ]
     ret
 "
             );
@@ -219,7 +238,7 @@ _builtin_environ:
 
                 self.compile_expr(env, initializer)?;
                 let offset = env.define_var(name.lexeme.clone(), var_type);
-                emit!(&mut self.output, "    mov QWORD [rbp-{}], rax", offset);
+                emit!(&mut self.output, "    mov QWORD PTR [rbp-{}], rax", offset);
             }
             Stmt::Assign { left, op, value } => {
                 self.compile_expr(env, value)?;
@@ -230,7 +249,7 @@ _builtin_environ:
                         let var = env.get_var(&name.lexeme).unwrap();
                         emit!(
                             &mut self.output,
-                            "    mov QWORD [rbp-{}], rax",
+                            "    mov QWORD PTR [rbp-{}], rax",
                             var.stack_offset,
                         );
                     }
@@ -246,7 +265,7 @@ _builtin_environ:
                         emit!(&mut self.output, "    pop rbx");
                         emit!(&mut self.output, "    add rbx, rax");
                         emit!(&mut self.output, "    pop rax");
-                        emit!(&mut self.output, "    mov BYTE [rbx], al");
+                        emit!(&mut self.output, "    mov BYTE PTR [rbx], al");
                     }
                     ExprKind::MemberAccess { left, field } => {
                         emit!(&mut self.output, "    push rax");
@@ -255,7 +274,7 @@ _builtin_environ:
 
                         self.compile_expr(env, left)?;
                         emit!(&mut self.output, "    pop rbx");
-                        emit!(&mut self.output, "    mov QWORD [rax+{}], rbx", offset);
+                        emit!(&mut self.output, "    mov QWORD PTR [rax+{}], rbx", offset);
                     }
                     _ => return error!(&op.loc, "invalid assignment target"),
                 };
@@ -282,7 +301,12 @@ _builtin_environ:
                             env.define_var(target.lexeme.clone(), types[i].to_string())
                         }
                     };
-                    emit!(&mut self.output, "    mov QWORD [rbp-{}], {}", offset, reg);
+                    emit!(
+                        &mut self.output,
+                        "    mov QWORD PTR [rbp-{}], {}",
+                        offset,
+                        reg
+                    );
                 }
             }
             Stmt::Const { .. } => {
@@ -344,11 +368,13 @@ _builtin_environ:
                 body,
                 exported,
             } => {
-                if *exported || name.lexeme == "main" {
+                let name = &name.lexeme;
-                    emit!(&mut self.output, "global {}", name.lexeme);
+                if *exported || name == "main" {
+                    emit!(&mut self.output, ".globl {0}", name);
                 }
-                emit!(&mut self.output, "section .text.{}", name.lexeme);
+                emit!(&mut self.output, ".type {0}, @function", name);
-                emit!(&mut self.output, "{}:", name.lexeme);
+                emit!(&mut self.output, ".section .text.{}", name);
+                emit!(&mut self.output, "{}:", name);
                 emit!(&mut self.output, "    push rbp");
                 emit!(&mut self.output, "    mov rbp, rsp");
 
@@ -363,15 +389,20 @@ _builtin_environ:
                                 param.var_type.lexeme.clone(),
                             );
                             if let Some(reg) = REGISTERS.get(i) {
-                                emit!(&mut self.output, "    mov QWORD [rbp-{}], {}", offset, reg);
+                                emit!(
+                                    &mut self.output,
+                                    "    mov QWORD PTR [rbp-{}], {}",
+                                    offset,
+                                    reg
+                                );
                             } else {
                                 let stack_offset = 16 + 8 * (i - REGISTERS.len());
                                 emit!(
                                     &mut self.output,
-                                    "    mov rax, QWORD [rbp+{}]",
+                                    "    mov rax, QWORD PTR [rbp+{}]",
                                     stack_offset
                                 );
-                                emit!(&mut self.output, "    mov QWORD [rbp-{}], rax", offset);
+                                emit!(&mut self.output, "    mov QWORD PTR [rbp-{}], rax", offset);
                             }
                         }
                     }
@@ -398,21 +429,26 @@ _builtin_environ:
                     emit!(&mut self.output, "    ret");
                 }
 
+                emit!(&mut self.output, ".size {0}, . - {0}", name);
+
                 // patch the stack size after we know how much we actually need
                 let patch = format!("    sub rsp, {:<10}", (env.next_offset + 15) & !15);
                 self.output
                     .replace_range(prologue_offset..prologue_offset + patch.len(), &patch);
             }
             Stmt::Return { keyword: _, exprs } => {
-                if exprs.len() == 2 {
+                match exprs.len() {
-                    self.compile_expr(env, &exprs[1])?;
+                    2 => {
-                    emit!(&mut self.output, "    push rax");
+                        self.compile_expr(env, &exprs[1])?;
-                    self.compile_expr(env, &exprs[0])?;
+                        emit!(&mut self.output, "    push rax");
-                    emit!(&mut self.output, "    pop rdx");
+                        self.compile_expr(env, &exprs[0])?;
-                } else if exprs.len() == 1 {
+                        emit!(&mut self.output, "    pop rdx");
-                    self.compile_expr(env, &exprs[0])?;
+                    }
-                } else {
+                    1 => {
-                    todo!();
+                        self.compile_expr(env, &exprs[0])?;
+                    }
+                    0 => {}
+                    _ => todo!(),
                 }
                 emit!(&mut self.output, "    mov rsp, rbp");
                 emit!(&mut self.output, "    pop rbp");
@@ -435,21 +471,29 @@ _builtin_environ:
                 let offset = env.define_var(var.lexeme.clone(), "i64".into());
 
                 self.compile_expr(env, start)?;
-                emit!(&mut self.output, "    mov QWORD [rbp-{}], rax", offset);
+                emit!(&mut self.output, "    mov QWORD PTR [rbp-{}], rax", offset);
                 self.compile_expr(env, end)?;
                 let end_offset = env.next_offset;
                 env.next_offset += 8;
-                emit!(&mut self.output, "    mov QWORD [rbp-{}], rax", end_offset);
+                emit!(
+                    &mut self.output,
+                    "    mov QWORD PTR [rbp-{}], rax",
+                    end_offset
+                );
                 emit!(&mut self.output, "{}:", env.loop_begin_label);
-                emit!(&mut self.output, "    mov rax, QWORD [rbp-{}]", offset);
+                emit!(&mut self.output, "    mov rax, QWORD PTR [rbp-{}]", offset);
-                emit!(&mut self.output, "    mov rcx, QWORD [rbp-{}]", end_offset);
+                emit!(
+                    &mut self.output,
+                    "    mov rcx, QWORD PTR [rbp-{}]",
+                    end_offset
+                );
                 emit!(&mut self.output, "    cmp rax, rcx");
                 emit!(&mut self.output, "    jge {}", env.loop_end_label);
                 self.compile_stmt(env, body)?;
                 emit!(&mut self.output, "{}:", env.loop_continue_label);
-                emit!(&mut self.output, "    mov rax, QWORD [rbp-{}]", offset);
+                emit!(&mut self.output, "    mov rax, QWORD PTR [rbp-{}]", offset);
                 emit!(&mut self.output, "    add rax, 1");
-                emit!(&mut self.output, "    mov QWORD [rbp-{}], rax", offset);
+                emit!(&mut self.output, "    mov QWORD PTR [rbp-{}], rax", offset);
                 emit!(&mut self.output, "    jmp {}", env.loop_begin_label);
                 emit!(&mut self.output, "{}:", env.loop_end_label);
                 env.pop_scope();
@@ -465,9 +509,9 @@ _builtin_environ:
                 emit!(&mut self.output, "    jmp {}", env.loop_continue_label);
             }
             Stmt::Extern(name) => {
-                emit!(&mut self.output, "extern {}", name.lexeme);
+                emit!(&mut self.output, ".extern {}", name.lexeme);
             }
-            Stmt::Struct { name: _, fields: _ } => {
+            Stmt::Struct { .. } => {
                 // handled in SymbolTable
             }
         }
@@ -576,6 +620,10 @@ _builtin_environ:
                 TokenType::IntLiteral => {
                     emit!(&mut self.output, "    mov rax, {}", token.lexeme);
                 }
+                TokenType::FloatLiteral => {
+                    let value: f64 = token.lexeme.parse().unwrap();
+                    emit!(&mut self.output, "    mov rax, {}", value.to_bits());
+                }
                 TokenType::CharLiteral => {
                     emit!(
                         &mut self.output,
@@ -595,15 +643,15 @@ _builtin_environ:
                         .chain(std::iter::once("0".into()))
                         .collect::<Vec<_>>()
                         .join(",");
-                    emit!(&mut self.data_section, "    {} db {}", label, charcodes);
+                    emit!(&mut self.data_section, "    {}: .byte {}", label, charcodes);
                     self.data_counter += 1;
 
-                    emit!(&mut self.output, "    mov rax, {}", label);
+                    emit!(&mut self.output, "    lea rax, [rip + {}]", label);
                 }
-                TokenType::True => {
+                TokenType::KeywordTrue => {
                     emit!(&mut self.output, "    mov rax, 1");
                 }
-                TokenType::False => {
+                TokenType::KeywordFalse => {
                     emit!(&mut self.output, "    mov rax, 0");
                 }
                 _ => unreachable!(),
@@ -612,7 +660,12 @@ _builtin_environ:
                 self.compile_expr(env, right)?;
                 match op.token_type {
                     TokenType::Minus => {
-                        emit!(&mut self.output, "    neg rax");
+                        if self.expr_types[&right.id] == "f64" {
+                            emit!(&mut self.output, "    mov rbx, 0x8000000000000000");
+                            emit!(&mut self.output, "    xor rax, rbx");
+                        } else {
+                            emit!(&mut self.output, "    neg rax");
+                        }
                     }
                     TokenType::Bang => {
                         emit!(&mut self.output, "    test rax, rax");
@@ -634,7 +687,7 @@ _builtin_environ:
                     let var = env.get_var(&name.lexeme).unwrap();
                     emit!(
                         &mut self.output,
-                        "    mov rax, QWORD [rbp-{}]",
+                        "    mov rax, QWORD PTR [rbp-{}]",
                         var.stack_offset,
                     );
                 }
@@ -666,35 +719,11 @@ _builtin_environ:
                     emit!(&mut self.output, "    push rax");
                 }
 
-                let arg_count = args.len();
+                let arg_types: Vec<String> = args
-                if arg_count <= 6 {
+                    .iter()
-                    for i in (0..arg_count).rev() {
+                    .map(|a| self.expr_types[&a.id].clone())
-                        emit!(&mut self.output, "    pop {}", REGISTERS[i]);
+                    .collect();
-                    }
+                self.emit_call_setup(&arg_types);
-                } else {
-                    for (i, reg) in REGISTERS.iter().enumerate() {
-                        let offset = 8 * (arg_count - 1 - i);
-                        emit!(
-                            &mut self.output,
-                            "    mov {}, QWORD [rsp + {}]",
-                            reg,
-                            offset
-                        );
-                    }
-                    // TODO: since all zern values are 64bit large we currently cannot call
-                    // external functions that expect a non-64bit value past the 6th argument
-                    let num_stack = arg_count - 6;
-                    for i in 0..num_stack {
-                        let arg_idx = arg_count - 1 - i;
-                        let offset = 8 * (arg_count - 1 - arg_idx);
-                        emit!(
-                            &mut self.output,
-                            "    mov rax, QWORD [rsp + {}]",
-                            offset + 8 * i
-                        );
-                        emit!(&mut self.output, "    push rax");
-                    }
-                }
 
                 if let ExprKind::Variable(callee_name) = &callee.kind {
                     if self
@@ -715,11 +744,7 @@ _builtin_environ:
                     emit!(&mut self.output, "    call rax");
                 }
 
-                if arg_count > 6 {
+                self.emit_call_cleanup(args.len());
-                    let num_stack = arg_count - 6;
-                    emit!(&mut self.output, "    add rsp, {}", 8 * num_stack);
-                    emit!(&mut self.output, "    add rsp, {}", 8 * arg_count);
-                }
             }
             ExprKind::ArrayLiteral(exprs) => {
                 emit!(&mut self.output, "    mov rdi, 24");
@@ -736,7 +761,7 @@ _builtin_environ:
                     emit!(&mut self.output, "    mov rsi, rax");
                     emit!(&mut self.output, "    pop rdi");
                     emit!(&mut self.output, "    push rdi");
-                    emit!(&mut self.output, "    call array.push");
+                    emit!(&mut self.output, "    call Array.push");
                 }
                 emit!(&mut self.output, "    pop rax");
             }
@@ -750,12 +775,12 @@ _builtin_environ:
                 self.compile_expr(env, index)?;
                 emit!(&mut self.output, "    pop rbx");
                 emit!(&mut self.output, "    add rax, rbx");
-                emit!(&mut self.output, "    movzx rax, BYTE [rax]");
+                emit!(&mut self.output, "    movzx rax, BYTE PTR [rax]");
             }
             ExprKind::AddrOf { op, expr } => match &expr.kind {
                 ExprKind::Variable(name) => {
                     if self.symbol_table.functions.contains_key(&name.lexeme) {
-                        emit!(&mut self.output, "    mov rax, {}", name.lexeme);
+                        emit!(&mut self.output, "    lea rax, [rip + {}]", name.lexeme);
                     } else {
                         let var = match env.get_var(&name.lexeme) {
                             Some(x) => x,
@@ -768,7 +793,7 @@ _builtin_environ:
                         };
                         emit!(
                             &mut self.output,
-                            "    lea rax, QWORD [rbp-{}]",
+                            "    lea rax, QWORD PTR [rbp-{}]",
                             var.stack_offset,
                         );
                     }
@@ -787,7 +812,6 @@ _builtin_environ:
                 if *use_heap {
                     emit!(&mut self.output, "    mov rdi, {}", memory_size);
                     emit!(&mut self.output, "    call mem.alloc");
-                    emit!(&mut self.output, "    push rax");
                 } else {
                     let aligned_size = (memory_size + 15) & !15;
                     emit!(&mut self.output, "    sub rsp, {}", aligned_size);
@@ -804,15 +828,88 @@ _builtin_environ:
             ExprKind::MemberAccess { left, field } => {
                 let offset = self.get_field_offset(left, field)?;
                 self.compile_expr(env, left)?;
-                emit!(&mut self.output, "    mov rax, QWORD [rax+{}]", offset);
+                emit!(&mut self.output, "    mov rax, QWORD PTR [rax+{}]", offset);
             }
             ExprKind::Cast { expr, type_name: _ } => {
                 self.compile_expr(env, expr)?;
             }
+            ExprKind::MethodCall { expr, method, args } => {
+                let receiver_type = &self.expr_types[&expr.id];
+                let func_name = format!("{}.{}", receiver_type, method.lexeme);
+
+                self.compile_expr(env, expr)?;
+                emit!(&mut self.output, "    push rax");
+                for arg in args {
+                    self.compile_expr(env, arg)?;
+                    emit!(&mut self.output, "    push rax");
+                }
+
+                let mut arg_types = vec![];
+                arg_types.push(receiver_type.clone());
+                arg_types.extend(args.iter().map(|a| self.expr_types[&a.id].clone()));
+
+                self.emit_call_setup(&arg_types);
+                emit!(&mut self.output, "    call {}", func_name);
+                self.emit_call_cleanup(1 + args.len());
+            }
         }
         Ok(())
     }
 
+    fn emit_call_setup(&mut self, arg_types: &[String]) {
+        let arg_count = arg_types.len();
+
+        let to_register = arg_count.min(6);
+        let mut fp_idx = 0;
+        let mut int_idx = 0;
+        for (i, arg_type) in arg_types.iter().enumerate().take(to_register) {
+            let offset = 8 * (arg_count - 1 - i);
+            emit!(
+                &mut self.output,
+                "    mov rax, QWORD PTR [rsp + {}]",
+                offset
+            );
+            if arg_type == "f64" {
+                emit!(&mut self.output, "    movq xmm{}, rax", fp_idx);
+                fp_idx += 1;
+            } else {
+                emit!(&mut self.output, "    mov {}, rax", REGISTERS[int_idx]);
+                int_idx += 1;
+            }
+        }
+
+        // TODO: since all zern values are 64bit large we currently cannot call
+        // external functions that expect a non-64bit value past the 6th argument
+        let num_stack = arg_count.saturating_sub(6);
+        for i in 0..num_stack {
+            let arg_idx = arg_count - 1 - i;
+            let offset = 8 * (arg_count - 1 - arg_idx);
+            emit!(
+                &mut self.output,
+                "    mov rax, QWORD PTR [rsp + {}]",
+                offset + 8 * i
+            );
+            emit!(&mut self.output, "    push rax");
+        }
+
+        emit!(&mut self.output, "    mov al, {}", fp_idx);
+
+        if num_stack == 0 {
+            emit!(&mut self.output, "    add rsp, {}", 8 * to_register);
+        }
+    }
+
+    fn emit_call_cleanup(&mut self, arg_count: usize) {
+        let num_stack = arg_count.saturating_sub(6);
+        if num_stack > 0 {
+            emit!(
+                &mut self.output,
+                "    add rsp, {}",
+                8 * (arg_count + num_stack)
+            );
+        }
+    }
+
     fn get_field_offset(&self, left: &Expr, field: &Token) -> Result<usize, ZernError> {
         let struct_name = &self.expr_types[&left.id];
 
@@ -833,28 +930,28 @@ _builtin_environ:
 
     fn emit_var_arg(&mut self, env: &mut Env, index_expr: &Expr) -> Result<(), ZernError> {
         self.compile_expr(env, index_expr)?;
-        emit!(&mut self.output, " mov r10, rax");
+        emit!(&mut self.output, "    mov r10, rax");
 
         let stack_label = self.label();
         let done_label = self.label();
 
-        emit!(&mut self.output, " cmp r10, 6");
+        emit!(&mut self.output, "    cmp r10, 6");
-        emit!(&mut self.output, " jge {}", stack_label);
+        emit!(&mut self.output, "    jge {}", stack_label);
 
         // < 6
-        emit!(&mut self.output, " mov rax, r10");
+        emit!(&mut self.output, "    mov rax, r10");
-        emit!(&mut self.output, " inc rax");
+        emit!(&mut self.output, "    inc rax");
-        emit!(&mut self.output, " shl rax, 3");
+        emit!(&mut self.output, "    shl rax, 3");
-        emit!(&mut self.output, " neg rax");
+        emit!(&mut self.output, "    neg rax");
-        emit!(&mut self.output, " mov rax, [rbp + rax]");
+        emit!(&mut self.output, "    mov rax, [rbp + rax]");
-        emit!(&mut self.output, " jmp {}", done_label);
+        emit!(&mut self.output, "    jmp {}", done_label);
 
         // >= 6
         emit!(&mut self.output, "{}:", stack_label);
-        emit!(&mut self.output, " mov rax, r10");
+        emit!(&mut self.output, "    mov rax, r10");
-        emit!(&mut self.output, " sub rax, 6");
+        emit!(&mut self.output, "    sub rax, 6");
-        emit!(&mut self.output, " shl rax, 3");
+        emit!(&mut self.output, "    shl rax, 3");
-        emit!(&mut self.output, " mov rax, [rbp + 16 + rax]");
+        emit!(&mut self.output, "    mov rax, [rbp + 16 + rax]");
 
         emit!(&mut self.output, "{}:", done_label);
         Ok(())

src/main.rs

@@ -5,44 +5,26 @@ mod tokenizer;
 mod typechecker;
 
 use std::{
+    collections::HashSet,
     fs,
-    path::Path,
     process::{self, Command},
 };
 
 use tokenizer::ZernError;
 
-macro_rules! parse_std_file {
-    ($statements:expr, $filename:expr) => {
-        let source: String = include_str!($filename).into();
-        let tokenizer = tokenizer::Tokenizer::new($filename.to_owned(), source);
-        let parser = parser::Parser::new(tokenizer.tokenize()?);
-        $statements.extend(parser.parse()?);
-    };
-}
-
 fn compile_file(args: Args) -> Result<(), ZernError> {
     let source = match fs::read_to_string(&args.path) {
         Ok(x) => x,
-        Err(_) => {
+        Err(e) => {
-            eprintln!("\x1b[91mERROR\x1b[0m: failed to open {}", args.path);
+            eprintln!("\x1b[91mERROR\x1b[0m: failed to open {}: {e}", args.path);
             process::exit(1);
         }
     };
 
-    let filename = Path::new(&args.path).file_name().unwrap().to_str().unwrap();
+    let mut included_paths = HashSet::new();
-
+    let tokenizer = tokenizer::Tokenizer::new(args.path, source, &mut included_paths);
-    let mut statements = Vec::new();
-
-    if args.include_stdlib {
-        parse_std_file!(statements, "std/std.zr");
-        parse_std_file!(statements, "std/net.zr");
-        parse_std_file!(statements, "std/linux_constants.zr");
-    }
-
-    let tokenizer = tokenizer::Tokenizer::new(filename.to_owned(), source);
     let parser = parser::Parser::new(tokenizer.tokenize()?);
-    statements.extend(parser.parse()?);
+    let statements = parser.parse()?;
 
     let mut symbol_table = symbol_table::SymbolTable::new();
     for stmt in &statements {
@@ -63,19 +45,20 @@ fn compile_file(args: Args) -> Result<(), ZernError> {
     if !args.emit_only {
         let out = args.out.unwrap_or_else(|| "out".into());
 
-        fs::write(format!("{}.s", out), codegen.get_output()).unwrap();
+        fs::write(format!("{out}.s"), codegen.get_output()).unwrap();
 
-        run_command(format!("nasm -f elf64 -o {}.o {}.s", out, out));
+        let debug_flag = if args.emit_debug { "-g" } else { "" };
+
+        run_command(format!("as --64 {debug_flag} -o {out}.o {out}.s"));
 
         if args.use_crt {
             run_command(format!(
-                "cc -no-pie -o {} {}.o -flto -Wl,--gc-sections {}",
+                "cc -no-pie -o {out} {out}.o -flto -Wl,--gc-sections {}",
-                out, out, args.cflags
+                args.cflags
             ));
         } else {
             run_command(format!(
-                "ld -static -o {} {}.o --gc-sections -e _start",
+                "ld -static -o {out} {out}.o --gc-sections -e _start"
-                out, out
             ));
         }
 
@@ -113,7 +96,7 @@ struct Args {
     path: String,
     out: Option<String>,
     emit_only: bool,
-    include_stdlib: bool,
+    emit_debug: bool,
     run_exe: bool,
     use_crt: bool,
     cflags: String,
@@ -127,7 +110,7 @@ impl Args {
             path: String::new(),
             out: None,
             emit_only: false,
-            include_stdlib: true,
+            emit_debug: false,
             run_exe: false,
             use_crt: false,
             cflags: String::new(),
@@ -144,12 +127,12 @@ impl Args {
                 }
             } else if arg == "--emit-only" {
                 out.emit_only = true;
-            } else if arg == "--no-stdlib" {
-                out.include_stdlib = false;
             } else if arg == "-r" {
                 out.run_exe = true;
             } else if arg == "-m" {
                 out.use_crt = true;
+            } else if arg == "-g" {
+                out.emit_debug = true;
             } else if arg == "-C" {
                 match args.next() {
                     Some(s) => out.cflags = s,
@@ -159,17 +142,15 @@ impl Args {
                     }
                 }
             } else if arg == "-h" || arg == "--help" {
-                println!(
+                println!("Usage: zern [-o path] [-r] [-m] [-g] [-C cflags] [--emit-only] path");
-                    "Usage: zern [-o path] [-r] [-m] [-C cflags] [--emit-only] [--no-stdlib] path"
-                );
                 process::exit(0);
             } else if arg.starts_with('-') {
-                eprintln!("\x1b[91mERROR\x1b[0m: unrecognized option: {}", arg);
+                eprintln!("\x1b[91mERROR\x1b[0m: unrecognized option: {arg}");
                 process::exit(1);
             } else if out.path.is_empty() {
                 out.path = arg
             } else {
-                eprintln!("\x1b[91mERROR\x1b[0m: unrecognized argument: {}", arg);
+                eprintln!("\x1b[91mERROR\x1b[0m: unrecognized argument: {arg}");
                 process::exit(1);
             }
         }

src/parser.rs

@@ -143,12 +143,18 @@ pub enum ExprKind {
         expr: Box<Expr>,
         type_name: Token,
     },
+    MethodCall {
+        expr: Box<Expr>,
+        method: Token,
+        args: Vec<Expr>,
+    },
 }
 
 pub struct Parser {
     tokens: Vec<Token>,
     current: usize,
     is_inside_function: bool,
+    depth: usize,
 }
 
 impl Parser {
@@ -157,6 +163,7 @@ impl Parser {
             tokens,
             current: 0,
             is_inside_function: false,
+            depth: 0,
         }
     }
 
@@ -264,7 +271,7 @@ impl Parser {
             fields.push(Param { var_type, var_name });
         }
 
-        self.consume(TokenType::Dedent, "expected dedent after the struct fields")?;
+        self.consume(TokenType::Dedent, "expected dedent after struct fields")?;
 
         Ok(Stmt::Struct { name, fields })
     }
@@ -322,10 +329,12 @@ impl Parser {
         } else if self.match_token(&[TokenType::KeywordReturn]) {
             let keyword = self.previous().clone();
             let mut exprs = vec![];
-            loop {
+            if !self.check(&TokenType::Dedent) {
-                exprs.push(self.expression()?);
+                loop {
-                if !self.match_token(&[TokenType::Comma]) {
+                    exprs.push(self.expression()?);
-                    break;
+                    if !self.match_token(&[TokenType::Comma]) {
+                        break;
+                    }
                 }
             }
             Ok(Stmt::Return { keyword, exprs })
@@ -333,7 +342,7 @@ impl Parser {
             Ok(Stmt::Break)
         } else if self.match_token(&[TokenType::KeywordContinue]) {
             Ok(Stmt::Continue)
-        } else if self.match_token(&[TokenType::Tilde]) {
+        } else if self.check(&TokenType::Identifier) && self.check_ahead(&TokenType::Comma) {
             let mut targets = vec![];
             loop {
                 targets.push(self.consume(Identifier, "expected an identifier")?);
@@ -439,37 +448,14 @@ impl Parser {
     }
 
     fn expression(&mut self) -> Result<Expr, ZernError> {
-        self.pipe()
+        self.depth += 1;
-    }
+        if self.depth > 200 {
-
+            return error!(self.previous().loc, "maximum expression depth reached");
-    fn pipe(&mut self) -> Result<Expr, ZernError> {
-        let mut expr = self.or_and()?;
-
-        while self.match_token(&[TokenType::Pipe]) {
-            let pipe = self.previous().clone();
-            let right = self.equality()?;
-
-            match right.kind {
-                ExprKind::Call {
-                    callee,
-                    paren,
-                    args,
-                } => {
-                    let mut new_args = args;
-                    new_args.insert(0, expr);
-                    expr = Expr::new(ExprKind::Call {
-                        callee,
-                        paren,
-                        args: new_args,
-                    })
-                }
-                _ => {
-                    return error!(pipe.loc, "tried to pipe into a non-call expression");
-                }
-            };
         }
 
-        Ok(expr)
+        let out = self.or_and();
+        self.depth -= 1;
+        out
     }
 
     fn or_and(&mut self) -> Result<Expr, ZernError> {
@@ -608,6 +594,10 @@ impl Parser {
         let mut expr = self.primary()?;
 
         loop {
+            if self.peek().loc.line != self.previous().loc.line {
+                break;
+            }
+
             if self.match_token(&[TokenType::LeftParen]) {
                 let mut args = vec![];
                 if !self.check(&TokenType::RightParen) {
@@ -635,12 +625,32 @@ impl Parser {
                     index: Box::new(index),
                 })
             } else if self.match_token(&[TokenType::Arrow]) {
-                let field =
+                if self.check(&TokenType::Identifier) && self.check_ahead(&TokenType::LeftParen) {
-                    self.consume(TokenType::Identifier, "expected field name after '->'")?;
+                    let method = self.consume(TokenType::Identifier, "expected method name")?;
-                expr = Expr::new(ExprKind::MemberAccess {
+                    self.consume(TokenType::LeftParen, "expected '('")?;
-                    left: Box::new(expr),
+                    let mut args = vec![];
-                    field,
+                    if !self.check(&TokenType::RightParen) {
-                })
+                        loop {
+                            args.push(self.expression()?);
+                            if !self.match_token(&[TokenType::Comma]) {
+                                break;
+                            }
+                        }
+                    }
+                    self.consume(TokenType::RightParen, "expected ')'")?;
+                    expr = Expr::new(ExprKind::MethodCall {
+                        expr: Box::new(expr),
+                        method,
+                        args,
+                    });
+                } else {
+                    let field =
+                        self.consume(TokenType::Identifier, "expected field name after '->'")?;
+                    expr = Expr::new(ExprKind::MemberAccess {
+                        left: Box::new(expr),
+                        field,
+                    });
+                }
             } else {
                 break;
             }
@@ -652,10 +662,11 @@ impl Parser {
     fn primary(&mut self) -> Result<Expr, ZernError> {
         if self.match_token(&[
             TokenType::IntLiteral,
+            TokenType::FloatLiteral,
             TokenType::CharLiteral,
             TokenType::StringLiteral,
-            TokenType::True,
+            TokenType::KeywordTrue,
-            TokenType::False,
+            TokenType::KeywordFalse,
         ]) {
             Ok(Expr::new(ExprKind::Literal(self.previous().clone())))
         } else if self.match_token(&[TokenType::LeftParen]) {

src/symbol_table.rs

@@ -5,31 +5,35 @@ use crate::{
     tokenizer::{ZernError, error},
 };
 
-pub type Type = String;
-
 pub struct StructField {
     pub offset: usize,
-    pub field_type: Type,
+    pub field_type: String,
+}
+
+#[derive(Clone)]
+pub enum FnParams {
+    Normal(Vec<String>),
+    Variadic,
 }
 
 #[derive(Clone)]
 pub struct FnType {
-    pub return_type: Type,
+    pub return_type: String,
-    pub params: Option<Vec<Type>>,
+    pub params: FnParams,
 }
 
 impl FnType {
     fn new(return_type: &str, params: Vec<&str>) -> FnType {
         FnType {
             return_type: return_type.to_string(),
-            params: Some(params.iter().map(|x| x.to_string()).collect()),
+            params: FnParams::Normal(params.iter().map(|x| x.to_string()).collect()),
         }
     }
 
     fn new_variadic(return_type: &str) -> FnType {
         FnType {
             return_type: return_type.to_string(),
-            params: None,
+            params: FnParams::Variadic,
         }
     }
 }
@@ -51,6 +55,12 @@ impl SymbolTable {
                     "_builtin_set64".into(),
                     FnType::new("void", vec!["ptr", "i64"]),
                 ),
+                ("_builtin_cvtsi2sd".into(), FnType::new("f64", vec!["i64"])),
+                ("_builtin_cvttsd2si".into(), FnType::new("i64", vec!["f64"])),
+                (
+                    "_builtin_f64_to_f32".into(),
+                    FnType::new("any", vec!["f64"]),
+                ),
                 ("_builtin_syscall".into(), FnType::new_variadic("i64")),
                 ("_builtin_environ".into(), FnType::new("ptr", vec![])),
                 ("_var_arg".into(), FnType::new("any", vec!["i64"])),
@@ -68,11 +78,15 @@ impl SymbolTable {
                     return error!(name.loc, format!("tried to redefine '{}'", name.lexeme));
                 }
                 let mut value = if value.lexeme.starts_with("0x") {
-                    u64::from_str_radix(&value.lexeme[2..], 16).unwrap()
+                    match u64::from_str_radix(&value.lexeme[2..], 16) {
-                } else if value.lexeme.starts_with("0o") {
+                        Ok(v) => v,
-                    u64::from_str_radix(&value.lexeme[2..], 8).unwrap()
+                        Err(_) => return error!(value.loc, "failed to parse hex numeric constant"),
+                    }
                 } else {
-                    value.lexeme.parse().unwrap()
+                    match value.lexeme.parse() {
+                        Ok(v) => v,
+                        Err(_) => return error!(value.loc, "failed to parse numeric constant"),
+                    }
                 } as i64;
                 if *neg {
                     value = -value;
@@ -106,7 +120,7 @@ impl SymbolTable {
                         name.lexeme.clone(),
                         FnType {
                             return_type,
-                            params: Some(
+                            params: FnParams::Normal(
                                 params.iter().map(|x| x.var_type.lexeme.clone()).collect(),
                             ),
                         },
@@ -115,7 +129,7 @@ impl SymbolTable {
                         name.lexeme.clone(),
                         FnType {
                             return_type,
-                            params: None,
+                            params: FnParams::Variadic,
                         },
                     ),
                 };

src/tokenizer.rs

@@ -1,4 +1,9 @@
-use std::{cmp::Ordering, fmt};
+use std::{
+    cmp::Ordering,
+    collections::HashSet,
+    fmt, fs,
+    path::{Path, PathBuf},
+};
 
 #[derive(Debug, Clone, PartialEq)]
 pub enum TokenType {
@@ -21,12 +26,10 @@ pub enum TokenType {
     BitOr,
     LogicalAnd,
     LogicalOr,
-    Pipe,
     DoubleDot,
     ShiftLeft,
     ShiftRight,
     Arrow,
-    Tilde,
 
     Equal,
     DoubleEqual,
@@ -40,8 +43,7 @@ pub enum TokenType {
     StringLiteral,
     CharLiteral,
     IntLiteral,
-    True,
+    FloatLiteral,
-    False,
 
     KeywordConst,
     KeywordIf,
@@ -58,6 +60,8 @@ pub enum TokenType {
     KeywordStruct,
     KeywordNew,
     KeywordAs,
+    KeywordTrue,
+    KeywordFalse,
 
     Indent,
     Dedent,
@@ -109,7 +113,7 @@ pub struct Token {
     pub loc: Loc,
 }
 
-pub struct Tokenizer {
+pub struct Tokenizer<'a> {
     source: Vec<char>,
     tokens: Vec<Token>,
     indent_stack: Vec<usize>,
@@ -117,10 +121,15 @@ pub struct Tokenizer {
     start: usize,
     current: usize,
     loc: Loc,
+    included_paths: &'a mut HashSet<PathBuf>,
 }
 
-impl Tokenizer {
+impl<'a> Tokenizer<'a> {
-    pub fn new(filename: String, source: String) -> Tokenizer {
+    pub fn new(
+        filename: String,
+        source: String,
+        included_paths: &'a mut HashSet<PathBuf>,
+    ) -> Tokenizer<'a> {
         Tokenizer {
             source: source.chars().collect(),
             tokens: vec![],
@@ -133,6 +142,7 @@ impl Tokenizer {
                 line: 1,
                 column: 1,
             },
+            included_paths,
         }
     }
 
@@ -168,7 +178,6 @@ impl Tokenizer {
             '%' => self.add_token(TokenType::Mod)?,
             '^' => self.add_token(TokenType::Xor)?,
             ':' => self.add_token(TokenType::Colon)?,
-            '~' => self.add_token(TokenType::Tilde)?,
             '-' => {
                 if self.match_char('=') {
                     self.add_token(TokenType::MinusEqual)?
@@ -202,9 +211,7 @@ impl Tokenizer {
                 }
             }
             '|' => {
-                if self.match_char('>') {
+                if self.match_char('|') {
-                    self.add_token(TokenType::Pipe)?
-                } else if self.match_char('|') {
                     self.add_token(TokenType::LogicalOr)?
                 } else {
                     self.add_token(TokenType::BitOr)?
@@ -247,6 +254,9 @@ impl Tokenizer {
                     return error!(self.loc, "unterminated char literal");
                 }
                 _ = self.match_char('\\'); // if its an escape sequence skip \ and read one more
+                if self.eof() {
+                    return error!(self.loc, "unterminated char literal");
+                }
                 self.advance();
                 if !self.match_char('\'') {
                     return error!(self.loc, "expected ' after char literal");
@@ -259,11 +269,17 @@ impl Tokenizer {
                 while !self.eof() {
                     if self.peek() == '\\' {
                         self.advance();
+                        if self.eof() {
+                            return error!(
+                                self.loc,
+                                format!("unterminated string, started at {}", start_loc)
+                            );
+                        }
                     } else if self.peek() == '"' {
                         break;
                     } else if self.peek() == '\n' {
                         self.loc.line += 1;
-                        self.loc.column = 1;
+                        self.loc.column = 0;
                     }
                     self.advance();
                 }
@@ -340,21 +356,39 @@ impl Tokenizer {
     }
 
     fn scan_number(&mut self) -> Result<(), ZernError> {
-        if self.match_char('x') {
+        let mut is_float = false;
+
+        if self.source[self.current - 1] == '0' && self.match_char('x') {
+            if !self.peek().is_ascii_hexdigit() {
+                return error!(self.loc, "expected a digit after '0x'");
+            }
             while self.peek().is_ascii_hexdigit() {
                 self.advance();
             }
-        } else if self.match_char('o') {
-            while matches!(self.peek(), '0'..='7') {
-                self.advance();
-            }
         } else {
+            if self.source[self.current - 1] == '0' && self.peek().is_ascii_digit() {
+                return error!(self.loc, "octal literals are not allowed");
+            }
             while self.peek().is_ascii_digit() {
                 self.advance();
             }
+            if self.current + 1 < self.source.len()
+                && self.peek() == '.'
+                && self.source[self.current + 1] != '.'
+            {
+                is_float = true;
+                self.advance();
+                while self.peek().is_ascii_digit() {
+                    self.advance();
+                }
+            }
         }
 
-        self.add_token(TokenType::IntLiteral)
+        if is_float {
+            self.add_token(TokenType::FloatLiteral)
+        } else {
+            self.add_token(TokenType::IntLiteral)
+        }
     }
 
     fn scan_identifier(&mut self) -> Result<(), ZernError> {
@@ -363,6 +397,11 @@ impl Tokenizer {
         }
 
         let lexeme: String = self.source[self.start..self.current].iter().collect();
+
+        if lexeme == "include" {
+            return self.scan_include();
+        }
+
         self.add_token(match lexeme.as_str() {
             "const" => TokenType::KeywordConst,
             "if" => TokenType::KeywordIf,
@@ -379,12 +418,77 @@ impl Tokenizer {
             "struct" => TokenType::KeywordStruct,
             "new" => TokenType::KeywordNew,
             "as" => TokenType::KeywordAs,
-            "true" => TokenType::True,
+            "true" => TokenType::KeywordTrue,
-            "false" => TokenType::False,
+            "false" => TokenType::KeywordFalse,
             _ => TokenType::Identifier,
         })
     }
 
+    fn scan_include(&mut self) -> Result<(), ZernError> {
+        if !self.match_char(' ') {
+            return error!(self.loc, "expected a space after 'include'");
+        }
+
+        if self.peek() != '"' {
+            return error!(self.loc, "expected '\"' after 'include '");
+        }
+        self.advance();
+
+        let path_start = self.current;
+        while !self.eof() && self.peek() != '"' {
+            self.advance();
+        }
+
+        if self.eof() {
+            return error!(self.loc, "unterminated string after 'include '");
+        }
+
+        let path: String = self.source[path_start..self.current].iter().collect();
+        self.advance(); // consume closing quote
+
+        self.include_file(path)
+    }
+
+    fn include_file(&mut self, mut path: String) -> Result<(), ZernError> {
+        if path.starts_with("$/") {
+            path = find_std_path()
+                .join(&path[2..])
+                .to_string_lossy()
+                .into_owned();
+        }
+
+        let base_dir = Path::new(&self.loc.filename).parent().unwrap();
+        let resolved_path = base_dir.join(&path);
+
+        let canonical = match fs::canonicalize(&resolved_path) {
+            Ok(p) => p,
+            Err(e) => {
+                return error!(self.loc, format!("failed to resolve {}: {}", path, e));
+            }
+        };
+
+        if !self.included_paths.insert(canonical.clone()) {
+            return Ok(());
+        }
+
+        let source = match fs::read_to_string(&canonical) {
+            Ok(x) => x,
+            Err(_) => {
+                return error!(self.loc, format!("failed to include {}", path));
+            }
+        };
+
+        let tokenizer = Tokenizer::new(
+            canonical.to_string_lossy().into_owned(),
+            source,
+            &mut *self.included_paths,
+        );
+        self.tokens.extend(tokenizer.tokenize()?);
+        self.tokens.pop(); // remove inner Eof
+
+        Ok(())
+    }
+
     fn match_char(&mut self, expected: char) -> bool {
         if self.eof() || self.peek() != expected {
             false
@@ -458,3 +562,15 @@ impl Tokenizer {
         self.current >= self.source.len()
     }
 }
+
+fn find_std_path() -> PathBuf {
+    let path = std::env::current_exe().unwrap();
+
+    for dir in path.ancestors() {
+        let candidate = dir.join("std");
+        if candidate.is_dir() {
+            return candidate;
+        }
+    }
+    panic!("could not find zern std directory");
+}

src/typechecker.rs

@@ -2,7 +2,7 @@ use std::collections::HashMap;
 
 use crate::{
     parser::{Expr, ExprKind, Params, Stmt},
-    symbol_table::{SymbolTable, Type},
+    symbol_table::{FnParams, SymbolTable},
     tokenizer::{TokenType, ZernError, error},
 };
 
@@ -33,10 +33,10 @@ macro_rules! expect_types {
     };
 }
 
-static BUILTIN_TYPES: [&str; 8] = ["void", "u8", "i64", "str", "bool", "ptr", "fnptr", "any"];
+static BUILTIN_TYPES: [&str; 8] = ["void", "u8", "i64", "f64", "str", "bool", "ptr", "any"];
 
 pub struct Env {
-    scopes: Vec<HashMap<String, Type>>,
+    scopes: Vec<HashMap<String, String>>,
 }
 
 impl Env {
@@ -59,7 +59,7 @@ impl Env {
         self.scopes.last_mut().unwrap().insert(name, var_type);
     }
 
-    fn get_var_type(&self, name: &str) -> Option<&Type> {
+    fn get_var_type(&self, name: &str) -> Option<&String> {
         for scope in self.scopes.iter().rev() {
             if let Some(var) = scope.get(name) {
                 return Some(var);
@@ -314,6 +314,12 @@ impl<'a> TypeChecker<'a> {
                                     "unrecognized type: ".to_owned() + &param.var_type.lexeme
                                 );
                             }
+                            if param.var_type.lexeme == "f64" {
+                                return error!(
+                                    &param.var_name.loc,
+                                    "f64 params not implemented yet"
+                                );
+                            }
 
                             env.define_var(
                                 param.var_name.lexeme.clone(),
@@ -329,17 +335,16 @@ impl<'a> TypeChecker<'a> {
                 env.pop_scope();
             }
             Stmt::Return { keyword, exprs } => {
-                let expected = if self.current_function_return_type == "void" {
+                let joined_type = if exprs.is_empty() {
-                    "i64".into()
+                    "void".into()
                 } else {
-                    self.current_function_return_type.clone()
+                    exprs
+                        .iter()
+                        .map(|e| self.typecheck_expr(env, e))
+                        .collect::<Result<Vec<String>, _>>()?
+                        .join(",")
                 };
-                let joined_type = exprs
+                expect_type!(joined_type, self.current_function_return_type, keyword.loc);
-                    .iter()
-                    .map(|e| self.typecheck_expr(env, e))
-                    .collect::<Result<Vec<String>, _>>()?
-                    .join(",");
-                expect_type!(joined_type, expected, keyword.loc);
             }
             Stmt::Break => {}
             Stmt::Continue => {}
@@ -360,7 +365,7 @@ impl<'a> TypeChecker<'a> {
         Ok(())
     }
 
-    pub fn typecheck_expr(&mut self, env: &mut Env, expr: &Expr) -> Result<Type, ZernError> {
+    pub fn typecheck_expr(&mut self, env: &mut Env, expr: &Expr) -> Result<String, ZernError> {
         let expr_type = match &expr.kind {
             ExprKind::Binary { left, op, right } => {
                 let left_type = self.typecheck_expr(env, left)?;
@@ -420,18 +425,19 @@ impl<'a> TypeChecker<'a> {
             ExprKind::Grouping(expr) => self.typecheck_expr(env, expr),
             ExprKind::Literal(token) => match token.token_type {
                 TokenType::IntLiteral => Ok("i64".into()),
+                TokenType::FloatLiteral => Ok("f64".into()),
                 TokenType::CharLiteral => Ok("u8".into()),
                 TokenType::StringLiteral => Ok("str".into()),
-                TokenType::True => Ok("bool".into()),
+                TokenType::KeywordTrue => Ok("bool".into()),
-                TokenType::False => Ok("bool".into()),
+                TokenType::KeywordFalse => Ok("bool".into()),
                 _ => unreachable!(),
             },
             ExprKind::Unary { op, right } => {
                 let right_type = self.typecheck_expr(env, right)?;
                 match op.token_type {
                     TokenType::Minus => {
-                        expect_type!(right_type, "i64", op.loc);
+                        expect_types!(right_type, ["f64", "i64"], op.loc);
-                        Ok("i64".into())
+                        Ok(right_type)
                     }
                     TokenType::Bang => {
                         expect_types!(right_type, ["bool", "i64", "ptr", "u8"], op.loc);
@@ -458,30 +464,37 @@ impl<'a> TypeChecker<'a> {
                 if let ExprKind::Variable(callee_name) = &callee.kind {
                     if let Some(fn_type) = self.symbol_table.functions.get(&callee_name.lexeme) {
                         // its a function (defined/builtin/extern)
-                        if let Some(params) = fn_type.params.clone() {
+                        match &fn_type.params {
-                            if params.len() != args.len() {
+                            FnParams::Normal(params) => {
-                                return error!(
+                                if params.len() != args.len() {
-                                    &paren.loc,
+                                    return error!(
-                                    format!(
+                                        &paren.loc,
-                                        "expected {} arguments, got {}",
+                                        format!(
-                                        params.len(),
+                                            "expected {} arguments, got {}",
-                                        args.len()
+                                            params.len(),
-                                    )
+                                            args.len()
-                                );
+                                        )
+                                    );
+                                }
+                                for (i, arg) in args.iter().enumerate() {
+                                    expect_type!(
+                                        self.typecheck_expr(env, arg)?,
+                                        params[i],
+                                        paren.loc
+                                    );
+                                }
                             }
-                            for (i, arg) in args.iter().enumerate() {
+                            FnParams::Variadic => {
-                                expect_type!(self.typecheck_expr(env, arg)?, params[i], paren.loc);
+                                // cant check arg types
-                            }
+                                for arg in args {
-                        } else {
+                                    self.typecheck_expr(env, arg)?;
-                            // its a variadic function, cant check arg types
+                                }
-                            for arg in args {
-                                self.typecheck_expr(env, arg)?;
                             }
                         }
                         Ok(fn_type.return_type.clone())
                     } else {
                         // its a variable containing function address
-                        expect_type!(self.typecheck_expr(env, callee)?, "fnptr", paren.loc);
+                        expect_type!(self.typecheck_expr(env, callee)?, "ptr", paren.loc);
 
                         for arg in args {
                             self.typecheck_expr(env, arg)?;
@@ -490,7 +503,7 @@ impl<'a> TypeChecker<'a> {
                     }
                 } else {
                     // its an expression that evalutes to function address
-                    expect_type!(self.typecheck_expr(env, callee)?, "fnptr", paren.loc);
+                    expect_type!(self.typecheck_expr(env, callee)?, "ptr", paren.loc);
 
                     for arg in args {
                         self.typecheck_expr(env, arg)?;
@@ -514,13 +527,7 @@ impl<'a> TypeChecker<'a> {
                 Ok("u8".into())
             }
             ExprKind::AddrOf { op, expr } => match &expr.kind {
-                ExprKind::Variable(name) => {
+                ExprKind::Variable(_) => Ok("ptr".into()),
-                    if self.symbol_table.functions.contains_key(&name.lexeme) {
-                        Ok("fnptr".into())
-                    } else {
-                        Ok("ptr".into())
-                    }
-                }
                 _ => {
                     error!(&op.loc, "can only take address of variables and functions")
                 }
@@ -555,7 +562,13 @@ impl<'a> TypeChecker<'a> {
                 Ok(field.field_type.clone())
             }
             ExprKind::Cast { expr, type_name } => {
-                self.typecheck_expr(env, expr)?;
+                let expr_type = self.typecheck_expr(env, expr)?;
+                if expr_type != "any" && type_name.lexeme == "f64" {
+                    return error!(
+                        &type_name.loc,
+                        "use _builtin_cvtsi2sd and _builtin_cvttsd2si to cast between integers and f64"
+                    );
+                }
                 if !self.is_valid_type_name(&type_name.lexeme) {
                     return error!(
                         &type_name.loc,
@@ -564,6 +577,57 @@ impl<'a> TypeChecker<'a> {
                 }
                 Ok(type_name.lexeme.clone())
             }
+            ExprKind::MethodCall { expr, method, args } => {
+                let receiver_type = self.typecheck_expr(env, expr)?;
+                let func_name = format!("{}.{}", receiver_type, method.lexeme);
+
+                let func_type = match self.symbol_table.functions.get(&func_name) {
+                    Some(f) => f,
+                    None => {
+                        return error!(
+                            method.loc,
+                            format!(
+                                "method {} not found on on type {}",
+                                method.lexeme, receiver_type
+                            )
+                        );
+                    }
+                };
+
+                match &func_type.params {
+                    FnParams::Normal(params) => {
+                        if params.is_empty() || params[0] != receiver_type {
+                            return error!(
+                                method.loc,
+                                format!(
+                                    "first parameter of the method must be of type {}",
+                                    receiver_type
+                                )
+                            );
+                        }
+                        if params.len() != args.len() + 1 {
+                            return error!(
+                                method.loc,
+                                format!(
+                                    "expected {} arguments, got {}",
+                                    params.len() - 1,
+                                    args.len()
+                                )
+                            );
+                        }
+                        for (i, arg) in args.iter().enumerate() {
+                            expect_type!(self.typecheck_expr(env, arg)?, params[i + 1], method.loc);
+                        }
+                        Ok(func_type.return_type.clone())
+                    }
+                    FnParams::Variadic => {
+                        for arg in args {
+                            self.typecheck_expr(env, arg)?;
+                        }
+                        Ok(func_type.return_type.clone())
+                    }
+                }
+            }
         }?;
 
         self.expr_types.insert(expr.id, expr_type.clone());

std/containers.zr

@@ -0,0 +1,249 @@
+include "mem.zr"
+
+struct Array
+    data: ptr
+    size: i64
+    capacity: i64
+
+func Array.new_preallocated_and_zeroed[size: i64] : Array
+    xs := new* Array
+    if size > 0
+        xs->data = mem.alloc(size * 8)
+        mem.zero(xs->data, size * 8)
+        xs->size = size
+        xs->capacity = size
+    return xs
+
+func Array.nth[xs: Array, n: i64] : any
+    if n < 0 || n >= xs->size
+        panic("Array.nth out of bounds")
+    return mem.read64(xs->data + n * 8)
+
+func Array.set[xs: Array, n: i64, x: any] : void
+    if n < 0 || n >= xs->size
+        panic("Array.set out of bounds")
+    mem.write64(xs->data + n * 8, x)
+
+func Array.push[xs: Array, x: any] : void
+    if xs->size == xs->capacity
+        new_capacity := 4
+        if xs->capacity != 0
+            new_capacity = xs->capacity * 2
+        xs->data = xs->data->realloc(new_capacity * 8)
+        xs->capacity = new_capacity
+
+    mem.write64(xs->data + xs->size * 8, x)
+    xs->size += 1
+
+func Array.free[xs: Array] : void
+    if xs->data != 0
+        xs->data->free()
+    (xs as ptr)->free()
+
+func Array.free_with_items[xs: Array] : void
+    if xs->data != 0
+        for i in 0..xs->size
+            (xs->nth(i) as ptr)->free()
+        xs->data->free()
+    (xs as ptr)->free()
+
+func Array.pop[xs: Array] : any
+    if xs->size == 0
+        panic("Array.pop on empty array")
+    x : any = Array.last(xs)
+    xs->size = xs->size - 1
+    return x
+
+func Array.last[xs: Array] : any
+    if xs->size == 0
+        panic("Array.last on empty array")
+    return xs->nth(xs->size - 1)
+
+func Array.slice[xs: Array, start: i64, length: i64] : Array
+    if start < 0 || length < 0 || start + length > xs->size
+        panic("Array.slice out of bounds")
+
+    new_array := Array.new_preallocated_and_zeroed(length)
+    mem.copy(xs->data + start * 8, new_array->data, length * 8)
+    return new_array
+
+func Array.concat[a: Array, b: Array] : Array
+    new_array := Array.new_preallocated_and_zeroed(a->size + b->size)
+    mem.copy(a->data, new_array->data, a->size * 8)
+    mem.copy(b->data, new_array->data + a->size * 8, b->size * 8)
+    return new_array
+
+func Array.quicksort[arr: Array] : void
+    arr->_do_quicksort(0, arr->size - 1)
+
+func Array._do_quicksort[arr: Array, low: i64, high: i64] : void
+    if low < high
+        i := arr->_partition(low, high)
+        arr->_do_quicksort(low, i - 1)
+        arr->_do_quicksort(i + 1, high)
+
+func Array._partition[arr: Array, low: i64, high: i64] : i64
+    pivot : i64 = arr->nth(high)
+    i := low - 1
+    for j in (low)..high
+        if arr->nth(j) as i64 <= pivot
+            i += 1
+            temp : i64 = arr->nth(i)
+            arr->set(i, arr->nth(j))
+            arr->set(j, temp)
+    temp : i64 = arr->nth(i + 1)
+    arr->set(i + 1, arr->nth(high))
+    arr->set(high, temp)
+    return i + 1
+
+func Array.contains_str[arr: Array, s: str] : bool
+    for i in 0..arr->size
+        if (arr->nth(i) as str)->equal(s)
+            return true
+    return false
+
+func Array.count[arr: Array, item: any] : i64
+    count := 0
+    for i in 0..arr->size
+        if arr->nth(i) == item
+            count += 1
+    return count
+
+func Array.map[arr: Array, fn: ptr] : Array
+    out := Array.new_preallocated_and_zeroed(arr->size)
+    for i in 0..arr->size
+        out->set(i, fn(arr->nth(i)))
+    return out
+
+func Array.filter[arr: Array, fn: ptr] : Array
+    out := []
+    for i in 0..arr->size
+        if fn(arr->nth(i))
+            out->push(arr->nth(i))
+    return out
+
+func Array.reduce[arr: Array, fn: ptr, acc: any] : any
+    for i in 0..arr->size
+        acc = fn(acc, arr->nth(i))
+    return acc
+
+func str.split[haystack: str, needle: str]: Array
+    haystack_len := haystack->len()
+    needle_len := needle->len()
+    result := []
+    
+    if !needle_len
+        if !haystack_len
+            return result
+        else
+            for i in 0..haystack_len
+                result->push(haystack->substr_n(i, 1))
+            return result
+
+    start := 0
+    i := 0
+    while i < haystack_len
+        if i <= haystack_len - needle_len
+            match := true
+            for j in 0..needle_len
+                if haystack[i + j] != needle[j]
+                    match = false
+                    break
+            if match
+                result->push(haystack->substr_n(start, i - start))
+                start = i + needle_len
+                i += needle_len
+                continue
+        i += 1
+
+    result->push(haystack->substr_n(start, haystack_len - start))
+    return result
+
+const HashMap._TABLE_SIZE = 100
+
+struct HashMap
+    table: Array
+
+struct HashMap._Node
+    key: str
+    value: any
+    next: HashMap._Node
+
+func HashMap.new[] : HashMap
+    map := new* HashMap
+    map->table = Array.new_preallocated_and_zeroed(HashMap._TABLE_SIZE)
+    return map
+
+func HashMap.insert[map: HashMap, key: str, value: any] : void
+    index := HashMap._djb2(key)
+    current : HashMap._Node = map->table->nth(index)
+
+    while current as ptr
+        if current->key->equal(key)
+            current->value = value
+            return
+        current = current->next
+
+    new_node := new* HashMap._Node
+    new_node->key = key->make_copy()
+    new_node->value = value
+    new_node->next = map->table->nth(index)
+    map->table->set(index, new_node)
+
+func HashMap.get[map: HashMap, key: str] : any, bool
+    index := HashMap._djb2(key)
+    current : HashMap._Node = map->table->nth(index)
+
+    while current as ptr
+        if current->key->equal(key)
+            return current->value, true
+        current = current->next
+    
+    return 0 as any, false
+
+func HashMap.delete[map: HashMap, key: str] : void
+    index := HashMap._djb2(key)
+    current : HashMap._Node = map->table->nth(index)
+    prev := 0 as HashMap._Node
+
+    while current as ptr
+        if current->key->equal(key)
+            if prev as ptr
+                prev->next = current->next
+            else
+                map->table->set(index, current->next)
+            
+            current->key->free()
+            (current as ptr)->free()
+            return
+
+        prev = current
+        current = current->next
+
+func HashMap.keys[map: HashMap] : Array
+    out := []
+    for i in 0..HashMap._TABLE_SIZE
+        current : HashMap._Node = map->table->nth(i)
+        while current as ptr
+            out->push(current->key)
+            current = current->next
+    return out
+
+func HashMap.free_with_keys[map: HashMap] : void
+    for i in 0..HashMap._TABLE_SIZE
+        current : HashMap._Node = map->table->nth(i)
+        while current as ptr
+            tmp := current
+            current = current->next
+            tmp->key->free()
+            (tmp as ptr)->free()
+
+    map->table->free()
+    (map as ptr)->free()
+
+func HashMap._djb2[key: str] : i64
+    hash := 5381 
+    for i in 0..key->len()
+        hash = ((hash << 5) + hash) + key[i]
+    hash = (hash & 0x7fffffffffffffff) // prevent negative
+    return hash % HashMap._TABLE_SIZE

std/io.zr

@@ -0,0 +1,152 @@
+include "str.zr"
+include "os.zr"
+
+func panic[msg: str] : void
+    io.printf("PANIC: %s\n", msg)
+    // for gdb backtrace
+    _builtin_syscall(SYS_kill, os.getpid(), SIGABRT)
+    os.exit(1)
+
+func assert[cond: bool, msg: str] : void
+    if !cond
+        panic(msg)
+
+func io.printf[..] : void
+    s := _var_arg(0) as ptr
+    i := 1
+
+    while s[0]
+        if s[0] == '%'
+            s += 1
+
+            if s[0] == 'd'
+                io.print_i64(_var_arg(i) as i64)
+                i += 1
+            else if s[0] == 'x'
+                io.print_i64_hex(_var_arg(i) as i64)
+                i += 1
+            else if s[0] == 's'
+                io.print(_var_arg(i) as str)
+                i += 1
+            else if s[0] == 'c'
+                io.print_char(_var_arg(i) as u8)
+                i += 1
+            else if s[0] == 'f'
+                io.print_f64(_var_arg(i) as i64)
+                i += 1
+            else if s[0] == '%'
+                io.print_char('%')
+            else if s[0] == 0
+                break
+            else
+                panic("io.printf: unrecognized format")
+        else
+            io.print_char(s[0])
+        s += 1
+
+func io.print_sized[x: ptr, size: i64] : void
+    _builtin_syscall(SYS_write, STDOUT_FILENO, x, size)
+
+func io.print[x: str] : void
+    io.print_sized(x as ptr, x->len())
+
+func io.println[x: str] : void
+    io.print(x)
+    io.print("\n")
+
+func io.print_char[x: u8] : void
+    io.print_sized(^x, 1)
+
+func io.print_bool[x: bool] : void
+    if x
+        io.print("true")
+    else
+        io.print("false")
+
+func io.print_i64[x: i64] : void
+    s := _stackalloc(21)
+    x->to_str_buf(s)
+    io.print(s as str)
+
+func io.print_i64_hex[x: i64] : void
+    s := _stackalloc(17)
+    x->to_hex_str_buf(s)
+    io.print(s as str)
+
+func io.println_i64[x: i64] : void
+    s := _stackalloc(21)
+    x->to_str_buf(s)
+    io.println(s as str)
+
+// TODO: fix when we implement f64 params
+func io.print_f64[x: i64] : void
+    s := _stackalloc(64)
+    f64.to_str_buf(x, s)
+    io.print(s as str)
+
+func io.read_char[] : u8
+    c := 0 as u8
+    _builtin_syscall(SYS_read, STDIN_FILENO, ^c, 1)
+    return c
+
+func io.read_line[] : str
+    b := new str.Builder
+    while true
+        c := io.read_char()
+        if c == '\n'
+            break
+        b->append_char(c)
+    return b->build_and_free_buffer()
+
+func io.read_text_file[path: str] : str, bool
+    fd := _builtin_syscall(SYS_openat, AT_FDCWD, path, O_RDONLY, 0)
+    if fd < 0
+        return 0 as str, false
+
+    size := _builtin_syscall(SYS_lseek, fd, 0, SEEK_END)
+    _builtin_syscall(SYS_lseek, fd, 0, SEEK_SET)
+
+    buffer := mem.alloc(size + 1)
+    n := _builtin_syscall(SYS_read, fd, buffer, size)
+    _builtin_syscall(SYS_close, fd)
+
+    if n != size
+        buffer->free()
+        return 0 as str, false
+
+    buffer[n] = 0
+    return buffer as str, true
+
+func io.read_binary_file[path: str] : Blob, bool
+    fd := _builtin_syscall(SYS_openat, AT_FDCWD, path, O_RDONLY, 0)
+    if fd < 0
+        return 0 as Blob, false
+    
+    buf := new* Blob
+    buf->size = _builtin_syscall(SYS_lseek, fd, 0, SEEK_END)
+    _builtin_syscall(SYS_lseek, fd, 0, SEEK_SET)
+
+    buf->data = mem.alloc(buf->size)
+
+    n := _builtin_syscall(SYS_read, fd, buf->data, buf->size)
+    _builtin_syscall(SYS_close, fd)
+
+    if n != buf->size
+        buf->free()
+        return 0 as Blob, false
+
+    return buf, true
+
+func io.write_text_file[path: str, content: str] : bool
+    return io.write_binary_file(path, content as ptr, content->len())
+
+func io.write_binary_file[path: str, content: ptr, size: i64] : bool
+    fd := _builtin_syscall(SYS_openat, AT_FDCWD, path, O_WRONLY|O_CREAT|O_TRUNC, math.octal_to_decimal(644))
+    if fd < 0
+        return false
+
+    n := _builtin_syscall(SYS_write, fd, content, size)
+    _builtin_syscall(SYS_close, fd)
+    if n != size
+        return false
+    return true

std/json.zr

@@ -0,0 +1,203 @@
+include "containers.zr"
+
+const json.OBJECT = 0
+const json.ARRAY  = 1
+const json.STRING = 2
+const json.NUMBER = 3
+const json.NULL   = 4
+const json.BOOL   = 5
+
+struct json.Value
+    type: i64
+    value: any
+
+func json.Value.dump[v: json.Value] : str
+    s := new str.Builder
+
+    if v->type == json.OBJECT
+        map := v->value as HashMap
+        keys := map->keys()
+        s->append_char('{')
+        for i in 0..keys->size
+            if i > 0
+                s->append_char(',')
+            s->append_char('"')
+            s->append(keys->nth(i) as str)
+            s->append_char('"')
+            s->append_char(':')
+            value, _ := map->get(keys->nth(i) as str)
+            s->append((value as json.Value)->dump())
+        s->append_char('}')
+        keys->free()
+    else if v->type == json.ARRAY
+        arr := v->value as Array
+        s->append_char('[')
+        for i in 0..arr->size
+            if i > 0
+                s->append_char(',')
+            s->append((arr->nth(i) as json.Value)->dump())
+        s->append_char(']')
+    else if v->type == json.STRING
+        // TODO: escape sequences
+        s->append_char('"')
+        s->append(v->value as str)
+        s->append_char('"')
+    else if v->type == json.NUMBER
+        s->append((v->value as i64)->to_str())
+    else if v->type == json.NULL
+        s->append("null")
+    else if v->type == json.BOOL
+        if v->value as bool
+            s->append("true")
+        else
+            s->append("false")
+    else
+        panic("json.Value.dump: unknown value type")
+    
+    return s->build_and_free_buffer()
+
+func json.Value.free[v: json.Value] : void
+    if v->type == json.OBJECT
+        map := v->value as HashMap
+        keys := map->keys()
+        for i in 0..keys->size
+            value, _ := map->get(keys->nth(i) as str)
+            (value as json.Value)->free()
+        keys->free()
+        
+        map->free_with_keys()
+    else if v->type == json.ARRAY
+        arr := v->value as Array
+        for i in 0..arr->size
+            (arr->nth(i) as json.Value)->free()
+        arr->free()
+    else if v->type == json.STRING
+        (v->value as str)->free()
+
+    (v as ptr)->free()
+
+func json.val[x: any] : any
+    return (x as json.Value)->value
+
+func json.parse[s: str] : json.Value
+    i := 0
+    return json._parse_value(s, ^i)
+
+func json._parse_value[s: str, i: ptr] : json.Value
+    out := new* json.Value
+
+    json._skip_whitespace(s, i)
+
+    if s[mem.read64(i)] == 0
+        panic("json.parse: unexpected EOF")
+    
+    if s[mem.read64(i)] == '{'
+        mem.write64(i, mem.read64(i) + 1)
+        json._skip_whitespace(s, i)
+
+        out->type = json.OBJECT
+        out->value = HashMap.new()
+        
+        if s[mem.read64(i)] != '}'
+            while true
+                json._skip_whitespace(s, i)
+                key := json._parse_string(s, i)
+                json._skip_whitespace(s, i)
+
+                if s[mem.read64(i)] != ':'
+                    panic("json.parse: expected ':'")
+                mem.write64(i, mem.read64(i) + 1)
+                json._skip_whitespace(s, i)
+
+                value := json._parse_value(s, i)
+                (out->value as HashMap)->insert(key, value)
+                key->free()
+
+                json._skip_whitespace(s, i)
+                if s[mem.read64(i)] == ','
+                    mem.write64(i, mem.read64(i) + 1)
+                else
+                    break
+        
+        json._skip_whitespace(s, i)
+        if s[mem.read64(i)] != '}'
+            panic("json.parse: expected '}'")
+        mem.write64(i, mem.read64(i) + 1)
+    else if s[mem.read64(i)] == '['
+        mem.write64(i, mem.read64(i) + 1)
+        json._skip_whitespace(s, i)
+
+        out->type = json.ARRAY
+        out->value = []
+        
+        while s[mem.read64(i)] != ']'
+            json._skip_whitespace(s, i)
+
+            (out->value as Array)->push(json._parse_value(s, i))
+            json._skip_whitespace(s, i)
+
+            if s[mem.read64(i)] == ','
+                mem.write64(i, mem.read64(i) + 1)
+            else
+                break
+        
+        json._skip_whitespace(s, i)
+        if s[mem.read64(i)] != ']'
+            panic("json.parse: expected ']'")
+        mem.write64(i, mem.read64(i) + 1)
+    else if s[mem.read64(i)] == '"'
+        out->type = json.STRING
+        out->value = json._parse_string(s, i)
+    else if s[mem.read64(i)]->is_digit() || s[mem.read64(i)] == '-'
+        start := mem.read64(i)
+
+        if s[mem.read64(i)] == '-'
+            mem.write64(i, mem.read64(i) + 1)
+
+        while s[mem.read64(i)]->is_digit()
+            mem.write64(i, mem.read64(i) + 1)
+        // TODO: float support once str.parse_f64 is a thing
+        if s[mem.read64(i)] == '.'
+            panic("json.parse: parsing floats not implemented yet")
+
+        len := mem.read64(i) - start
+
+        num_str := s->substr_n(start, len)
+        out->type = json.NUMBER
+        out->value = num_str->parse_i64()
+        num_str->free()
+    else if s[mem.read64(i)] == 'n' && s[mem.read64(i)+1] == 'u' && s[mem.read64(i)+2] == 'l' && s[mem.read64(i)+3] == 'l'
+        out->type = json.NULL
+        mem.write64(i, mem.read64(i) + 4)
+    else if s[mem.read64(i)] == 't' && s[mem.read64(i)+1] == 'r' && s[mem.read64(i)+2] == 'u' && s[mem.read64(i)+3] == 'e'
+        out->type = json.BOOL
+        out->value = true
+        mem.write64(i, mem.read64(i) + 4)
+    else if s[mem.read64(i)] == 'f' && s[mem.read64(i)+1] == 'a' && s[mem.read64(i)+2] == 'l' && s[mem.read64(i)+3] == 's' && s[mem.read64(i)+4] == 'e'
+        out->type = json.BOOL
+        out->value = false
+        mem.write64(i, mem.read64(i) + 5)
+    else
+        panic("json.parse: unexpected character")
+
+    return out
+
+func json._parse_string[s: str, i: ptr] : str
+    if s[mem.read64(i)] != '"'
+        panic("json.parse: expected '\"'")
+    mem.write64(i, mem.read64(i) + 1)
+
+    start := mem.read64(i)
+    // TODO: escape sequences
+    while s[mem.read64(i)] != '"'
+        if s[mem.read64(i)] == 0
+            panic("json.parse: unexpected EOF")
+        mem.write64(i, mem.read64(i) + 1)
+
+    len := mem.read64(i) - start
+    mem.write64(i, mem.read64(i) + 1)
+    return s->substr_n(start, len)
+
+func json._skip_whitespace[s: str, i: ptr] : void
+    while s[mem.read64(i)]->is_whitespace()
+        mem.write64(i, mem.read64(i) + 1)

std/linux_syscalls.zr

@@ -1,29 +1,3 @@
-const STDIN                       =  0
-const STDOUT                      =  1
-
-const SIGABRT                     =  6
-
-const AT_FDCWD                    = -100
-
-const S_IFDIR                     =  0o040000
-const S_IFMT                      =  0o170000
-
-const PROT_READ                   =  1
-const PROT_WRITE                  =  2
-
-const MAP_PRIVATE                 =  2
-const MAP_ANONYMOUS               =  32
-
-const O_RDONLY                    =  0
-const O_WRONLY                    =  1
-const O_CREAT                     =  64
-const O_TRUNC                     =  512
-
-const SEEK_SET                    =  0
-const SEEK_END                    =  2
-
-const F_OK                        =  0
-
 const SYS_read                    =  0
 const SYS_write                   =  1
 const SYS_open                    =  2

std/mem.zr

@@ -0,0 +1,237 @@
+include "linux_syscalls.zr"
+include "num.zr"
+
+const MEM_BLOCK_SIZE = 32
+
+struct mem.Block
+    size: i64
+    free: bool
+    next: mem.Block
+    prev: mem.Block
+
+func mem.align[x: i64] : i64
+    return (x + 7) & -8
+
+func mem.Block._split[blk: mem.Block, needed: i64] : void
+    if blk->size >= needed + MEM_BLOCK_SIZE + 8
+        new_blk := (blk as ptr + MEM_BLOCK_SIZE + needed) as mem.Block
+        new_blk->size = blk->size - needed - MEM_BLOCK_SIZE
+        new_blk->free = true
+        new_blk->next = blk->next
+        new_blk->prev = blk
+
+        if blk->next as ptr
+            blk->next->prev = new_blk
+        else
+            mem.write64(_builtin_heap_tail(), new_blk)
+
+        blk->size = needed
+        blk->next = new_blk
+
+func mem._request_space[size: i64] : mem.Block
+    needed := size + MEM_BLOCK_SIZE
+    alloc_size := (needed + 4095) & -4096
+
+    blk := _builtin_syscall(SYS_mmap, 0, alloc_size, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) as mem.Block
+    if (blk as ptr as i64) == MAP_FAILED
+        panic("mem._request_space: failed to mmap")
+
+    blk->size = alloc_size - MEM_BLOCK_SIZE
+    blk->free = false
+    blk->next = 0 as mem.Block
+    blk->prev = 0 as mem.Block
+
+    tail := mem.read64(_builtin_heap_tail()) as mem.Block
+    if tail as ptr
+        tail->next = blk
+        blk->prev = tail
+
+    mem.write64(_builtin_heap_tail(), blk)
+    return blk
+
+func mem.alloc[size: i64] : ptr
+    if size <= 0
+        panic("mem.alloc: called with nonpositive size")
+
+    size = mem.align(size)
+
+    cur := mem.read64(_builtin_heap_head()) as mem.Block
+    while cur as ptr
+        if cur->free && cur->size >= size
+            cur->_split(size)
+            cur->free = false
+            return cur as ptr + MEM_BLOCK_SIZE
+        cur = cur->next
+    
+    blk := mem._request_space(size)
+    
+    if !mem.read64(_builtin_heap_head())
+        mem.write64(_builtin_heap_head(), blk)
+    
+    blk->_split(size)
+    
+    return blk as ptr + MEM_BLOCK_SIZE
+
+func ptr.free[x: ptr] : void
+    if x == 0
+        return
+
+    blk := (x - MEM_BLOCK_SIZE) as mem.Block
+    if blk->free
+        return
+
+    blk->free = true
+
+    next := blk->next
+    if next as ptr && next->free
+        expected_next := (blk as ptr + MEM_BLOCK_SIZE + blk->size) as mem.Block
+        if expected_next as ptr == next as ptr
+            blk->size += MEM_BLOCK_SIZE + next->size
+            blk->next = next->next
+            if next->next as ptr
+                next->next->prev = blk
+            if mem.read64(_builtin_heap_tail()) == next as ptr
+                mem.write64(_builtin_heap_tail(), blk)
+
+    prev := blk->prev
+    if prev as ptr && prev->free
+        expected_blk := (prev as ptr + MEM_BLOCK_SIZE + prev->size) as mem.Block
+        if expected_blk as ptr == blk as ptr
+            prev->size += MEM_BLOCK_SIZE + blk->size
+            prev->next = blk->next
+            if blk->next as ptr
+                blk->next->prev = prev
+            if mem.read64(_builtin_heap_tail()) == blk as ptr
+                mem.write64(_builtin_heap_tail(), prev)
+            blk = prev
+
+    block_total := blk->size + MEM_BLOCK_SIZE
+    if (blk as i64 & 4095) == 0 && (block_total & 4095) == 0
+        if blk->prev as ptr
+            blk->prev->next = blk->next
+        else
+            mem.write64(_builtin_heap_head(), blk->next)
+        if blk->next as ptr
+            blk->next->prev = blk->prev
+        else
+            mem.write64(_builtin_heap_tail(), blk->prev)
+        _builtin_syscall(SYS_munmap, blk, block_total)
+
+func ptr.realloc[x: ptr, new_size: i64] : ptr
+    if !x
+        return mem.alloc(new_size)
+    
+    if new_size < 0
+        panic("mem.realloc: called with negative new_size")
+
+    if new_size == 0
+        x->free()
+        return 0 as ptr
+
+    new_size = mem.align(new_size)
+
+    blk := (x - MEM_BLOCK_SIZE) as mem.Block
+    if blk->size >= new_size
+        blk->_split(new_size)
+        return x
+
+    next := blk->next
+    expected_next := (blk as ptr + MEM_BLOCK_SIZE + blk->size) as mem.Block
+    
+    if next as ptr && next->free && expected_next as ptr == next as ptr
+        combined := blk->size + MEM_BLOCK_SIZE + next->size
+        if combined >= new_size
+            blk->size = combined
+            blk->next = next->next
+            if next->next as ptr
+                next->next->prev = blk
+            if mem.read64(_builtin_heap_tail()) == next as ptr
+                mem.write64(_builtin_heap_tail(), blk)
+            blk->_split(new_size)
+            return x
+
+    new_ptr := mem.alloc(new_size)
+
+    mem.copy(x, new_ptr, math.min(blk->size, new_size))
+    x->free()
+    return new_ptr
+
+func ptr.zero_and_free[x: ptr, size: i64] : void
+    mem.zero(x, size)
+    x->free()
+
+func mem.zero[x: ptr, size: i64] : void
+    i := 0
+    while i + 8 <= size
+        mem.write64(x + i, 0)
+        i += 8
+    while i < size
+        x[i] = 0 as u8
+        i += 1
+
+func mem.copy[src: ptr, dst: ptr, n: i64] : void
+    if dst > src && dst < src + n
+        i := n
+        while i - 8 >= 0
+            i -= 8
+            mem.write64(dst + i, mem.read64(src + i))
+        while i > 0
+            i -= 1
+            dst[i] = src[i]
+    else
+        i := 0
+        while i + 8 <= n
+            mem.write64(dst + i, mem.read64(src + i))
+            i += 8
+        while i < n
+            dst[i] = src[i]
+            i += 1
+
+func mem.read8[x: ptr] : u8
+    return x[0]
+
+func mem.read16[x: ptr] : i64
+    return x[0] as i64 | (x[1] << 8)
+
+func mem.read16be[x: ptr] : i64
+    return (x[0] << 8) as i64 | x[1]
+
+func mem.read32[x: ptr] : i64
+    return x[0] as i64 | (x[1] << 8) | (x[2] << 16) | (x[3] << 24)
+
+func mem.read32be[x: ptr] : i64
+    return (x[0] as i64 << 24) | (x[1] << 16) | (x[2] << 8) | x[3]
+
+func mem.read64[x: ptr] : i64
+    return _builtin_read64(x)
+
+func mem.write32[x: ptr, d: i64] : void
+    x[0] = d & 0xff
+    x[1] = (d >> 8) & 0xff
+    x[2] = (d >> 16) & 0xff
+    x[3] = (d >> 24) & 0xff
+
+func mem.write16[x: ptr, d: i64] : void
+    x[0] = d & 0xff
+    x[1] = (d >> 8) & 0xff
+
+func mem.write16be[x: ptr, d: i64] : void
+    x[0] = (d >> 8) & 0xff
+    x[1] = d & 0xff
+
+func mem.write64[x: ptr, d: any] : void
+    _builtin_set64(x, d)
+
+struct Blob
+    data: ptr
+    size: i64
+
+func Blob.alloc[size: i64] : Blob
+    buffer := new* Blob
+    buffer->size = size
+    buffer->data = mem.alloc(size)
+    return buffer
+
+func Blob.free[buf: Blob] : void
+    buf->data->free()
+    (buf as ptr)->free()

std/net.zr

@@ -1,15 +1,18 @@
+include "os.zr"
+
 const AF_INET = 2
 const SOCK_STREAM = 1
 const SOCK_DGRAM = 2
 const SOL_SOCKET = 1
 const SO_REUSEADDR = 2
 const SOMAXCONN = 128
+const IP_MAXPACKET = 65535
 
 const DNS_TYPE_A = 1
 const DNS_CLASS_IN = 1
 const DNS_RECURSION_DESIRED = 256
 
-func net.listen[packed_host: i64, port: i64] : i64, bool
+func net.listen[host: str, port: i64] : i64, bool
     s := _builtin_syscall(SYS_socket, AF_INET, SOCK_STREAM, 0)
     if s < 0
         return -1, false
@@ -18,6 +21,10 @@ func net.listen[packed_host: i64, port: i64] : i64, bool
     if _builtin_syscall(SYS_setsockopt, s, SOL_SOCKET, SO_REUSEADDR, ^optval, 8) < 0
         _builtin_syscall(SYS_close, s)
         return -1, false
+    
+    packed_host, ok := net.resolve(host)
+    if !ok
+        return -1, false
 
     sa := _stackalloc(16)
     net._build_sa(sa, packed_host, port)
@@ -32,10 +39,14 @@ func net.listen[packed_host: i64, port: i64] : i64, bool
     
     return s, true
 
-func net.connect[packed_host: i64, port: i64] : i64, bool
+func net.connect[host: str, port: i64] : i64, bool
     s := _builtin_syscall(SYS_socket, AF_INET, SOCK_STREAM, 0)
     if s < 0
         return -1, false
+    
+    packed_host, ok := net.resolve(host)
+    if !ok
+        return -1, false
 
     sa := _stackalloc(16)
     net._build_sa(sa, packed_host, port)
@@ -77,43 +88,7 @@ struct net.UDPSocket
     fd: i64
     addr: ptr
 
-func net.create_udp_client[packed_host: i64, port: i64] : net.UDPSocket, bool
+func net.UDPSocket.receive[s: net.UDPSocket, size: i64] : net.UDPPacket
-    s := new* net.UDPSocket
-
-    s->fd = _builtin_syscall(SYS_socket, AF_INET, SOCK_DGRAM, 0)
-    if s->fd < 0
-        mem.free(s)
-        return 0 as net.UDPSocket, false
-
-    s->addr = mem.alloc(16)
-    net._build_sa(s->addr, packed_host, port)
-    return s, true
-
-func net.create_udp_server[packed_host: i64, port: i64] : net.UDPSocket, bool
-    ~s, ok := net.create_udp_client(packed_host, port)
-    if !ok
-        return 0 as net.UDPSocket, false
-
-    if _builtin_syscall(SYS_bind, s->fd, s->addr, 16) < 0
-        net.UDPSocket.close_and_free(s)
-        return 0 as net.UDPSocket, false
-
-    return s, true
-
-func net.udp_send_to[s: net.UDPSocket, addr: ptr, data: ptr, size: i64] : void
-    _builtin_syscall(SYS_sendto, s->fd, data, size, 0, addr, 16)
-
-struct net.UDPPacket
-    data: ptr
-    source_addr: ptr
-    size: i64
-
-func net.UDPPacket.free[pkt: net.UDPPacket] : void
-    mem.free(pkt->data)
-    mem.free(pkt->source_addr)
-    mem.free(pkt)
-
-func net.udp_receive[s: net.UDPSocket, size: i64] : net.UDPPacket
     pkt := new* net.UDPPacket
     pkt->data = mem.alloc(size)
     pkt->source_addr = mem.alloc(16)
@@ -125,11 +100,105 @@ func net.udp_receive[s: net.UDPSocket, size: i64] : net.UDPPacket
 
 func net.UDPSocket.close_and_free[s: net.UDPSocket] : void
     _builtin_syscall(SYS_close, s->fd)
-    mem.free(s->addr)
+    s->addr->free()
-    mem.free(s)
+    (s as ptr)->free()
+
+func net.create_udp_client[host: str, port: i64] : net.UDPSocket, bool
+    s := new* net.UDPSocket
+
+    packed_host, ok := net.resolve(host)
+    if !ok
+        return 0 as net.UDPSocket, false
+
+    s->fd = _builtin_syscall(SYS_socket, AF_INET, SOCK_DGRAM, 0)
+    if s->fd < 0
+        (s as ptr)->free()
+        return 0 as net.UDPSocket, false
+
+    s->addr = mem.alloc(16)
+    net._build_sa(s->addr, packed_host, port)
+    return s, true
+
+func net.create_udp_server[host: str, port: i64] : net.UDPSocket, bool
+    s, ok := net.create_udp_client(host, port)
+    if !ok
+        return 0 as net.UDPSocket, false
+
+    if _builtin_syscall(SYS_bind, s->fd, s->addr, 16) < 0
+        s->close_and_free()
+        return 0 as net.UDPSocket, false
+
+    return s, true
+
+func net.UDPSocket.send_to[s: net.UDPSocket, addr: ptr, data: ptr, size: i64] : void
+    _builtin_syscall(SYS_sendto, s->fd, data, size, 0, addr, 16)
+
+struct net.UDPPacket
+    data: ptr
+    source_addr: ptr
+    size: i64
+
+func net.UDPPacket.free[pkt: net.UDPPacket] : void
+    pkt->data->free()
+    pkt->source_addr->free()
+    (pkt as ptr)->free()
+
+func net.resolve[domain: str] : i64, bool
+    // if domain is already an ip, skip dns resolution
+    parts := domain->split(".")
+    if parts->size == 4
+        valid := true
+        for i in 0..4
+            p := parts->nth(i) as str
+            if p->len() < 1 || p->len() > 3
+                valid = false
+                break
+            for j in 0..p->len()
+                if !p[j]->is_digit()
+                    valid = false
+                    break
+            if !valid
+                break
+        if valid
+            a := (parts->nth(0) as str)->parse_i64()
+            b := (parts->nth(1) as str)->parse_i64()
+            c := (parts->nth(2) as str)->parse_i64()
+            d := (parts->nth(3) as str)->parse_i64()
+            if a >= 0 && a <= 255 && b >= 0 && b <= 255 && c >= 0 && c <= 255 && d >= 0 && d <= 255
+                parts->free_with_items()
+                return net.pack_addr(a, b, c, d), true
+        parts->free_with_items()
+
+    query := net.build_dns_query(domain, DNS_TYPE_A)
+
+    // TODO: this probably shouldnt be hardcoded
+    s, ok := net.create_udp_client("1.1.1.1", 53)
+    if !ok
+        query->free()
+        return -1, false
+
+    s->send_to(s->addr, query->data, query->size)
+    query->free()
+    pkt := s->receive(1024)
+    s->close_and_free()
+
+    // TODO: do actual parsing
+
+    pos := 12 // skip header (12 bytes)
+
+    while pkt->data[pos] != 0
+        pos += pkt->data[pos] + 1 // skip question
+
+    pos += 5  // skip null byte, type(2), class(2)
+
+    pos += 12 // skip name(2), type(2), class(2), ttl(4), rdlength(2)
+
+    out := net.pack_addr(pkt->data[pos] as i64, pkt->data[pos+1] as i64, pkt->data[pos+2] as i64, pkt->data[pos+3] as i64)
+    pkt->free()
+    return out, true
 
 func net.encode_dns_name[domain: str] : Blob
-    domain_len := str.len(domain)
+    domain_len := domain->len()
     buf := Blob.alloc(domain_len + 2)
     out_pos := 0
     part_start := 0
@@ -152,7 +221,7 @@ func net.build_dns_query[domain_name: str, record_type: i64] : Blob
     out := Blob.alloc(12 + name->size + 4)
 
     // header
-    id := math.abs(os.urandom_i64() % 65536)
+    id := (os.urandom_i64() % 65536)->abs()
     mem.write16be(out->data + 0, id)
     mem.write16be(out->data + 2, DNS_RECURSION_DESIRED)
     mem.write16be(out->data + 4, 1)  // num_questions
@@ -165,35 +234,5 @@ func net.build_dns_query[domain_name: str, record_type: i64] : Blob
     mem.write16be(out->data + 12 + name->size, record_type)
     mem.write16be(out->data + 12 + name->size + 2, DNS_CLASS_IN)
 
-    Blob.free(name)
+    name->free()
     return out
-
-// TODO: dont resolve if its already an IP
-func net.resolve[domain: str] : i64, bool
-    query := net.build_dns_query(domain, DNS_TYPE_A)
-
-    // TODO: this probably shouldnt be hardcoded
-    ~s, ok := net.create_udp_client(net.pack_addr(1, 1, 1, 1), 53)
-    if !ok
-        Blob.free(query)
-        return -1, false
-
-    net.udp_send_to(s, s->addr, query->data, query->size)
-    Blob.free(query)
-    pkt := net.udp_receive(s, 1024)
-    net.UDPSocket.close_and_free(s)
-
-    // TODO: do actual parsing
-
-    pos := 12 // skip header (12 bytes)
-
-    while pkt->data[pos] != 0
-        pos += pkt->data[pos] + 1 // skip question
-
-    pos += 5  // skip null byte, type(2), class(2)
-
-    pos += 12 // skip name(2), type(2), class(2), ttl(4), rdlength(2)
-
-    out := net.pack_addr(pkt->data[pos] as i64, pkt->data[pos+1] as i64, pkt->data[pos+2] as i64, pkt->data[pos+3] as i64)
-    net.UDPPacket.free(pkt)
-    return out, true

std/num.zr

@@ -0,0 +1,220 @@
+include "io.zr"
+
+func i64.abs[n: i64] : i64
+    if n == -9223372036854775808
+        panic("MIN_I64 passed to math.abs")
+    if n < 0
+        return -n
+    return n
+
+func i64.sign[n: i64] : i64
+    if n < 0
+        return -1
+    else if n > 0
+        return 1
+    else
+        return 0
+
+func i64.isqrt[n: i64] : i64
+    if n < 0
+        panic("negative number passed to math.isqrt")
+    if n == 0 || n == 1
+        return n
+
+    guess := n
+    next_guess := (guess + n / guess) / 2
+
+    while next_guess < guess
+        guess = next_guess
+        next_guess = (guess + n / guess) / 2
+
+    return guess
+
+func i64.is_prime[n: i64]: bool
+    if n <= 1
+        return false
+    if n == 2 || n == 3
+        return true
+    if n % 2 == 0 || n % 3 == 0
+        return false
+
+    i := 5
+    while i * i <= n
+        if n % i == 0 || n % (i + 2) == 0
+            return false
+        i += 6
+    return true
+
+func i64.to_str_buf[n: i64, buf: ptr] : void
+    if n == 0
+        buf[0] = '0'
+        buf[1] = 0
+        return
+
+    neg : bool = n < 0
+    if neg
+        // MIN_I64 will fail but i so dont care
+        n = -n
+    tmp := _stackalloc(21)
+    end := 20
+    tmp[end] = 0
+    end -= 1
+    for i in 0..19
+        if n == 0
+            break
+        tmp[end] = '0' + (n % 10)
+        n = n / 10
+        end -= 1
+    if neg
+        tmp[end] = '-'
+        end -= 1
+    len := 19 - end
+    for i in 0..len
+        buf[i] = tmp[end + 1 + i]
+    buf[len] = 0
+
+func i64.to_hex_str_buf[n: i64, buf: ptr] : void
+    hex_chars := "0123456789abcdef"
+
+    if n == 0
+        buf[0] = '0'
+        buf[1] = 0
+        return
+
+    mask := (1 << 60) - 1
+    tmp := _stackalloc(17)
+    len := 0
+
+    for i in 0..16
+        if n == 0
+            break
+        tmp[len] = hex_chars[n & 15]
+        n = (n >> 4) & mask
+        len += 1
+
+    for j in 0..len
+        buf[j] = tmp[len - 1 - j]
+
+    buf[len] = 0
+
+func i64.to_str[n: i64] : str
+    out := mem.alloc(21)
+    n->to_str_buf(out)
+    return out as str
+
+func i64.to_hex_str[n: i64] : str
+    out := mem.alloc(17)
+    n->to_hex_str_buf(out)
+    return out as str
+
+func f64.to_str_buf[x: i64, buf: ptr] : void
+    bits := x
+    sign := (bits >> 63) & 1
+    exp := (bits >> 52) & 0x7ff
+    mant := bits & 0x000fffffffffffff
+
+    if exp == 0x7ff
+        panic("invalid float")
+
+    p := 0
+    if sign
+        buf[p] = '-'
+        p += 1
+        bits = bits & 0x7fffffffffffffff
+
+    if exp == 0 && mant == 0
+        buf[p] = '0'
+        buf[p+1] = '.'
+        buf[p+2] = '0'
+        buf[p+3] = 0
+        return
+
+    sig := mant
+    if exp != 0
+        sig = sig | 0x0010000000000000
+
+    shift := exp - 1075
+
+    if shift >= 0
+        (sig << shift)->to_str_buf(buf + p)
+        while buf[p]
+            p += 1
+        buf[p] = '.'
+        buf[p+1] = '0'
+        buf[p+2] = 0
+        return
+
+    ns := -shift
+
+    if ns <= 52
+        int_part := sig >> ns
+        int_part->to_str_buf(buf + p)
+        while buf[p]
+            p += 1
+    else
+        buf[p] = '0'
+        p += 1
+
+    buf[p] = '.'
+    p += 1
+
+    mask := (1 << ns) - 1
+    frac := sig & mask
+
+    for i in 0..6
+        if frac == 0
+            if i > 0
+                break
+            buf[p] = '0'
+            p += 1
+            break
+        frac = frac * 10
+        digit := frac >> ns
+        buf[p] = '0' + digit as u8
+        p += 1
+        frac = frac & mask
+    buf[p] = 0
+
+func math.gcd[a: i64, b: i64] : i64
+    a = a->abs()
+    b = b->abs()
+    while b != 0
+        tmp := b
+        b = a % b
+        a = tmp
+    return a
+
+func math.min[a: i64, b: i64] : i64
+    if a < b
+        return a
+    return b
+
+func math.max[a: i64, b: i64] : i64
+    if a > b
+        return a
+    return b
+
+func math.pow[b: i64, e: i64] : i64
+    if e < 0
+        panic("negative exponent passed to math.pow")
+    out := 1
+    while e > 0
+        if e & 1
+            out = out * b
+        b = b * b
+        e = e >> 1
+    return out
+
+func math.lcm[a: i64, b: i64] : i64
+    return (a / math.gcd(a, b)) * b
+
+func math.octal_to_decimal[octal: i64] : i64
+    decimal := 0
+    base := 1
+
+    while octal > 0
+        digit := octal % 10
+        decimal += digit * base
+        base = base * 8
+        octal = octal / 10
+    return decimal

std/os.zr

@@ -0,0 +1,154 @@
+include "posix.zr"
+include "linux_syscalls.zr"
+include "str.zr"
+include "containers.zr"
+
+func os.exit[code: i64] : void
+    _builtin_syscall(SYS_exit, code)
+
+func os.getpid[] : i64
+    return _builtin_syscall(SYS_getpid)
+
+func os.arg[argv: ptr, n: i64] : str
+    return mem.read64(argv + n * 8) as str
+
+func os.getenv[name: str] : str, bool
+    name_len := name->len()
+    i := 0
+    while true
+        entry := mem.read64(_builtin_environ() + i * 8) as str
+        if entry as ptr == 0
+            break
+        if entry->equal_n(name, name_len) && entry[name_len] == '='
+            return (entry as ptr + name_len + 1) as str, true
+        i += 1
+    return 0 as str, false
+
+func os.basename[path: str] : str
+    len := path->len()
+    end := len
+    while end > 0 && path[end - 1] == '/'
+        end -= 1
+
+    if end == 0
+        return "/"
+
+    i := end - 1
+    while i >= 0 && path[i] != '/'
+        i -= 1
+
+    return path->substr_n(i + 1, end - i - 1)
+
+struct os.Timespec
+    tv_sec: i64
+    tv_nsec: i64
+
+func os.sleep[ms: i64] : void
+    if ms < 0
+        panic("negative time passed to os.sleep")
+    req := new os.Timespec
+    req->tv_sec = ms / 1000
+    req->tv_nsec = (ms % 1000) * 1000000
+    _builtin_syscall(SYS_nanosleep, req, 0)
+
+func os.time[] : i64
+    ts := new os.Timespec
+    _builtin_syscall(SYS_clock_gettime, CLOCK_REALTIME, ts)
+    out := ts->tv_sec * 1000 + ts->tv_nsec / 1000000
+    return out
+
+func os.urandom_buf[buf: ptr, n: i64] : void
+    pos := 0
+    while pos < n
+        ret := _builtin_syscall(SYS_getrandom, buf + pos, n - pos, 0)
+        if ret <= 0
+            panic("os.urandom_buf: syscall failed")
+        pos += ret
+
+func os.urandom[n: i64]: ptr
+    buf := mem.alloc(n)
+    os.urandom_buf(buf, n)
+    return buf
+
+func os.urandom_i64[] : i64
+    n := 0
+    os.urandom_buf(^n, 8)
+    return n
+
+func os.run_shell_command[command: str] : i64, bool
+    pid := _builtin_syscall(SYS_fork)
+    if pid < 0
+        return -1, false
+
+    if pid == 0
+        argv := ["sh", "-c", command, 0] // gets freed after child process exits
+        _builtin_syscall(SYS_execve, "/bin/sh", argv->data, _builtin_environ())
+        os.exit(1)
+    else
+        status := 0
+        wp := _builtin_syscall(SYS_wait4, pid, ^status, 0, 0)
+        if wp < 0
+            return -1, false
+        st := status & 0xffffffff
+        
+        if (st & 0x7f) == 0
+            return (st >> 8) & 0xff, true
+        else
+            return -(st & 0x7f), true
+
+func os.file_exists[path: str] : bool
+    return _builtin_syscall(SYS_faccessat, AT_FDCWD, path, F_OK, 0) == 0
+
+func os.get_file_size[path: str] : i64, bool
+    st := _stackalloc(256) // it has 21 mixed-size fields so ptr for now
+
+    rc := _builtin_syscall(SYS_newfstatat, AT_FDCWD, path, st, 0)
+    if rc != 0
+        return 0, false
+
+    return mem.read64(st + 48), true
+
+func os.is_a_directory[path: str] : bool
+    st := _stackalloc(256) // it has 21 mixed-size fields so ptr for now
+
+    rc := _builtin_syscall(SYS_newfstatat, AT_FDCWD, path, st, 0)
+    if rc != 0
+        return false
+
+    return (mem.read32(st + 24) & S_IFMT) == S_IFDIR
+
+func os.list_directory[path: str] : Array, bool
+    fd := _builtin_syscall(SYS_openat, AT_FDCWD, path, O_RDONLY, 0)
+    if fd < 0
+        return 0 as Array, false
+
+    files := []
+    buf := _stackalloc(1024)
+    while true
+        n := _builtin_syscall(SYS_getdents64, fd, buf, 1024)
+        if n < 0
+            files->free_with_items()
+            _builtin_syscall(SYS_close, fd)
+            return 0 as Array, false
+        else if n == 0
+            break
+
+        pos := 0
+        while pos < n
+            len := mem.read16(buf + pos + 16)
+            name : ptr = buf + pos + 19
+            if name[0]
+                skip := false
+                // skip if name is exactly '.' or '..'
+                if name[0] == '.'
+                    if name[1] == 0
+                        skip = true
+                    else if name[1] == '.'
+                        if name[2] == 0
+                            skip = true
+                if !skip
+                    files->push((name as str)->make_copy())
+            pos += len
+
+    _builtin_syscall(SYS_close, fd)
+    return files, true

std/posix.zr

@@ -0,0 +1,32 @@
+const STDIN_FILENO  = 0
+const STDOUT_FILENO = 1
+
+const SIGABRT = 6
+
+const AT_FDCWD = -100
+
+const S_IFDIR = 16384
+const S_IFMT  = 61440
+
+const PROT_NONE  = 0
+const PROT_READ  = 1
+const PROT_WRITE = 2
+const PROT_EXEC  = 4
+
+const MAP_FAILED          = -1
+const MAP_SHARED          = 1
+const MAP_PRIVATE         = 2
+const MAP_FIXED           = 16
+const MAP_ANONYMOUS       = 32
+
+const O_RDONLY = 0
+const O_WRONLY = 1
+const O_CREAT  = 64
+const O_TRUNC  = 512
+
+const SEEK_SET = 0
+const SEEK_END = 2
+
+const F_OK = 0
+
+const CLOCK_REALTIME = 0

std/str.zr

@@ -0,0 +1,299 @@
+include "num.zr"
+include "mem.zr"
+
+func u8.is_whitespace[x: u8] : bool
+    return x == ' ' || x == '\n' || x == '\t' || x == '\r'
+
+func u8.is_digit[x: u8] : bool
+    return x >= '0' && x <= '9'
+
+func u8.is_hex_digit[x: u8] : bool
+    return (x >= '0' && x <= '9') || (x >= 'a' && x <= 'f') || (x >= 'A' && x <= 'F')
+
+func u8.is_lowercase[x: u8] : bool
+    return x >= 'a' && x <= 'z'
+
+func u8.is_uppercase[x: u8] : bool
+    return x >= 'A' && x <= 'Z'
+
+func u8.is_letter[x: u8] : bool
+    return x->is_uppercase() || x->is_lowercase()
+
+func u8.is_alphanumeric[x: u8] : bool
+    return x->is_letter() || x->is_digit()
+
+func u8.to_str[c: u8] : str
+    s := mem.alloc(2) as str
+    s[0] = c
+    s[1] = 0
+    return s
+
+func str.free[s: str] : void
+    (s as ptr)->free()
+
+func str.len[s: str] : i64
+    i := 0
+    while s[i]
+        i += 1
+    return i
+
+func str.make_copy[s: str] : str
+    size := s->len() + 1
+    dup := mem.alloc(size) as str
+    mem.copy(s as ptr, dup as ptr, size)
+    return dup
+
+func str.equal[a: str, b: str] : bool
+    i := 0
+    while a[i] != 0 && b[i] != 0
+        if a[i] != b[i]
+            return false
+        i += 1
+    return a[i] == b[i]
+
+func str.equal_n[a: str, b: str, n: i64] : bool
+    i := 0
+    while i < n
+        if a[i] == 0 || b[i] == 0
+            return false
+        if a[i] != b[i]
+            return false
+        i += 1
+    return true
+
+func str.format_into[..] : i64
+    buf := _var_arg(0) as ptr
+    size := _var_arg(1) as i64
+    if size <= 0
+        return 0
+    s := _var_arg(2) as ptr
+    i := 3
+    n := 0
+
+    tmp := _stackalloc(64) as str
+
+    while s[0]
+        if s[0] == '%'
+            s += 1
+
+            if s[0] == 'd'
+                (_var_arg(i) as i64)->to_str_buf(tmp as ptr)
+                tmp_len := tmp->len()
+                remaining := size - n - 1
+                mem.copy(tmp as ptr, buf + n, math.min(tmp_len, remaining))
+                n += tmp_len
+                i += 1
+            else if s[0] == 'x'
+                (_var_arg(i) as i64)->to_hex_str_buf(tmp as ptr)
+                tmp_len := tmp->len()
+                remaining := size - n - 1
+                mem.copy(tmp as ptr, buf + n, math.min(tmp_len, remaining))
+                n += tmp_len
+                i += 1
+            else if s[0] == 's'
+                tmp_str := _var_arg(i) as str
+                tmp_len := tmp_str->len()
+                remaining := size - n - 1
+                mem.copy(tmp_str as ptr, buf + n, math.min(tmp_len, remaining))
+                n += tmp_len
+                i += 1
+            else if s[0] == 'c'
+                if n < size - 1
+                    buf[n] = _var_arg(i) as u8
+                n += 1
+                i += 1
+            else if s[0] == 'f'
+                // TODO: use arrow when we implement f64 params
+                f64.to_str_buf(_var_arg(i), tmp as ptr)
+                tmp_len := tmp->len()
+                remaining := size - n - 1
+                mem.copy(tmp as ptr, buf + n, math.min(tmp_len, remaining))
+                n += tmp_len
+                i += 1
+            else if s[0] == '%'
+                if n < size - 1
+                    buf[n] = '%'
+                n += 1
+            else if s[0] == 0
+                break
+            else
+                panic("str.format_into: unrecognized format")
+        else
+            if n < size - 1
+                buf[n] = s[0]
+            n += 1
+        s += 1
+
+    if n < size
+        buf[n] = 0
+    else if size > 0
+        buf[size - 1] = 0
+    return n
+
+func str.concat[a: str, b: str] : str
+    a_len := a->len()
+    b_len := b->len()
+    out := mem.alloc(a_len + b_len + 1) as str
+    mem.copy(a as ptr, out as ptr, a_len)
+    mem.copy(b as ptr, out as ptr + a_len, b_len)
+    out[a_len + b_len] = 0
+    return out
+
+func str.contains[haystack: str, needle: str] : bool
+    return haystack->find(needle) != -1
+
+func str.find[haystack: str, needle: str] : i64
+    haystack_len := haystack->len()
+    needle_len := needle->len()
+
+    if needle_len == 0
+        return 0
+    
+    if needle_len > haystack_len
+        return -1
+
+    for i in 0..(haystack_len - needle_len + 1)
+        if haystack[i] != needle[0]
+            continue
+        if needle_len == 1
+            return i
+        match := true
+        for j in 1..needle_len
+            if haystack[i + j] != needle[j]
+                match = false
+                break
+        if match
+            return i
+    return -1
+
+func str.substr_n[s: str, start: i64, length: i64] : str
+    out := mem.alloc(length + 1) as str
+    mem.copy(s as ptr + start, out as ptr, length)
+    out[length] = 0
+    return out
+
+func str.trim[s: str] : str
+    len := s->len()
+    if len == 0
+        out := mem.alloc(1) as str
+        out[0] = 0
+        return out
+
+    start := 0
+    end := len - 1
+
+    while start <= end && s[start]->is_whitespace()
+        start += 1
+
+    while end >= start && s[end]->is_whitespace()
+        end -= 1
+
+    return s->substr_n(start, end - start + 1)
+
+func str.reverse[s: str] : str
+    len := s->len()
+    out := mem.alloc(len + 1) as str
+
+    for i in 0..len
+        out[i] = s[len - i - 1]
+    out[len] = 0
+    return out
+
+
+func str.parse_i64[s: str] : i64
+    len := s->len()
+    i := 0
+
+    sign := 1
+    if i < len && s[i] == '-'
+        sign = -1
+        i += 1
+
+    num := 0
+    while i < len
+        d := s[i]
+        if !d->is_digit()
+            break
+        num = num * 10 + (d - '0')
+        i += 1
+    return num * sign
+
+func str.hex_encode[s: str, s_len: i64] : str
+    hex_chars := "0123456789abcdef"
+    out := mem.alloc(s_len * 2 + 1) as str
+
+    for i in 0..s_len
+        b := s[i]
+        out[i * 2]     = hex_chars[(b >> 4) & 15]
+        out[i * 2 + 1] = hex_chars[b & 15]
+
+    out[s_len * 2] = 0
+    return out
+
+func str._hex_digit_to_int[d: u8] : u8
+    if d->is_digit()
+        return d - '0'
+    lower : u8 = d | 32 
+    if lower >= 'a' && lower <= 'f'
+        return lower - 'a' + 10
+    panic("invalid hex digit passed to str._hex_digit_to_int")
+
+func str.hex_decode[s: str] : str
+    s_len := s->len()
+    if s_len % 2 != 0
+        panic("invalid hex string passed to str.hex_decode")
+
+    out_len := s_len / 2
+    out := mem.alloc(out_len + 1) as str
+
+    for i in 0..out_len
+        high := str._hex_digit_to_int(s[i * 2])
+        low := str._hex_digit_to_int(s[i * 2 + 1])
+        out[i] = (high << 4) | low
+
+    out[out_len] = 0
+    return out
+
+struct str.Builder
+    data: ptr
+    size: i64
+    capacity: i64
+
+func str.Builder._grow[b: str.Builder, needed: i64] : void
+    if b->size + needed > b->capacity
+        new_capacity := 64
+        if b->capacity != 0
+            new_capacity = b->capacity * 2
+        while new_capacity < b->size + needed
+            new_capacity = new_capacity * 2
+        b->data = b->data->realloc(new_capacity)
+        b->capacity = new_capacity
+
+func str.Builder.append_char[b: str.Builder, c: u8] : void
+    b->_grow(1)
+    b->data[b->size] = c
+    b->size += 1
+
+func str.Builder.append[b: str.Builder, s: str] : void
+    len := s->len()
+    b->_grow(len)
+    mem.copy(s as ptr, b->data + b->size, len)
+    b->size += len
+
+func str.Builder.build[b: str.Builder] : str
+    s := mem.alloc(b->size + 1) as str
+    mem.copy(b->data, s as ptr, b->size)
+    s[b->size] = 0
+    return s
+
+func str.Builder.build_and_free_buffer[b: str.Builder] : str
+    s := b->build()
+    b->free_buffer()
+    return s
+
+func str.Builder.free_buffer[b: str.Builder] : void
+    if b->data != 0
+        b->data->free()
+    b->size = 0
+    b->capacity = 0
+

test.zr

@@ -1,52 +1,80 @@
-func run_test[x: str] : void
+include "$/io.zr"
-    build_blacklist := ["examples/puzzles", "examples/raylib.zr", "examples/chip8.zr", "examples/sqlite_todo.zr"]
+include "$/os.zr"
-    run_blacklist := ["/aoc", "guess_number.zr", "tcp_server.zr", "udp_server.zr"]
 
-    for i in 0..build_blacklist->size
+struct TestRunner
-        if str.equal(x, array.nth(build_blacklist, i))
+    build_blacklist: Array
-            io.printf("Skipping %s...\n", x)
+    run_blacklist: Array
-            return 0
+    custom_build_flags: HashMap
+    custom_run_args: HashMap
+
+func TestRunner.run_directory[tr: TestRunner, dir: str] : void
+    files, ok := os.list_directory(dir)
+    if !ok
+        panic("failed to open test directory")
+    for i in 0..files->size
+        joined := dir->concat("/")->concat(files->nth(i))
+        if os.is_a_directory(joined)
+            tr->run_directory(joined)
+        else
+            tr->run_test(joined)
+
+func TestRunner.run_test[tr: TestRunner, x: str] : void
+    name := os.basename(x)
+
+    if tr->build_blacklist->contains_str(name)
+        io.printf("Skipping %s...\n", x)
+        return
 
     io.printf("Building %s...\n", x)
 
+    build_cmd := "./target/release/zern "->concat(x)
+    custom_build_flags, ok := tr->custom_build_flags->get(name)
+    if ok
+        build_cmd = build_cmd->concat(" ")->concat(custom_build_flags)
+
     build_start_time := os.time()
-    ~status, ok := os.run_shell_command(str.concat("./target/release/zern ", x))
+    status, ok := os.run_shell_command(build_cmd)
     if !ok || status != 0
         os.exit(1)
     build_end_time := os.time()
 
     io.printf("%dms\n", build_end_time - build_start_time)
 
-    for i in 0..run_blacklist->size
+    if tr->run_blacklist->contains_str(name)
-        if str.find(x, array.nth(run_blacklist, i)) != -1
+        io.printf("Skipping %s...\n", x)
-            io.printf("Skipping %s...\n", x)
+        return
-            return 0
 
     io.printf("Running %s...\n", x)
 
     run_cmd := "./out"
-    if str.equal(x, "examples/curl.zr")
+    custom_run_args, ok := tr->custom_run_args->get(name)
-        run_cmd = str.concat(run_cmd, " http://example.com")
+    if ok
+        run_cmd = run_cmd->concat(" ")->concat(custom_run_args)
 
     run_start_time := os.time()
-    ~status, ok := os.run_shell_command(run_cmd)
+    status, ok := os.run_shell_command(run_cmd)
     if !ok || status != 0
+        io.println("Test failed.")
         os.exit(1)
     run_end_time := os.time()
 
     io.printf("Running %s took %dms\n", x, run_end_time - run_start_time)
 
-func run_directory[dir: str] : void
-    ~files, ok := os.list_directory(dir)
-    if !ok
-        panic("failed to open test directory")
-    for i in 0..files->size
-        run_test(str.concat(dir, array.nth(files, i)))
-    
 func main[] : i64
-    ~status, ok := os.run_shell_command("cargo build --release")
+    status, ok := os.run_shell_command("cargo build --release")
     if !ok || status != 0
         os.exit(1)
 
-    run_directory("examples/")
+    tr := new TestRunner
-    run_directory("examples/puzzles/")
+    tr->build_blacklist = []
+    tr->run_blacklist = ["raylib.zr", "sqlite_todo.zr", "guess_number.zr", "udp_server.zr", "chip8.zr", "serve.zr"]
+    tr->custom_build_flags = HashMap.new()
+    tr->custom_build_flags->insert("raylib.zr", "-m -C \"-lraylib\"")
+    tr->custom_build_flags->insert("chip8.zr", "-m -C \"-lraylib\"")
+    tr->custom_build_flags->insert("sqlite_todo.zr", "-m -C \"-lsqlite3\"")
+    tr->custom_build_flags->insert("serve.zr", "-m -C \"-lpthread\"")
+    tr->custom_run_args = HashMap.new()
+    tr->custom_run_args->insert("curl.zr", "http://example.com")
+
+    tr->run_directory("examples")
+    io.println("DONE")