Re: w32shell.c patch

[Sam S. <sd...@gn...>]

Hi Arseny,

Arseny Slobodyuk wrote:
> Thursday, April 15, 2010, 8:08:50 AM, you wrote:
> 
>> this patch broke win32 modules build:
>> before:
> 
> [2]>> (PROBE-PATHNAME #P"C:linkkit\\modprep.lisp")
>> #P"C:\\sds\\dev\\current\\utils\\modprep.lisp" ;
>> #P"C:\\sds\\dev\\current\\build-mingw-g-4\\linkkit\\modprep.lisp" ;
>> 3480262844 ;
>> 60472
> 
>> after:
> [43]>> (PROBE-PATHNAME #P"C:linkkit\\modprep.lisp")
>> NIL
 >
> I can't reproduce this.

this is sad. I have
CYGWIN_NT-5.2 zzzzzzz 1.5.25(0.156/4/2) 2008-06-12 19:34 i686 Cygwin
on windows server 2003.
this is a non-cywgin (i.e., mingw) build.

> Are you in the proper directory?

yes, I am in the build directory.
the linkkit directories look identical

$ ls -l linkkit
clisp.h -> ../clisp.h
modprep.lisp -> ../modprep.lisp
modules.c -> ../modules.c

in both "old" and "new" build directories.

> I.e. I
> suppose, current drive is C and current directory is the build one?

yes.

> Before commiting I did mingw build and wrote a test
> program (attached). You could probably hit the new cygwin
> shortcut problem we discussed with Reini Urban a couple weeks ago:
> 
>> CYGWIN=winsymlinks is for the old behaviour, using old-style windows .lnk files
>> Since cygwin 1.7 the default is using a shorter magic symlink file.
>>
>> The user has to set the env CYGWIN if a symlink cannot be resolved.
>> See http://cygwin.com/cygwin-ug-net/using-cygwinenv.html#winsymlinks

setting CYGWIN=winsymlinks  makes no difference, and, at any rate, I am using 
cyginw 1.5, not 1.7

> It also might be the smaller problem with link recognition (same lnk
> format but with some fields changed that cygwin recognizes it but
> clisp is not). This may be checked with (DIRECTORY "linkkit\\*") -
> then it will list lnk files.

indeed:

new:

[2]> (directory "linkkit/*")
(#P"C:\\sds\\dev\\current\\build-mingw-g-mt-1\\linkkit\\modules.c.lnk"
  #P"C:\\sds\\dev\\current\\build-mingw-g-mt-1\\linkkit\\modprep.lisp.lnk"
  #P"C:\\sds\\dev\\current\\build-mingw-g-mt-1\\linkkit\\clisp.h.lnk")
[3]> (cd)
#P"C:\\sds\\dev\\current\\build-mingw-g-mt-1\\"

old:

[1]> (directory "linkkit/*")
(#P"C:\\sds\\dev\\current\\src\\modules.c"
  #P"C:\\sds\\dev\\current\\utils\\modprep.lisp"
  #P"C:\\sds\\dev\\current\\build-mingw-g-4\\clisp.h")
[2]> (cd)
#P"C:\\sds\\dev\\current\\build-mingw-g-4\\"


> Please load the attached file with the new executable - it
> should give no error. Beware: it creates and then deletes folders and files.

[4]> (load "../../cyglink.lsp")
;; Loading file ..\..\cyglink.lsp ...
*** - OPEN: File #P"C:\\sds\\dev\\current\\build-mingw-g-mt-1\\file1.lsp" does
       not exist
The following restarts are available:
SKIP           :R1      skip (WITH-OPEN-FILE # #)
STOP           :R2      stop loading file C:\sds\dev\cyglink.lsp
ABORT          :R3      Abort main loop
Break 1 [5]>


PS. are you still working on ext::launch? what remains to be done there?