[Ecls-list] cl-launch and ecl, again

[Juan Jose Garcia-Ripoll]

Ok, seems like HANDLER-BIND is a better option because you break
directly where the error happens. In the case of cl-launch, the
appropriate option to get into the debugger with errors would be to
use
  LAUNCH_FORM="(handler-bind ((error #'invoke-debugger)) (progn (setf
si::*break-enable*
t)${MAYBE_PACKAGE_FORM}${HASH_BANG_FORM}${LAUNCH_FORMS}))"
which both enables the debugger and binds it to error conditions.

When I apply this change to the test 86, the result is

;;; Warning: COMPILE-FILE warned while performing #<ASDF:COMPILE-OP
NIL 16823760> on
#<ASDF:CL-SOURCE-FILE "header" "cl-launch-14000-prefix" 7659520>.
Filesystem error with pathname
#P"/Users/jjgarcia/src/cl-launch/cl-launch-14000-load.lisp".
Either
 1) the file does not exist, or
 2) we are not allow to access the file, or
 3) the pathname points to a broken symbolic link.
Broken at SI:TOP-LEVEL.Available restarts:
1. (TRY-RECOMPILING) Try recompiling load
2. (RETRY) Retry performing #<ASDF:COMPILE-OP NIL 16823760> on
#<ASDF:CL-SOURCE-FILE "load" "cl-launch-14000-prefix" 7684056>.
3. (ACCEPT) Continue, treating #<ASDF:COMPILE-OP NIL 16823760> on
#<ASDF:CL-SOURCE-FILE "load" "cl-launch-14000-prefix" 7684056> as
having been successful.
Top level.
> :b
Backtrace: CL-LAUNCH::BUILD-AND-DUMP > cl-launch::run > si:bytecodes >
si:bytecodes > si:bytecodes > si:bytecodes > si:bytecodes >
si:bytecodes
> :v
Local variables:
  CL-LAUNCH::DUMP: "/Users/jjgarcia/src/cl-launch/clt.image"
  LOAD: "/Users/jjgarcia/src/cl-launch/clt-out-sh"
  CL-LAUNCH::SYSTEM: NIL
  RESTART: "tt"
  CL-LAUNCH::INIT: NIL
  CL-LAUNCH:QUIT: 0
  CL-LAUNCH::HEADER: "./cl-launch_2.09.sh"
  CL-LAUNCH::HEADER-FILE: "cl-launch-14000-header.lisp"
  CL-LAUNCH::LOAD-FILE: "cl-launch-14000-load"
> (probe-file "cl-launch-14000-load")
#P"/Users/jjgarcia/src/cl-launch/cl-launch-14000-load"
> (probe-file "cl-launch-14000-load.lisp")
NIL

The compiler fails to find the file without the appropriate extension.

Juanjo

-- 
Instituto de Física Fundamental, CSIC
c/ Serrano, 113b, Madrid 28009 (Spain)
http://juanjose.garciaripoll.googlepages.com