[oct-cvs] Oct commit: oct oct.asd

rtoy rtoy at common-lisp.net
Tue Jun 15 17:38:21 UTC 2010

Update of /project/oct/cvsroot/oct
In directory cl-net:/tmp/cvs-serv30729

Modified Files:
Log Message:
o Use arrays if we're not running with cmucl.

--- /project/oct/cvsroot/oct/oct.asd	2008/07/17 17:26:21	1.3
+++ /project/oct/cvsroot/oct/oct.asd	2010/06/15 17:38:21	1.4
@@ -47,6 +47,15 @@
 (eval-when (:load-toplevel :compile-toplevel :execute)
   (setf ext:*inline-expansion-limit* 1600))
+;; For all Lisps other than CMUCL, oct uses arrays to store the
+;; quad-double values.  This is denoted by the feature :oct-array.
+;; For CMUCL, quad-doubles can be stored in a (complex
+;; double-double-float) object, which is an extension in CMUCL.
+;; If you want CMUCL to use an array too, add :oct-array to *features*.
+(pushnew :oct-array *features*)
 (defpackage #:oct-system
   (:use #:cl))

More information about the oct-cvs mailing list