Output to *standard-output* doesn't work in console executables created with SAVE-APPLICATION

[heegaiximephoomeeghahyaiseekh]

Try this at the REPL:

 (defun hello ()
     (format t "Hello, world!~%")
     (lisp-shutdown ""))

 (save-application "hello.exe" #'hello :console t)

The resulting hello.exe prints nothing when launched. However, the following program works fine:

(defun hello ()
    ;; Explicitly open the console.
    (with-open-file (*standard-output* "CON" :direction :output :if-exists :append)
        (format t "Hello, world!~%"))
    (lisp-shutdown ""))

[ghost]

For me, the two ways to use SAVE-APPLICATION, doesn't work at all (on Windows 7),
I will try on XP SP3, Windows Vista, and 8.1

[binghe]

Based on recent mail discussions, the issue is not a bug of CormanLisp.

[heegaiximephoomeeghahyaiseekh]

WTF? So SAVE-APPLICATION isn't supposed to work?