sorry, +system-copy-multiplier+ is 1.
(eval-when (:compile-toplevel :load-toplevel :execute)
(sb-ext:without-package-locks
(defvar *system-copy-fn* (intern SYSTEM-AREA-UB8-COPY SB-KERNEL))
(defconstant +system-copy-multiplier+ 1)))
--
To UNSUBSCRIBE, email to
Package: cl-kmrcl
Version: 1.106-1
Severity: normal
byte-stream.lisp: SB-KERNEL:COPY-SYSTEM-AREA and COPY-SYSTEM-UB8-AREA ware
renamed to SYSTEM-AREA-UB8-COPY and COPY-UB8-FROM-SYSTEM-AREA scince version
0.8.21
log:
http://sbcl.cvs.sourceforge.net/viewvc/sbcl/sbcl/src/code/bit-
2 matches
Mail list logo