bugAxiom 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

Submitted by:  David MentrĂ© <dmentre>
Submitted on:  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)]

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

David Mentré <dmentre>
Project Administrator
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

My first error was to root everything at /SPAD. There are a number of
places in the code (and makefiles) where the file names are downshifted.
Thus the compile could not find "/spad/...". The cure was to make sure
the full pathname for the root directory did not contain upshifted
characters. E.g. /axiom or /home/kah/axiom. I think the one that got me
was in lsp/ccl/src/boot/Makefile 
           "DEPS = (load (string-downcase (quote ${IN}/npextras.lisp))".
OK it's part of GCL but it still burnt me.

My second error was to download the files to the windows host. I had
problems with a number of input files where there are files with the
same name (one upshifted and the other downshifted). EXPR.input.pamphlet
and expr.input.pamphlet for example. This will be a problem when you try
to compile on windows.

David Mentré <dmentre>
Project Administrator

 

No files currently attached

 

Depends on the following items: None found

Items that depend on this one: None found

 

CC list is empty

 

Do you think this task is very important?
If so, you can add your encouragement to it.
This task has 0 encouragements so far.

Only logged-in users can vote.

 

 

 

Follow 4 latest changes.

Date Changed by Updated Field Previous Value => Replaced by
2004-02-01 dmentre Open/ClosedFix proposed => Closed
2003-10-03 dmentre StatusNone => (Error - Not Found)
    Open/ClosedOpen => (Error - Not Found)
    ReproducibilityNone => (Error - Not Found)

Back to the top


Powered by Savane 3.7