Re: nightly build error fixed

[<don...@is...>]

Jean Louis writes:
 > On Sat, Dec 09, 2017 at 02:20:45PM +0000, Don Cohen wrote:
 > > 
 > > Don Cohen writes:
 > >  ...
 > >  >  > Makefile:41: recipe for target 'calls.o' failed
 > > 
 > > Just to confirm what whoever fixed this probably already knows,
 > > last night's build does not have the error reported yesterday.
 > 
 > I get now some new weird errors I did not have
 > before:

...

 > output="`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (setq *error-output* *standard-output*) (error "myerror"))' | tr -d '\r'`"; test "$output" = '*** - myerror' || exit 1
 > if ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (setq *error-output* *standard-output*) (error "myerror"))'; then exit 1; fi
 > *** - myerror
 > ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(truename (make-stream :output))'
 > *** - TRUENAME: File #P"/dev/pts/3" does not exist
 > 
 > make: *** [Makefile:2237: check-script] Error 1
 > admin [ /sources/gnu/clisp-clisp/build-2017-12-09-15:28:18-Saturday ]$ ls /dev/pts/ptmx


I don't normally make check, but now that I try it, the form above does
not give me the problem you show above.  

I do see some other complaints:
 $  cat /home/don/hg/clisp/build-dir/tests/*.erg
 Form: (HANDLER-CASE (LETF ((*CURRENT-LANGUAGE* 'FRENCH)) (LIST (STRING= "À bientôt!" (SYSTEM::TEXT "Bye.")) (STRING= *CURRENT-LANGUAGE* "FRANÇAIS"))) (ERROR (E) (PRINC-ERROR E) '(T T)))
 CORRECT: (T T)
 CLISP  : (NIL T)
 Differ at position 0: T vs NIL
 CORRECT: (T T)
 CLISP  : (NIL T)


 Form: (WITH-OPEN-FILE (COPY S) (STREAMP COPY))
 CORRECT: T
 CLISP  : ERROR
 OS-FILE-ERROR(13): Permission denied
 OUT:
 "[OS-FILE-ERROR]: OS-FILE-ERROR(13): Permission denied
 "


 Form: (LET ((*REOPEN-OPEN-FILE* NIL)) (WITH-OPEN-FILE (COPY S :DIRECTION :OUTPUT) (STREAMP COPY)))
 CORRECT: T
 CLISP  : ERROR
 OS-FILE-ERROR(13): Permission denied
 OUT:
 "[OS-FILE-ERROR]: OS-FILE-ERROR(13): Permission denied
 "


I was not aware of either LETF or *CURRENT-LANGUAGE* before.
[1]> (LETF ((*CURRENT-LANGUAGE* 'FRENCH))  (SYSTEM::TEXT "Bye."))
"Bye."
I don't have a strong expectation of what the other two failed
test forms ought to do either.