(let ((type p (record (name string) (age int))) (var x (new p (name "Phil") (age 24)))) ())