installer for maxima with ccl on windows



This is my result for the testsuite. The tests run without an error, but
at the end I get an unexpected output.

(%i2) build_info();

Maxima version: 5.23.2
Maxima build date: 20:27 2/27/2011
Host type: i686-pc-mingw32
Lisp implementation type: Clozure Common Lisp
Lisp implementation version: Version 1.7-dev-r14645M-trunk
(WindowsX8632)

(%o2)
(%i3) run_testsuite();

[...]

No unexpected errors found out of 8,720 tests.
(LOOP WITH ERRS = 'NIL FOR TESTENTRY IN TESTS-TO-RUN DO (IF (ATOM
TESTENTRY) (PR
OGN (SETF TEST-FILE TESTENTRY) (SETF EXPECTED-FAILURES NIL)) (PROGN
(SETF TEST-F
ILE (SECOND TESTENTRY)) (SETF EXPECTED-FAILURES (CDDR TESTENTRY))))
(FORMAT T (I
NTL:GETTEXT "Running tests in ~a: ") (IF (SYMBOLP TEST-FILE) (SUBSEQ
(PRINT-INVE
RT-CASE TEST-FILE) 1) TEST-FILE)) (OR (ERRSET (PROGN
(MULTIPLE-VALUE-SETQ (TESTR
ESULT TEST-COUNT) (TEST-BATCH ($FILE_SEARCH TEST-FILE
$FILE_SEARCH_TESTS) EXPECT
ED-FAILURES :SHOW-EXPECTED DISPLAY_KNOWN_BUGS :SHOW-ALL
DISPLAY_ALL :SHOWTIME TI
ME)) (SETF TESTRESULT (REST TESTRESULT)) (INCF TOTAL-COUNT TEST-COUNT)
(WHEN TES
TRESULT (INCF ERROR-COUNT (LENGTH (CDR TESTRESULT))) (SETQ ERRS (APPEND
ERRS (LI
ST TESTRESULT)))))) (PROGN (SETQ ERROR-BREAK-FILE (FORMAT NIL "~a"
TEST-FILE)) (
SETQ ERRS (APPEND ERRS (LIST (LIST ERROR-BREAK-FILE "error break"))))
(FORMAT T
(INTL:GETTEXT "~%Caused an error break: ~a~%") TEST-FILE))) FINALLY
(COND ((NULL
 ERRS) (FORMAT T (INTL:GETTEXT "~%~%No unexpected errors found out of
~:D tests.
~%") TOTAL-COUNT)) (T (FORMAT T (INTL:GETTEXT "~%Error summary:~%"))
(MAPCAR #'(
LAMBDA (X) (LET ((S (IF (> (LENGTH (REST X)) 1) "s" ""))) (FORMAT T
(INTL:GETTEX
T "Error~a found in ~a, problem~a:~%~a~%") S (FIRST X) S (SORT (REST X)
#'<))))
ERRS) (FORMAT T (INTL:GETTEXT "~&~:D test~P failed out of ~:D total
tests.~%") E
RROR-COUNT ERROR-COUNT TOTAL-COUNT)))) took 1,007,172 milliseconds
(1007.172 sec
onds) to run
                    with 2 available CPU cores.
During that period, 953,984 milliseconds (953.984 seconds) were spent in
user mo
de
                    8,265 milliseconds (8.265 seconds) were spent in
system mode

47,625 milliseconds (47.625 seconds) was spent in GC.
 9,501,617,839 bytes of memory allocated.
(%o0)                                done
---------------------------------------------------------------------

And this is my result for the share_testsuite:

Error summary:
Error#1=s found in
d:/Programme/Maxima-5.23.2/share/maxima/5.23.2/share/contrib/
stringproc/rtestprintf.mac, problem#1#:
(27 54)
Error#1=s found in
d:/Programme/Maxima-5.23.2/share/maxima/5.23.2/share/contrib/
graphs/rtest_graphs.mac, problem#1#:
(1 3 4 5 6 7 8 9 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 67 68 70 71 72 74 75 76 78 79 80 81 82 84 85 86 87
89 90 9
1)
85 tests failed out of 3,151 total tests.
(LOOP WITH ERRS = 'NIL FOR TESTENTRY IN TESTS-TO-RUN DO (IF (ATOM
TESTENTRY) (PR
OGN (SETF TEST-FILE TESTENTRY) (SETF EXPECTED-FAILURES NIL)) (PROGN
(SETF TEST-F
ILE (SECOND TESTENTRY)) (SETF EXPECTED-FAILURES (CDDR TESTENTRY))))
(FORMAT T (I
NTL:GETTEXT "Running tests in ~a: ") (IF (SYMBOLP TEST-FILE) (SUBSEQ
(PRINT-INVE
RT-CASE TEST-FILE) 1) TEST-FILE)) (OR (ERRSET (PROGN
(MULTIPLE-VALUE-SETQ (TESTR
ESULT TEST-COUNT) (TEST-BATCH ($FILE_SEARCH TEST-FILE
$FILE_SEARCH_TESTS) EXPECT
ED-FAILURES :SHOW-EXPECTED DISPLAY_KNOWN_BUGS :SHOW-ALL
DISPLAY_ALL :SHOWTIME TI
ME)) (SETF TESTRESULT (REST TESTRESULT)) (INCF TOTAL-COUNT TEST-COUNT)
(WHEN TES
TRESULT (INCF ERROR-COUNT (LENGTH (CDR TESTRESULT))) (SETQ ERRS (APPEND
ERRS (LI
ST TESTRESULT)))))) (PROGN (SETQ ERROR-BREAK-FILE (FORMAT NIL "~a"
TEST-FILE)) (
SETQ ERRS (APPEND ERRS (LIST (LIST ERROR-BREAK-FILE "error break"))))
(FORMAT T
(INTL:GETTEXT "~%Caused an error break: ~a~%") TEST-FILE))) FINALLY
(COND ((NULL
 ERRS) (FORMAT T (INTL:GETTEXT "~%~%No unexpected errors found out of
~:D tests.
~%") TOTAL-COUNT)) (T (FORMAT T (INTL:GETTEXT "~%Error summary:~%"))
(MAPCAR #'(
LAMBDA (X) (LET ((S (IF (> (LENGTH (REST X)) 1) "s" ""))) (FORMAT T
(INTL:GETTEX
T "Error~a found in ~a, problem~a:~%~a~%") S (FIRST X) S (SORT (REST X)
#'<))))
ERRS) (FORMAT T (INTL:GETTEXT "~&~:D test~P failed out of ~:D total
tests.~%") E
RROR-COUNT ERROR-COUNT TOTAL-COUNT)))) took 1,364,329 milliseconds
(1364.329 sec
onds) to run
                    with 2 available CPU cores.
During that period, 1,330,703 milliseconds (1330.703 seconds) were spent
in user
 mode
                    6,984 milliseconds (6.984 seconds) were spent in
system mode

54,657 milliseconds (54.657 seconds) was spent in GC.
 10,898,409,889 bytes of memory allocated.
(%o0)
d:/Programme/Maxima-5.23.2/share/maxima/5.23.2/share/share_testsuite.mac

Dieter Kaiser