;; the function-type which enables this transform
(type (required-argument) :type ctype)
;; the transformation function. Takes the COMBINATION node and returns a
;; the function-type which enables this transform
(type (required-argument) :type ctype)
;; the transformation function. Takes the COMBINATION node and returns a