(module main)

(struct Point
  (x i32)
  (y i32))

(fn point_sum () -> i32
  (+ (. (Point (x 20) (y 22)) x) (. (Point (x 20) (y 22)) y)))

(test "struct field access"
  (= (point_sum) 42))

(test "struct field compares"
  (= (. (Point (x 7) (y 9)) y) 9))

(fn main () -> i32
  (point_sum))
