Lines Matching refs:when
24 (cl:when (cl:and $owner (cl:not (cl:zerop address)))
77 constant pointer/references check this value when setting (around method?)
120 interfaces to generate when conflicts arise. */
305 (eval-when (:compile-toplevel :load-toplevel :execute)
315 (eval-when (:compile-toplevel :load-toplevel :execute)
328 (cl::progn (cl::when (cl::eq (cl::car form) 'swig-dispatcher)
393 (cl::when (cl::and (cl::eq lastcase :lower)
407 (cl::when (cl::eq type :setter)
432 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
444 (cl::when (cl::consp funcname)
470 when (cl::eq (cl::car i) :p+)
476 (cl::when (swig-anyvarargs-p ffargs)
478 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
498 when (eq lisparg :p+)
504 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
516 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
529 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
536 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
544 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
548 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
568 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
575 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
580 `(cl::eval-when (:compile-toplevel :load-toplevel :execute)
583 ) ;; eval-when
585 (cl::eval-when (:compile-toplevel :execute)
590 when (cl::or (starts-with-p (cl::symbol-name sym) (cl::symbol-name :swig-))
