(define-module (c cpp-environment internal-macro)
  :use-module (hnh util object)
  :export (internal-macro
           internal-macro?
           identifier body))

(define-type (internal-macro)
  (identifier type: string?)
  (body type: procedure?
        ;; Arity 2
        ))