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