Update of /project/movitz/cvsroot/movitz/losp/muerte In directory common-lisp.net:/tmp/cvs-serv7552

Modified Files: ratios.lisp Log Message: Rational is the direct superclass of ratio, not number.

Date: Fri Jul 30 15:04:17 2004 Author: ffjeld

Index: movitz/losp/muerte/ratios.lisp diff -u movitz/losp/muerte/ratios.lisp:1.3 movitz/losp/muerte/ratios.lisp:1.4 --- movitz/losp/muerte/ratios.lisp:1.3 Fri Jul 30 14:06:31 2004 +++ movitz/losp/muerte/ratios.lisp Fri Jul 30 15:04:17 2004 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld frodef@acm.org ;;;; Created at: Tue Jul 20 00:39:59 2004 ;;;; -;;;; $Id: ratios.lisp,v 1.3 2004/07/30 21:06:31 ffjeld Exp $ +;;;; $Id: ratios.lisp,v 1.4 2004/07/30 22:04:17 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------

@@ -22,7 +22,7 @@ (in-package muerte)

(defstruct (ratio (:constructor make-ratio (numerator denominator)) - (:superclass number)) + (:superclass rational)) numerator denominator)

(defun make-rational (numerator denominator)