[racket] procedure get-compiled-file-sha1: expects 1 argument, given 2

Compilation issue again.

As Matthew explained, I turned off debugging, also turned off "preserve
stack trace".
I executed the code in DrRacket and it works fine.

Then I tried in the same interaction (if I am not mistaken):

> (require compiler/embed)
> (create-embedding-executable
   "towers.exe"
   #:modules '((#f "towers-gui.ss"))
   #:configure-via-first-module? #t
   #:literal-expression
   (parameterize ([current-namespace (make-base-namespace)])
     (compile `(namespace-require ''towers-gui)))
   #:gracket? #t
   #:collects-path (current-library-collection-paths)
   )

It worked the first time.
Then I wanted to add `#:aux '((ico . "img/favicon.ico"))' and it failed with
the following error:

. . M:\Program Files\Racket\collects\racket\private\promise.rkt:103:10:
procedure get-compiled-file-sha1: expects 1 argument, given 2:
#<path:common_ss.zo> #<path:compiled\drracket>

And when I removed the #:aux line, it continued to fail with the same error!

I could not consistently reproduce this problem on a smaller test file, so I
don't have a clue where this comes from.
I even reinstalled DrRacket, but no luck.

Also, I tried with command line racket, so I wrote the above code in a #lang
racket module.
(If executed in DrRacket, it gives the same above error).
However, from the command line, I get another error:
<<<
E:\Projets\Scheme-svn\towers>racket -S E:\Projets\Scheme-svn compile.rkt
car: expects argument of type <pair>; given '()

 === context ===
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:514:44: loop
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:514:44: loop
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:514:44: loop
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:514:44: loop
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:511:32: loop
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:511:32: loop
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:499:25:
get-lines
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:488:2:
build-dib
M:\Program Files\Racket\collects\compiler\private\winicon.rkt:180:21
M:\Program Files\Racket\collects\racket\private\map.rkt:45:11: for-each
E:\Projets\Scheme-svn\towers\compile.rkt: [running body]
>>>

I don't know if these two errors are related. Probably.

Anyone has a clue of what is going on here?

Thanks,
Laurent
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20100627/c376e25f/attachment.html>