Eli Zaretskii <e...@gnu.org> skribis:
From: l...@gnu.org (Ludovic Courtès)
Cc: guile-devel@gnu.org
Date: Thu, 12 Jun 2014 21:48:48 +0200
>> >> +(define %null-device
>> >> + ;; On Windows (MinGW), /dev/null does not exist and we must instead
>> >> + ;; use NUL. Note that file system procedures automatically translate
>> >> + ;; /dev/null, so this variable is only useful for shell snippets.
>> >> + (if (file-exists? "/dev/null")
>> >> + "/dev/null"
>> >> + "NUL"))
>> >
>> > Not sure this is a good idea: I can create a file /dev/null on
>> > Windows, but that doesn't mean it is my null device.
>>
>> Yes, but using %host-type isn’t perfect either, no? What would you
>> prefer?
>
> How about testing if the absolute name of the current directory starts
> with a drive letter?
Like (string-match "^[a-zA-Z]:[/\\]" (getcwd)) ?
Yes.
But my Git Bash shell on Windows (at work) gives me paths like /<drive
letter>/...
For example:
nj@PC3946 /c/work/icp (master)
$ pwd
/c/work/icp
I think that shell is provided by MinGW/MSYS - so does that mean that
the regexp check
above might not be correct in all contexts on Windows?
Neil
