[oct-cvs] Oct commit: oct branch-test.lisp qd-class.lisp qd-complex.lisp qd-format.lisp qd-methods.lisp rt-tests.lisp tests.lisp timing2.lisp

[rtoy]

Update of /project/oct/cvsroot/oct
In directory clnet:/tmp/cvs-serv32041

Modified Files:
	branch-test.lisp qd-class.lisp qd-complex.lisp qd-format.lisp 
	qd-methods.lisp rt-tests.lisp tests.lisp timing2.lisp 
Log Message:
Use package #:oct, not #:qd.


--- /project/oct/cvsroot/oct/branch-test.lisp	2007/08/25 18:49:27	1.1
+++ /project/oct/cvsroot/oct/branch-test.lisp	2007/10/13 02:14:43	1.2
@@ -30,7 +30,7 @@
 ;;; computing the values correctly for the branch cuts.  We need to
 ;;; fix this.
 
-(in-package #:qd)
+(in-package #:oct)
 
 (defun check-signs (fun arg real-sign imag-sign)
   (let* ((z (funcall fun arg))
--- /project/oct/cvsroot/oct/qd-class.lisp	2007/09/19 17:30:04	1.26
+++ /project/oct/cvsroot/oct/qd-class.lisp	2007/10/13 02:14:43	1.27
@@ -23,7 +23,7 @@
 ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
-(in-package #:qd)
+(in-package #:oct)
 
 (define-symbol-macro * cl:*)
 (define-symbol-macro - cl:-)
--- /project/oct/cvsroot/oct/qd-complex.lisp	2007/09/18 12:46:36	1.37
+++ /project/oct/cvsroot/oct/qd-complex.lisp	2007/10/13 02:14:43	1.38
@@ -23,7 +23,7 @@
 ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
-(in-package #:qd)
+(in-package #:oct)
 
 (defmethod add1 ((a qd-complex))
   (make-instance 'qd-complex
--- /project/oct/cvsroot/oct/qd-format.lisp	2007/08/29 14:37:42	1.6
+++ /project/oct/cvsroot/oct/qd-format.lisp	2007/10/13 02:14:43	1.7
@@ -23,7 +23,7 @@
 ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
-(in-package #:qd)
+(in-package #:oct)
 
 (defun qd-scale-exponent (original-x)
   (let* ((x original-x))
--- /project/oct/cvsroot/oct/qd-methods.lisp	2007/10/10 15:24:07	1.62
+++ /project/oct/cvsroot/oct/qd-methods.lisp	2007/10/13 02:14:43	1.63
@@ -23,7 +23,7 @@
 ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
-(in-package #:qd)
+(in-package #:oct)
 
 (defconstant +pi+
   (make-instance 'qd-real :value qdi:+qd-pi+)
--- /project/oct/cvsroot/oct/rt-tests.lisp	2007/09/18 03:05:56	1.2
+++ /project/oct/cvsroot/oct/rt-tests.lisp	2007/10/13 02:14:43	1.3
@@ -23,7 +23,7 @@
 ;;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
-(in-package #:qd)
+(in-package #:oct)
 
 ;; Compute how many bits are the same for two numbers EST and TRUE.
 ;; Return T if they are identical.
--- /project/oct/cvsroot/oct/tests.lisp	2007/08/25 18:49:27	1.1
+++ /project/oct/cvsroot/oct/tests.lisp	2007/10/13 02:14:43	1.2
@@ -24,7 +24,7 @@
 ;;;; OTHER DEALINGS IN THE SOFTWARE.
 
 
-(in-package #:qd)
+(in-package #:oct)
 
 (defun bit-accuracy (est true)
   (let* ((diff (abs (- est true)))
--- /project/oct/cvsroot/oct/timing2.lisp	2007/10/11 18:59:05	1.2
+++ /project/oct/cvsroot/oct/timing2.lisp	2007/10/13 02:14:43	1.3
@@ -27,7 +27,7 @@
 ;;; test code. I've tried to make these versions time the same
 ;;; operations as Yozo's.
 
-(in-package #:qd)
+(in-package #:oct)
 
 (defun time-add (&optional (n 100000))
   (declare (fixnum n)