[Ecls-list] run-program strangeness

[Marko Kocić]

This change seems to broke MSVC build.
I'll try mingw version in a minute and report if it fails too.
Here's the last few lines of the log:

;*** Lisp core booted ****
ECL (Embeddable Common Lisp)  16384 pages

> (:WANTS-PROFILE :WANTS-DEFSYSTEM :WANTS-RT :WANTS-SOCKETS :WANTS-ASDF :WANTS-CMP :WANTS-DLOPEN :ECL-MIN :IEEE-FLOATING
-POINT :DFFI :CLOS-STREAMS :CMU-FORMAT :MSVC :ECL-PDE :DLOPEN :CLOS
:THREADS :BOEHM-GC :ANSI-CL :COMMON-LISP :ECL :COMMO
N :PENTIUM4 :FFI :PREFIXED-API)
> "C:/dev/cvstree/ecl/msvc/bare.lsp"
> ("C:/dev/cvstree/ecl/msvc/help.doc")
> #<"COMMON-LISP" package>
> #<"CL" package>
> "C:/dev/cvstree/ecl/msvc/"
> "/LD /MD /link /nologo /nodefaultlib:libcmt /nodefaultlib:libcmtd /nodefaultlib:libc /nodefaultlib:libd ecl.lib user32
.lib ws2_32.lib shell32.lib "
> "ECL"
> NIL
> NIL
> ;;; Compiling src:lsp;export.lsp.
;;; Note: Removing unused variable POP
;;; Note: Removing unused variable FINISHED
;;; Compiling (LET (#) ...).
;;; Warning: The variable ENV is not used.
;;; Note: Removing unused variable POP
;;; Note: Removing unused variable FINISHED
;;; Compiling (LET (#) ...).
;;; Warning: The variable ENV is not used.
;;; Compiling (LET (#) ...).
;;; Warning: The variable ENV is not used.
;;; Compiling (DEFUN EVAL-FEATURE ...).
;;; Compiling (DEFUN DO-READ-FEATURE ...).
;;; Compiling (DEFUN SHARP-+-READER ...).
;;; Compiling (DEFUN SHARP---READER ...).
;;; End of Pass 1.
;;; Note: Creating tag: "_eclh8hepBn8_tSOyxLy" for
#P"build:lsp;export.obj.NEWEST"
;;; Emitting code for DOLIST.
;;; Emitting code for DOTIMES.
;;; Emitting code for DO/DO*-EXPAND.
;;; Note: Eliminating unreachable code
;;; Emitting code for EVAL-FEATURE.
;;; Note: Eliminating unreachable code
;;; Note: Eliminating unreachable code
;;; Emitting code for DO-READ-FEATURE.
;;; Emitting code for SHARP-+-READER.
;;; Emitting code for SHARP---READER.
#<a stream-error>
Broken at SI::TOP-LEVEL. File: #P"C:/dev/cvstree/ecl/src/lsp/top.lsp"
(Form #26)No restarts available.
Top level.
SI>
        c\cut "~A" "%CD%/package" "~*" ""  "@ECL_CFLAGS@" "/MD /EHsc
/DGC_DLL /nologo -DECL_THREADS"  "@LDFLAGS@" "/MD /
link /nologo /nodefaultlib:libcmt /nodefaultlib:libcmtd
/nodefaultlib:libc /nodefaultlib:libd"  "@CLIBS@" ""  "@libdir@"
 "%CD%/package"  "@includedir@" "%CD%/package/ecl"  <
util\ecl-config.bat > ecl-config.bat
        c\cut "@ECL_CFLAGS@" "/MD /EHsc /DGC_DLL /nologo
-DECL_THREADS"  "@LDFLAGS@" "/MD /link /nologo /nodefaultlib:li
bcmt /nodefaultlib:libcmtd /nodefaultlib:libc /nodefaultlib:libd"
"@CLIBS@" ""  "@libdir@" "%CD%/package"  "@includedir
@" "%CD%/package/ecl"  < util\ecl-cc.bat > ecl-cc.bat

C:\dev\cvstree\ecl\msvc>