(define-module (c cpp-environment function-like-macro)
  :use-module (hnh util object)
  :use-module (hnh util type)
  :export (function-like-macro
           function-like-macro?
           identifier
           identifier-list
           body
           variadic?))

(define-type (function-like-macro)
  (identifier type: string?)
  (identifier-list type: (list-of string?))
  ;; TODO import these
  (body type: list? ; (list-of (or whitespace-token? preprocessing-token?))
        )
  (variadic? type: boolean?
             default: #f))