1.7976931348623157E308 on Windows 2000, was: Maxima 5.16.2

Petros,

thanks for your comment. You observed that loading numdistrib.lisp on Windows 2000 and 
XP shows different results. The point is that on Windows 2000 GCL (CLISP also fails) can't 
read the most positive flonum:

Maxima 5.16.2 http://maxima.sourceforge.net
Using Lisp GNU Common Lisp (GCL) GCL 2.6.8 (aka GCL)

(%i1) :lisp most-positive-flonum
1.7976931348623157E308
(%i1) :lisp 1.7976931348623157E308
 Error in MACSYMA-TOP-LEVEL [or a callee]: Floating-point overflow.

While on XP reading 1.7976931348623157E308 is no problem. 

1.7976931348623157E308 can be found in numdistrib.lisp at line 537. 
This bug is easily fixed by replacing 1.7976931348623157E308 by most-positive-flonum.

If there will be no objection I'll commit this small change (to both HEAD and 5-16-
RELEASE_BRANCH).

Volker van Nek


Am 18 Aug 2008 um 22:19 hat Petros E Zimourtopoulos geschrieben:

>   On MSWXPP&SP3:
> 
>   Maxima 5.16.2 http://maxima.sourceforge.net
> 
>   <snip>
> 
>  (%i1) Running tests in rtestnset: 502/502 tests passed.
> 
>   <snip>
> 
>   No unexpected errors found.
>   real time       :     69.410 secs
> ----------------------------------------------------------------
> | (%i1) load(share_testsuite);
> | 
> | <snip>
> | 
> | Error summary:
> | Errors found in C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/Zeilberger/rtest_zeilberger.mac, 
> | problems:
> | (47 52)
> | Errors found in C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/stats/rtest_stats.mac, 
> | problems:
> | (1 2 3 4 5 6 7 8 9 10 11 12 13)
> | Errors found in C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/distrib/rtest_distrib.mac, 
> | problems:
> | (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
> | 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
> | 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72
> | 73 74 75 76 77 78 79 80 81 82)
> | Error found in rtest_interpol, problem:
> | (error break)
> | Error found in C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/levin/rtest_levin.mac, 
> | problem:
> | (77)
> | Errors found in C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/fractals/rtest_fractals.mac, 
> | problems:
> | (9 10 11)
> | Error found in $RTEST_FOURIER_ELIM, problem:
> | (error break)
> | Error found in $RTEST_SEQUENCE, problem:
> | (error break)
> | Error found in test-eigens-by-jacobi, problem:
> | (error break)
> | real time       :     78.220 secs
> ----------------------------------------------------------------
>   (%i1) load(share_testsuite);
> 
>   <snip>
> 
>   Error summary:
>   Errors found in P:/PROGRA~1/MAXIMA~
>   1.2/share/maxima/5.16.2/share/contrib/Zeilberger/rtest_zeilberger.mac, 
>   problems:
>   (47 52)
>   Error found in rtest_interpol, problem:
>   (error break)
>   Error found in P:/PROGRA~1/MAXIMA~1.2/share/maxima/5.16.2/share/contrib/
>   levin/rtest_levin.mac, 
>   problem:
>   (77)
>   Errors found in P:/PROGRA~1/MAXIMA~1.2/share/maxima/5.16.2/share/
>   contrib/fractals/rtest_fractals.mac, problems:
>   (9 10 11)
>   real time       :     62.840 secs
> ----------------------------------------------------------------
> | It seems that there occurs a general problem with stats and distrib:
> | 
> | (%i1) load (distrib);
> | Load failed for C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/distrib/numdistrib.lisp
> | -- an error.  To debug this try debugmode(true);
> | (%i2) load (stats);
> | Load failed for C:/Programme/Maxima-
> | 5.16.2/share/maxima/5.16.2/share/contrib/distrib/numdistrib.lisp
> | -- an error.  To debug this try debugmode(true);
> ----------------------------------------------------------------
>   (%i1) load (distrib);
>   (%o1) P:/PROGRA~1/MAXIMA~1.2/share/maxima/5.16.2
>         /share/contrib/distrib/distrib.mac
>   (%i2) load (stats);
>   (%o2) P:/PROGRA~1/MAXIMA~1.2/share/maxima/5.16.2
>         /share/contrib/stats/stats.mac
> ----------------------------------------------------------------
> | For the case that someone wishes to read the complete output 
> | from the share_test_suite I attached it.
> | 
> | Volker
> | 
> | Am 18 Aug 2008 um 9:53 hat Andrej Vodopivec geschrieben:
> | 
> |> I have uploaded a windows installer.
> |> 
> |> Andrej
> ----------------------------------------------------------------
>    Sincerely,
> 
>    Petros
>    http://www.antennas.gr
> 
>      
> 
> 
> _______________________________________________
> Maxima mailing list
> Maxima at math.utexas.edu
> http://www.math.utexas.edu/mailman/listinfo/maxima