From: Michael K. <mic...@gm...> - 2008-01-24 21:25:28
|
Sam Steingold wrote: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > Michael Kappert wrote: > | Sam Steingold wrote: > |> OK, so building in src (without the build-dir configure argument) should > |> work, right? > |> please build clisp in src and see if (directory "*/" :full t) works > |> thanks (as requested in > <http://permalink.gmane.org/gmane.lisp.clisp.devel/17337>) > | > | Doesn't work: > | > | [2]> (directory "*/" :full t) > | > | *** - Win32 error 2 (ERROR_FILE_NOT_FOUND): The system cannot find the > file > | specified. > | The following restarts are available: > | ABORT :R1 ABORT > > please edit Makefile and add -DDEBUG_OS_ERROR to CFLAGS, then do > > rm -f pathname.o > make lisp.run > ./clisp -q -norc -K boot -x 'directory "*/" :full t)' > > thanks. I tried the above commands (with the obvious corrections). I also did cvs up; ./configure --with-debug from scratch and tried removing the optimize flags from CFLAGS - clisp still refuses to print line number in the error message. Sorry. Suggestions are welcome. Debugging wasn't really successful either - the error seems to happen in a call issued from the with_sstring_0 macro, in pathname.d:6800, immediately after the macro arguments are processed ?! I'd expect the error to be raised during READDIR_findfirst (on line pathname.d:6803) but pathname:6803 is never reached. Are my line numbers messed up? Below is a transscript from a debug session. Maybe someone can suggest. Sorry for the long post. Regards Michael [3]> (directory "*/" :full t) Breakpoint 15, get_time_size (timepoint=0x22b4c0, entry_size=0x76632d70) at ../src/pathname.d:6800 (gdb) next (gdb) next (gdb) where #0 get_time_size (timepoint=0x22b4c0, entry_size=0x22b4b8) at ../src/pathname.d:6800 #1 0x0043405e in directory_search (pathname={one_o = 2274496}, dsp=0x22b518) at ../src/pathname.d:6815 #2 0x00434358 in C_directory () at ../src/pathname.d:7612 #3 0x00419bf3 in eval_subr (fun={one_o = 5034194}) at ../src/eval.d:3542 #4 0x004184f4 in eval1 (form={one_o = 1527135739}) at ../src/eval.d:3034 #5 0x00419697 in eval (form={one_o = 1527135739}) at ../src/eval.d:2908 #6 0x0048e007 in C_read_eval_print () at ../src/debug.d:407 #7 0x004122f7 in funcall_subr (fun={one_o = 5023026}, args_on_stack=2) at ../src/eval.d:5184 #8 0x004130f1 in interpret_bytecode_ (closure={one_o = 434603841}, codeptr=0x19e785e8, byteptr_in=0x43 <Address 0x43 out of bounds>) at ../src/eval.d:6743 #9 0x0041aef8 in funcall_closure (closure={one_o = 434603841}, args_on_stack=0) at ../src/eval.d:5587 #10 0x004225e6 in C_driver () at ../src/control.d:1971 #11 0x00413141 in interpret_bytecode_ (closure={one_o = 434603925}, codeptr=0x19e7859c, byteptr_in=0x18 <Address 0x18 out of bounds>) at ../src/eval.d:6749 #12 0x0041aef8 in funcall_closure (closure={one_o = 434603925}, args_on_stack=0) at ../src/eval.d:5587 #13 0x004133a1 in interpret_bytecode_ (closure={one_o = 434754545}, codeptr=0x19dd558c, byteptr_in=0x3e <Address 0x3e out of bounds>) at ../src/eval.d:6798 #14 0x0041aef8 in funcall_closure (closure={one_o = 434754545}, args_on_stack=0) at ../src/eval.d:5587 #15 0x0048e222 in driver () at ../src/debug.d:476 #16 0x0040b432 in main_actions (p=0x593570) at ../src/spvw.d:3279 #17 0x0040f1fe in main (argc=11, argv=0x3d2970) at ../src/spvw.d:3407 (gdb) step whole_namestring (pathname={one_o = 435033553}) at ../src/pathname.d:2536 (gdb) step directory_namestring_parts (pathname={one_o = 435033796}) at ../src/pathname.d:2395 (gdb) step (gdb) step (gdb) step (gdb) step (gdb) finish Run till exit from #0 directory_namestring_parts (pathname= {one_o = 435033553}) at ../src/pathname.d:2400 0x0042a5d7 in whole_namestring (pathname={one_o = 435033553}) at ../src/pathname.d:2536 Value returned is $1 = 13 (gdb) finish Run till exit from #0 0x0042a5d7 in whole_namestring (pathname= {one_o = 435033553}) at ../src/pathname.d:2536 0x00432bd9 in get_time_size (timepoint=0x22b4c0, entry_size=0x22b4b8) at ../src/pathname.d:6800 Value returned is $2 = {one_o = 435033797} (gdb) xout $2 "D:\Projects\clisp-cvs\clisp\build.mingw.debug\base\"{one_o = 435033797} (gdb) step nls_asciiext_wcslen (encoding={one_o = 434759421}, src=0x19ee16cc, srcend=0x19e9e6fd) at ../src/encoding.d:1787 (gdb) finish Run till exit from #0 nls_asciiext_wcslen (encoding={one_o = 434759421}, src=0x19ee16cc, srcend=0x19e9e6fd) at ../src/encoding.d:1787 0x00432c7f in get_time_size (timepoint=0x22b4c0, entry_size=0x22b4b8) at ../src/pathname.d:6800 Value returned is $3 = 51 (gdb) step nls_asciiext_wcstombs (encoding={one_o = 434759421}, stream={one_o = 0}, srcp=0x22b338, srcend=0x19e9e6fd, destp=0x22b33c, destend=0x19e9e6fd "æé\0310") at ../src/encoding.d:1822 (gdb) finish Run till exit from #0 nls_asciiext_wcstombs (encoding={one_o = 434759421}, stream={one_o = 0}, srcp=0x22b338, srcend=0x19e9e6fd, destp=0x22b33c, destend=0x19e9e6fd "æé\0310") at ../src/encoding.d:1822 0x00432cd7 in get_time_size (timepoint=0x22b4c0, entry_size=0x22b4b8) at ../src/pathname.d:6800 (gdb) step Breakpoint 12, OS_file_error (pathname={one_o = 2009275280}) at ../src/errwin32.d:3898 (gdb) where #0 OS_file_error (pathname={one_o = 2009275280}) at ../src/errwin32.d:3898 #1 0x00432d73 in get_time_size (timepoint=0x22b4c0, entry_size=0x22b4b8) at ../src/pathname.d:6800 #2 0x0043405e in directory_search (pathname={one_o = 2274496}, dsp=0x22b518) at ../src/pathname.d:6815 #3 0x00434358 in C_directory () at ../src/pathname.d:7612 #4 0x00419bf3 in eval_subr (fun={one_o = 5034194}) at ../src/eval.d:3542 #5 0x004184f4 in eval1 (form={one_o = 1527135739}) at ../src/eval.d:3034 #6 0x00419697 in eval (form={one_o = 1527135739}) at ../src/eval.d:2908 #7 0x0048e007 in C_read_eval_print () at ../src/debug.d:407 #8 0x004122f7 in funcall_subr (fun={one_o = 5023026}, args_on_stack=2) at ../src/eval.d:5184 #9 0x004130f1 in interpret_bytecode_ (closure={one_o = 434603841}, codeptr=0x19e785e8, byteptr_in=0x43 <Address 0x43 out of bounds>) at ../src/eval.d:6743 #10 0x0041aef8 in funcall_closure (closure={one_o = 434603841}, args_on_stack=0) at ../src/eval.d:5587 #11 0x004225e6 in C_driver () at ../src/control.d:1971 #12 0x00413141 in interpret_bytecode_ (closure={one_o = 434603925}, codeptr=0x19e7859c, byteptr_in=0x18 <Address 0x18 out of bounds>) at ../src/eval.d:6749 #13 0x0041aef8 in funcall_closure (closure={one_o = 434603925}, args_on_stack=0) at ../src/eval.d:5587 #14 0x004133a1 in interpret_bytecode_ (closure={one_o = 434754545}, codeptr=0x19dd558c, byteptr_in=0x3e <Address 0x3e out of bounds>) at ../src/eval.d:6798 #15 0x0041aef8 in funcall_closure (closure={one_o = 434754545}, args_on_stack=0) at ../src/eval.d:5587 #16 0x0048e222 in driver () at ../src/debug.d:476 #17 0x0040b432 in main_actions (p=0x593570) at ../src/spvw.d:3279 #18 0x0040f1fe in main (argc=11, argv=0x3d2970) at ../src/spvw.d:3407 (gdb) |