oct-cvs June 2010

oct-cvs@common-lisp.net

1 participants
3 discussions

[oct-cvs] Oct commit: oct .cvsignore
by rtoy 15 Jun '10

15 Jun '10

Update of /project/oct/cvsroot/oct In directory cl-net:/tmp/cvs-serv11104 Modified Files: .cvsignore Log Message: Ignore more fasls. --- /project/oct/cvsroot/oct/.cvsignore 2007/10/10 15:25:41 1.4 +++ /project/oct/cvsroot/oct/.cvsignore 2010/06/15 18:27:37 1.5 @@ -1,7 +1,9 @@ -*.ppcf -*.sparcf -*.x86f *.err +*.fas *.fasl *.lib -*.fas +*.ppcf +*.sparcf +*.x86f +*.sse2f +*.dx32fsl

1 0

[oct-cvs] Oct commit: oct oct.system
by rtoy 15 Jun '10

15 Jun '10

Update of /project/oct/cvsroot/oct In directory cl-net:/tmp/cvs-serv11007 Modified Files: oct.system Log Message: Add in-package. --- /project/oct/cvsroot/oct/oct.system 2007/11/28 21:41:27 1.24 +++ /project/oct/cvsroot/oct/oct.system 2010/06/15 18:26:39 1.25 @@ -1,4 +1,4 @@ -;;;; -*- Mode: lisp -*- +;;;; -*- Mode: lisp; Package: CL-USER -*- ;;;; ;;;; Copyright (c) 2007 Raymond Toy ;;;; @@ -23,6 +23,7 @@ ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR ;;;; OTHER DEALINGS IN THE SOFTWARE. +(in-package #:cl-user) ;; If you want all core functions to be inline (like the C++ code ;; does), add :qd-inline to *features* by enabling the following line. ;; This makes compilation much, much slower, but the resulting code

1 0

[oct-cvs] Oct commit: oct oct.asd
by rtoy 15 Jun '10

15 Jun '10

Update of /project/oct/cvsroot/oct In directory cl-net:/tmp/cvs-serv30729 Modified Files: oct.asd 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*. +#-cmu +(pushnew :oct-array *features*) + (defpackage #:oct-system (:use #:cl))

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

oct-cvs June 2010