Skip to content
Snippets Groups Projects
Commit 92172dc6 authored by wlott's avatar wlott
Browse files

Nuked defvar of compiler-version, 'cause it's in the compiler now. Nuked

defparameter %fasl-code-format, 'cause it's no longer needed.  (The loader
used vm:target-fasl-file-implementation and -version directly now.)
parent e1db8fe0
No related branches found
No related tags found
No related merge requests found
...@@ -7,7 +7,7 @@ ...@@ -7,7 +7,7 @@
;;; Scott Fahlman (FAHLMAN@CMUC). ;;; Scott Fahlman (FAHLMAN@CMUC).
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/lispinit.lisp,v 1.14 1990/10/22 02:23:36 wlott Exp $ ;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/lispinit.lisp,v 1.15 1990/10/23 02:04:37 wlott Exp $
;;; ;;;
;;; Initialization stuff for CMU Common Lisp, plus some other random functions ;;; Initialization stuff for CMU Common Lisp, plus some other random functions
;;; that we don't have any better place for. ;;; that we don't have any better place for.
...@@ -52,14 +52,12 @@ ...@@ -52,14 +52,12 @@
;;; Random information: ;;; Random information:
(defvar compiler-version "???")
(defvar *lisp-implementation-version* "4.0(?)") (defvar *lisp-implementation-version* "4.0(?)")
(defvar *in-the-compiler* nil (defvar *in-the-compiler* nil
"Bound to T while running code inside the compiler. Macros may test this to "Bound to T while running code inside the compiler. Macros may test this to
see where they are being expanded.") see where they are being expanded.")
(defparameter %fasl-code-format #.vm:target-fasl-code-format)
;;; Must be initialized in %INITIAL-FUNCTION before the DEFVAR runs... ;;; Must be initialized in %INITIAL-FUNCTION before the DEFVAR runs...
(proclaim '(special *gc-inhibit* *already-maybe-gcing* (proclaim '(special *gc-inhibit* *already-maybe-gcing*
......
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