[Ecls-list] CVS HEAD: threads enabled ECL crashes when booting with ecl_min (msvc2005)

[Kamil Shakirov]

Hi Juan,

If compiled with ECL_THREADS=1 on win32/msvc2005, ecl_min crashes when 
booting compile.lsp.

With ECL_DEBUG=1 enabled I got the following backtrace:

     ntdll.dll!7c918fea()    
     [Frames below may be incorrect and/or missing, no symbols loaded 
for ntdll.dll]   
     msvcr80.dll!78132c78()    
     msvcr80.dll!78132e24()    
     msvcr80.dll!78132e2f()    
     msvcr80.dll!78137021()    
     msvcr80.dll!781370a0()    
     msvcr80.dll!7813725c()    
     ntdll.dll!7c90104b()    
 >    ecl_min.exe!GC_register_displacement(unsigned long offset=1)  Line 
61    C
     ecl_min.exe!init_alloc()  Line 193 + 0x7 bytes    C
     ecl_min.exe!cl_boot(int argc=1, char * * argv=0x00354f30)  Line 
202    C
     ecl_min.exe!main(int argc=1, char * * args=0x00354f30)  Line 100 + 
0xd bytes    C
     ecl_min.exe!__tmainCRTStartup()  Line 586 + 0x17 bytes    C
     kernel32.dll!7c816fd7()    


The build log:

   Creating library ecl_min.lib and object ecl_min.exp
        copy /Y ..\src\lsp\load.lsp.in lsp\load.lsp
        1 file(s) copied.
        if not exist clos mkdir clos
        copy /Y ..\src\clos\load.lsp.in clos\load.lsp
        1 file(s) copied.
        if not exist cmp mkdir cmp
        copy /Y ..\src\cmp\load.lsp.in cmp\load.lsp
        1 file(s) copied.
        c\cut "@ECL_CC@" "cl"  "@CFLAGS@" "-MD -Z7 -EHsc -DGC_DLL 
-nologo -DECL_THREADS"  "@ECL_CFLAGS@" ""  "@CPPFLAGS@" ""  "@LDRPATH@" 
""  "@LDFLAGS@" "-MD -Z7 /link /nodefaultlib:libcmt 
/nodefaultlib:libcmtd /nodefaultlib:libc /nodefaultlib:libd"  
"@SHARED_LDFLAGS@" "-LDd"  "@BUNDLE_LDFLAGS@" "-LDd"  "@CLIBS@" 
"user32.lib ws2_32.lib shell32.lib"  "@STATICLIBS@" "eclgmp.lib 
eclgc.lib"  "@OBJEXT@" "obj"  "@SHAREDPREFIX@" ""  "@SHAREDEXT@" "dll"  
"@LIBPREFIX@" ""  "@LIBEXT@" "lib"  "@EXEEXT@" ".exe"  "@ecldir\@" 
"NIL"  "@libdir\@" "NIL"  "@includedir\@" "NIL"  < 
..\src\cmp\cmpdefs.lsp > cmp\cmpdefs.lsp
        c\cut "@true_srcdir@" "../src"  "@true_builddir@" 
"D:/Work/ecl_th/msvc"< ..\src\bare.lsp.in > bare.lsp
        c\cut "@ecldir\@" "%CD%/package"  "@libdir\@" "%CD%/package"  
"@true_srcdir@" "../src"  "@true_builddir@" "D:/Work/ecl_th/msvc"  
"@CFLAGS@" "-MD -Z7 -EHsc -DGC_DLL -nologo -DECL_THREADS -DGC_BUILD"  
"@ECL_CFLAGS@" ""  "@CPPFLAGS@" ""  "@LDRPATH@" ""  "@LDFLAGS@" "-MD -Z7 
/link /nodefaultlib:libcmt /nodefaultlib:libcmtd /nodefaultlib:libc 
/nodefaultlib:libd"  "@SHARED_LDFLAGS@" "-LDd"  "@BUNDLE_LDFLAGS@" 
"-LDd"  "@CLIBS@" "user32.lib ws2_32.lib shell32.lib"  "@STATICLIBS@" 
"eclgmp.lib eclgc.lib"  "@LIBS@" "user32.lib ws2_32.lib shell32.lib"  
"@CORE_LIBS@" ""  "@FASL_LIBS@" ""  "@OBJEXT@" "obj"  "@SHAREDPREFIX@" 
""  "@SHAREDEXT@" "lib"  "@LIBPREFIX@" ""  "@LIBEXT@" "lib"  "@EXEEXT@" 
".exe"  "@LDINSTALLNAME@" ""  "@DEF@" "ecl-threads.def"  "@RANLIB@" 
"ranlib"  "@LSP_FEATURES@" "(cons:wants-profile (cons :wants-defsystem 
(cons :wants-rt (cons :wants-sockets (cons :wants-asdf (cons :wants-cmp 
(cons :wants-dlopen *features*)))))))"  < ..\src\compile.lsp.in > 
compile.lsp
        copy /Y ..\src\cmp\sysfun.lsp .
        1 file(s) copied.
        date /t > BUILD-STAMP
        .\ecl_min < compile.lsp