Re: [Sbcl-devel] windows testing needed -- LOAD-SHARED-OBJECT :DONT-SAVE

[Elliott S. <ell...@gm...>]

On Thu, Oct 9, 2008 at 1:34 AM, Nikodemus Siivola <
nik...@ra...> wrote:

> On Thu, Oct 9, 2008 at 11:21 AM, Elliott Slaughter
> <ell...@gm...> wrote:
>
> Thanks for testing!


My pleasure.


> > debugger invoked on a SB-KERNEL:CASE-FAILURE:
> >   NIL fell through ECASE expression. Wanted one of (:RELATIVE :ABSOLUTE).
>
> It seems NATIVE-NAMESTRING is broken on Windows (that is, doesn't
> support pathnames with directory NIL.)
>
> What if you apply the attached diff on top?


The same contrib modules fail to build properly. And the error changes to
the following:

* (load-shared-object "Kernel32")

debugger invoked on a UNDEFINED-FUNCTION:
  The function (SETF SB-ALIEN::SHARED-OBJECT-HANDLE) is undefined.

Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

("bogus stack frame")
0] backtrace

0: ("bogus stack frame")
1: (SB-SYS:DLOPEN-OR-LOSE
    #S(SB-ALIEN::SHARED-OBJECT
       :PATHNAME #P"Kernel32"
       :NAMESTRING "Kernel32"
       :SAP NIL
       :DONT-SAVE NIL))
2: ((FLET SB-THREAD::WITH-MUTEX-THUNK))
3: (LOAD-SHARED-OBJECT "Kernel32")[:EXTERNAL]
4: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LOAD-SHARED-OBJECT "Kernel32")
#<NULL-LEXENV>)
5: (INTERACTIVE-EVAL (LOAD-SHARED-OBJECT "Kernel32"))
6: (SB-IMPL::REPL-FUN NIL)
7: (SB-IMPL::REPL-FUN NIL)[:EXTERNAL]
8: ((LAMBDA ()))
9: ((LAMBDA ()))[:EXTERNAL]
10: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #) {23E0C875}>)
11: (SB-IMPL::TOPLEVEL-REPL NIL)
12: (SB-IMPL::TOPLEVEL-INIT)
13: ((LABELS SB-IMPL::RESTART-LISP))
14: ("foreign function: #x411245")
15: ("foreign function: #x40A2D6")



-- 
Elliott Slaughter

"Any road followed precisely to its end leads precisely nowhere." - Frank
Herbert