(in-package "SB!C")
+(/show0 "knownfun.lisp 17")
+
;;; IR1 boolean function attributes
;;;
;;; There are a number of boolean attributes of known functions which we like
\f
;;;; interfaces to defining macros
-;;; The TRANSFORM structure represents an IR1 transform.
-(defstruct transform
+;;; an IR1 transform
+(defstruct (transform (:copier nil))
;; the function-type which enables this transform
(type (required-argument) :type ctype)
;; the transformation function. Takes the COMBINATION node and returns a
(let ((cont (nth (1- n) (combination-args call))))
(when (and cont (constant-continuation-p cont))
(specifier-type (continuation-value cont))))))
+
+(/show0 "knownfun.lisp end of file")