Skip to content
Snippets Groups Projects
Commit 69654518 authored by rtoy's avatar rtoy
Browse files

Reduce consing of SAPs in ROOM.

Patch from Helmut Eller, cmucl-imp 2011-08-11.
parent ba6c8f58
No related branches found
No related tags found
No related merge requests found
......@@ -5,7 +5,7 @@
;;; Carnegie Mellon University, and has been placed in the public domain.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/room.lisp,v 1.40 2010/04/20 17:57:45 rtoy Rel $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/room.lisp,v 1.41 2011/08/21 07:43:38 rtoy Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -368,7 +368,7 @@
(fixnum (sap+ current size))
(memory-size (sap+ current size)))))
(setf current c))))
(declare (inline next))
(declare (inline next maybe-finish-mapping))
(loop
(maybe-finish-mapping)
(maybe-skip-page)
......
......@@ -136,6 +136,7 @@ New in this release:
- Getting documentation of a structure via DOCUMENTATION no longer
signals an error in DGETTEXT trying to translate the null
documentation string.
- Reduce unnecessary consing of SAPs in ROOM.
* Trac Tickets:
......
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