Skip to content
Snippets Groups Projects
Commit cba269da authored by ram's avatar ram
Browse files

Delete obsolete #-reload conditional.

parent f699c8ec
No related branches found
No related tags found
No related merge requests found
......@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pred.lisp,v 1.31 1993/03/13 16:53:00 ram Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/pred.lisp,v 1.32 1993/03/14 17:19:01 ram Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -118,7 +118,6 @@
;;; than type-of. In particular, speed is more important than precision, and
;;; it is not permitted to return member types.
;;;
#-reload
(defun type-of (object)
"Return the type of OBJECT."
(if (typep object '(or function array))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment