Faré, your code is not valid in ECL because ECL does not support to use run-program with output to text strings. This is not a bug but something that would involve some major redesign of the function we have.
On Tue, Apr 30, 2013 at 2:52 AM, Faré <[email protected]> wrote: > I believe this is a bug in ECL. > > Its can be reproduced this way: > > (in-package :asdf) > (let ((ok1 (format nil "; $ echo ok 1~%ok 1~%"))) > (assert-equal > (with-output-to-string (s) > (let ((*verbose-out* t) > (*standard-output* s)) > (run-shell-command "echo ok ~D" 1))) > ok1)) > > Or more simply this way: > (with-output-to-string (*standard-output*) (uiop:RUN-PROGRAM "echo ok > 1" :FORCE-SHELL T :IGNORE-ERROR-STATUS T :OUTPUT T)) > > I've commented out this test for ECL. > > Thanks for the bug report! > > —♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• > http://fare.tunes.org > In a five year period we can get one superb programming language. > Only we can't control when the five year period will begin. — Alan Perlis > > > On Mon, Apr 29, 2013 at 6:43 PM, Robert Goldman <[email protected]> > wrote: > > On ECL 12.12.1 on Mac OSX, test-run-program.script failed for me: > > > > ;;; Loading "/Users/rpg/lisp/asdf/test/script-support.lisp" > > ;;; Loading "/Users/rpg/lisp/asdf/build/fasls/ecl/asdf.fas" > > Configuring ASDF > > Enabling debugging > > Being a bit verbose > > Comparing directories > > ASDF-TEST:*TEST-DIRECTORY* and ASDF-TEST::X both evaluate to same path: > > #P"/Users/rpg/lisp/asdf/test/" > > Frob packages > > > > Internal or unrecoverable error in: > > illegal stream mode > > [2: No such file or directory] > > > > ;;; ECL C Backtrace > > ;;; 0 libecl.12.12.dylib 0x000000010e3b68e4 > > si_dump_c_backtrace + 52 > > ;;; 1 libecl.12.12.dylib 0x000000010e3a7721 > > ecl_internal_error + 113 > > ;;; 2 libecl.12.12.dylib 0x000000010e39abb4 > > ecl_stream_to_handle + 148 > > ;;; 3 libecl.12.12.dylib 0x000000010e3dbc50 > > si_run_program + 1168 > > ;;; 4 libecl.12.12.dylib 0x000000010e3641b3 si_system > > + 179 > > ;;; 5 asdf.fas 0x0000000111514e98 > > LC359system + 440 > > ;;; 6 asdf.fas 0x00000001115150db > > LC360call_system + 523 > > ;;; 7 asdf.fas 0x000000011151552f > > LC361uiop_stream__think + 1023 > > ;;; 8 asdf.fas 0x000000011153bdae > > L288call_with_temporary_file + 3182 > > ;;; 9 asdf.fas 0x0000000111515d96 > > L363run_program + 1334 > > ;;; 10 asdf.fas 0x00000001114e6356 > > L849run_shell_command + 758 > > ;;; 11 libecl.12.12.dylib 0x000000010e373c25 APPLY + > 101 > > ;;; 12 libecl.12.12.dylib 0x000000010e38382c > > ecl_interpret + 9932 > > ;;; 13 libecl.12.12.dylib 0x000000010e38b21e eval_form > > + 350 > > ;;; 14 libecl.12.12.dylib 0x000000010e38b761 > > si_eval_with_env + 1281 > > ;;; 15 libecl.12.12.dylib 0x000000010e3d89e9 > > si_load_source + 409 > > ;;; 16 libecl.12.12.dylib 0x000000010e3d91f1 cl_load + > > 1825 > > ;;; 17 libecl.12.12.dylib 0x000000010e373c10 APPLY + 80 > > ;;; 18 libecl.12.12.dylib 0x000000010e38382c > > ecl_interpret + 9932 > > ;;; 19 libecl.12.12.dylib 0x000000010e383c5e > > _ecl_bytecodes_dispatch_vararg + 350 > > ;;; 20 asdf.fas 0x000000011153e767 > > L472call_with_asdf_cache + 695 > > ;;; 21 libecl.12.12.dylib 0x000000010e373c10 APPLY + 80 > > ;;; 22 libecl.12.12.dylib 0x000000010e38382c > > ecl_interpret + 9932 > > ;;; 23 libecl.12.12.dylib 0x000000010e38385a > > ecl_interpret + 9978 > > ;;; 24 libecl.12.12.dylib 0x000000010e38b21e eval_form > > + 350 > > ;;; 25 libecl.12.12.dylib 0x000000010e386292 > > compile_toplevel_body + 130 > > ;;; 26 libecl.12.12.dylib 0x000000010e389f18 > > compile_form + 600 > > ;;; 27 libecl.12.12.dylib 0x000000010e38ae15 > > compile_with_load_time_forms + 53 > > ;;; 28 libecl.12.12.dylib 0x000000010e38b1b9 eval_form > > + 249 > > ;;; 29 libecl.12.12.dylib 0x000000010e38b761 > > si_eval_with_env + 1281 > > ;;; 30 libecl.12.12.dylib 0x000000010e380683 cl_eval + > 19 > > ;;; 31 libecl.12.12.dylib 0x000000010e3ab487 dispatch1 > > + 39 > > ./run-tests.sh: line 78: 85028 Abort trap: 6 "$@" > > + echo 'Using ecl, test-run-program.script failed' > > Using ecl, test-run-program.script failed > > > -- Instituto de Física Fundamental, CSIC c/ Serrano, 113b, Madrid 28006 (Spain) http://juanjose.garciaripoll.googlepages.com
