#lang racket (require "chez-init.rkt") (define-datatype closure closure? [closure-record (id symbol?) (body expression?) (env environment?)])