RosettaCodeData/Task/Introspection/Common-Lisp/introspection-2.lisp
2023-07-01 13:44:08 -04:00

4 lines
103 B
Common Lisp

(defvar bloop -4)
(if (and (fboundp 'abs)
(boundp 'bloop))
(format t "~d~%" (abs bloop)))