Axiom Computer Algebra System - Bugs: bug #5059, Axiom does not compile with...
You are not allowed to post comments on this tracker with your current authentication level.
bug #5059: Axiom does not compile with upshifted characters in path
Submitter: | David Mentré <dmentre> | ||
Submitted: | Wed 03 Sep 2003 09:12:49 PM UTC | ||
Category: | build process | Severity: | 3 - Normal |
Item Group: | code bug | Status: | Remind |
Privacy: | Public | Assigned to: | None |
Originator Name: | Keith Harrison | Open/Closed: | Closed |
Release: | Tue, 2 Sep 2003 09:41:01 +0100 | Reproducibility: | Every Time |
Fixed Release: | |||
Error message: |
|
||
Example of code trigerring the bug: |
|
||
Internal cause: |
|
Fri 03 Oct 2003 12:33:01 PM UTC, comment #1: [Fix (i.e. patch)] |
David Mentré <dmentre> |
Wed 03 Sep 2003 09:12:49 PM UTC, original submission:
Original message: http://mail.gnu.org/archive/html/axiom-developer/2003-09/msg00015.html
|
David Mentré <dmentre> |
No files currently attached
Depends on the following items: None found
Items that depend on this one: None found
There are 0 votes so far. Votes easily highlight which items people would like to see resolved in priority, independently of the priority of the item set by tracker managers.
Follow 4 latest changes.
Date | Changed by | Updated Field | Previous Value | => | Replaced by |
---|---|---|---|---|---|
2004-02-01 | dmentre | Open/Closed | Fix proposed | Closed | |
2003-10-03 | dmentre | Status | None | None | |
Open/Closed | Open | None | |||
Reproducibility | None | None |
Powered by Savane 3.13-758e.
Corresponding source code
Juergen Weiss proposes following patch:
Index: util.lisp.pamphlet
===================================================================
RCS file: /cvsroot/axiom/axiom/src/interp/util.lisp.pamphlet,v
retrieving revision 1.1
diff -c -r1.1 util.lisp.pamphlet
* util.lisp.pamphlet 28 Aug 2003 14:23:40 -0000 1.1
--- util.lisp.pamphlet 2 Oct 2003 21:39:10 -0000
*************
* 44,50 **
#+:AKCL
(in-package "BOOT")
(push :oldboot features)
! (mapcar #'load-a-file load-files)
(make-depsys lsp src int obj mnt sys)
(initroot spad)
#+:AKCL
--- 44,50 ----
#+:AKCL
(in-package "BOOT")
(push :oldboot features)
! (mapcar #'load load-files)
(make-depsys lsp src int obj mnt sys)
(initroot spad)
#+:AKCL
*************
* 131,137 **
:array 400 :string 500 :cfun 100 :cpages 1000
:rpages 1000 :hole 2000)
<<compiler-notes>>
! (mapcar #'load-a-file load-files)
(|resetWorkspaceVariables|)
(|initHist|)
(|initNewWorld|)
--- 131,137 ----
:array 400 :string 500 :cfun 100 :cpages 1000
:rpages 1000 :hole 2000)
<<compiler-notes>>
! (mapcar #'load load-files)
(|resetWorkspaceVariables|)
(|initHist|)
(|initNewWorld|)
*************
* 142,159 **
#+:CCL
(resethashtables)
(setq load-verbose nil)
! (|setBootAutloadProperties| comp-functions (mapcar #'filename-downcase
! comp-files))
! (|setBootAutloadProperties| parse-functions (mapcar #'filename-downcase
! parse-files))
! (|setBootAutloadProperties| browse-functions (mapcar #'filename-downcase
! browse-files))
! (|setBootAutloadProperties| translate-functions (mapcar #'filename-downcase
! translate-files))
! (|setNAGBootAutloadProperties| nagbr-functions (mapcar #'filename-downcase
! nagbr-files))
! (|setBootAutloadProperties| asauto-functions (mapcar #'filename-downcase
! asauto-files))
(setf (symbol-function 'boot::|addConsDB|) #'identity)
(resethashtables) ; the databases into core, then close the streams
)
--- 142,153 ----
#+:CCL
(resethashtables)
(setq load-verbose nil)
! (|setBootAutloadProperties| comp-functions comp-files)
! (|setBootAutloadProperties| parse-functions parse-files)
! (|setBootAutloadProperties| browse-functions browse-files)
! (|setBootAutloadProperties| translate-functions translate-files)
! (|setNAGBootAutloadProperties| nagbr-functions nagbr-files)
! (|setBootAutloadProperties| asauto-functions asauto-files)
(setf (symbol-function 'boot::|addConsDB|) #'identity)
(resethashtables) ; the databases into core, then close the streams
)
Index: Makefile.pamphlet
===================================================================
RCS file: /cvsroot/axiom/axiom/src/interp/Makefile.pamphlet,v
retrieving revision 1.3
diff -c -r1.3 Makefile.pamphlet
* Makefile.pamphlet 5 Sep 2003 22:14:19 -0000 1.3
--- Makefile.pamphlet 2 Oct 2003 21:39:11 -0000
*************
* 525,531 **
@ echo '(load "${OUT}/nocompil")' >> ${OUT}/makedep.lisp
@ echo '(load "${OUT}/util")' >> ${OUT}/makedep.lisp
@ echo '(in-package "BOOT")' >> ${OUT}/makedep.lisp
! @ echo '(build-depsys (quote (${DEP})) "${SPAD}" "${GCLDIR}" "${SRC}"
"${INT}" "${OBJ}" "${MNT}" "${SYS}")' >> ${OUT}/makedep.lisp
@ echo '(unless (probe-file "${OUT}/postpar.${O}") (compile-file
"${OUT}/postpar.${LISP}" :output-file "${OUT}/postpar.${O}"))' >>
${OUT}/makedep.lisp
@ echo '(load "${OUT}/postpar")' >> ${OUT}/makedep.lisp
@ echo '(unless (probe-file "${OUT}/parse.${O}") (compile-file
"${OUT}/parse.${LISP}" :output-file "${OUT}/parse.${O}"))' >>
${OUT}/makedep.lisp
--- 525,531 ----
@ echo '(load "${OUT}/nocompil")' >> ${OUT}/makedep.lisp
@ echo '(load "${OUT}/util")' >> ${OUT}/makedep.lisp
@ echo '(in-package "BOOT")' >> ${OUT}/makedep.lisp
! @ echo '(build-depsys (quote ($(patsubst %, "%", ${DEP}))) "${SPAD}"
"${GCLDIR}" "${SRC}" "${INT}" "${OBJ}" "${MNT}" "${SYS}")' >>
${OUT}/makedep.lisp
@ echo '(unless (probe-file "${OUT}/postpar.${O}") (compile-file
"${OUT}/postpar.${LISP}" :output-file "${OUT}/postpar.${O}"))' >>
${OUT}/makedep.lisp
@ echo '(load "${OUT}/postpar")' >> ${OUT}/makedep.lisp
@ echo '(unless (probe-file "${OUT}/parse.${O}") (compile-file
"${OUT}/parse.${LISP}" :output-file "${OUT}/parse.${O}"))' >>
${OUT}/makedep.lisp
*************
* 599,605 **
@ echo '(in-package "BOOT")' >> ${OUT}/makeint.lisp
@ touch ${TIMESTAMP}
@ echo '${YEARWEEK}' >> ${OUT}/makeint.lisp
! @ echo '(build-interpsys (append (quote (${OBJS})) (quote (${ASCOMP}))
(quote (${INOBJS}))) (quote (${OPOBJS})) (quote (${OCOBJS})) (quote
(${BROBJS})) (quote (${TRANOBJS})) (quote (${NAGBROBJS})) (quote (${ASAUTO}))
"${SPAD}" "${LSP}" "${SRC}" "${INT}" "${OBJ}" "${MNT}" "${SYS}")' >>
${OUT}/makeint.lisp
@ echo '(in-package "SCRATCHPAD-COMPILER")' >> ${OUT}/makeint.lisp
# @ echo '(|shoeInternFile| "${MNT}/${SYS}/doc/msgs/co-eng.msgs")' >>
${OUT}/makeint.lisp
@ echo '(boot::set-restart-hook)' >> ${OUT}/makeint.lisp
--- 599,605 ----
@ echo '(in-package "BOOT")' >> ${OUT}/makeint.lisp
@ touch ${TIMESTAMP}
@ echo '${YEARWEEK}' >> ${OUT}/makeint.lisp
! @ echo '(build-interpsys (append (quote ($(patsubst %, "%", ${OBJS})))
(quote ($(patsubst %, "%", ${ASCOMP}))) (quote ($(patsubst %, "%",
${INOBJS})))) (quote ($(patsubst %, "%", ${OPOBJS}))) (quote ($(patsubst %,
"%", ${OCOBJS}))) (quote ($(patsubst %, "%", ${BROBJS}))) (quote ($(patsubst %,
"%", ${TRANOBJS}))) (quote ($(patsubst %, "%", ${NAGBROBJS}))) (quote
($(patsubst %, "%", ${ASAUTO}))) "${SPAD}" "${LSP}" "${SRC}" "${INT}"
"${OBJ}" "${MNT}" "${SYS}")' >> ${OUT}/makeint.lisp
@ echo '(in-package "SCRATCHPAD-COMPILER")' >> ${OUT}/makeint.lisp
# @ echo '(|shoeInternFile| "${MNT}/${SYS}/doc/msgs/co-eng.msgs")' >>
${OUT}/makeint.lisp
@ echo '(boot::set-restart-hook)' >> ${OUT}/makeint.lisp