This is the mail archive of the guile@cygnus.com mailing list for the guile project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
Hi Sorry if this has been up already. I have problems with Jacal1a7 that generates a numerical overflow when I try to load math.scm, 1a5 works. ---------------------------------- guile> ........ERROR: In procedure modulo in expression (modulo (* a b) m): ERROR: Numerical overflow ABORT: (numerical-overflow) guile> (backtrace) Backtrace: 0* [primitive-load-path "slib/jacal/builtin"] 1* (define _-$1/$2 (make-rat (list $1 0 ...) (list $2 0 ...))) 2 (define-public _-$1/$2 (make-rat (list $1 0 ...) (list $2 0 ...))) ... 3 [eval (define-private _-$1/$2 (make-rat # #))] 4* (define-private _-$1/$2 (make-rat (list $1 0 ...) (list $2 0 ...))) 5* [define (define-private _-$1/$2 (#@make-rat # #)) (#<procedure (symbol define?)>)] 6* [make-rat (#(@1 "..." 1 ...) 0 -1) (#(@2 "..." 2 ...) 0 1)] 7 [list #(:@ "..." #f ...) (#(@1 "..." 1 ...) 0 -1) ... 8* [poly:negate (#(@2 "..." 2 ...) 0 1)] 9 [poly:* -1 (#(@2 "..." 2 ...) 0 1)] ... 10 [cons #(@2 "..." 2 ...) ... 11* [map #<procedure (x)> (0 1)] 12* [#<procedure (x)> 0] 13* [poly:* -1 0] 14 (cond ((and # #) (modular:* *modulus* p1 ...)) ((number? p1) (poly:times-scalar p1 p2)) ...) ... 15 [modulo 0 0] -------------------------- -- http://wiss.unx.nu http://linux.unx.nu