[Openmcl-cvs-notifications] r13149 - /release/1.4/source/compiler/nx0.lisp

[gb at clozure.com]

Author: gb
Date: Fri Oct 30 18:36:45 2009
New Revision: 13149

Log:
Propagate r13131 to 1.4.

Modified:
    release/1.4/source/compiler/nx0.lisp

Modified: release/1.4/source/compiler/nx0.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- release/1.4/source/compiler/nx0.lisp (original)
+++ release/1.4/source/compiler/nx0.lisp Fri Oct 30 18:36:45 2009
@@ -45,7 +45,7 @@
 (defvar *nx-inner-functions* nil)
 (defvar *nx-cur-func-name* nil)
 (defvar *nx-current-note* nil)
-(defparameter *nx-source-note-map* nil) ;; there might be external refs, f=
rom macros.
+(defvar *nx-source-note-map* nil) ;; there might be external refs, from ma=
cros.
 (defvar *nx-form-type* t)
 ;(defvar *nx-proclaimed-inline* nil)
 ;(defvar *nx-proclaimed-inline* (make-hash-table :size 400 :test #'eq))