[Gauche-devel-jp] Re: gosh の開発で行き詰まった

Back to archive index

shelarcy shela****@capel*****
2004年 7月 13日 (火) 09:42:19 JST


On Tue, 13 Jul 2004 09:18:13 +0900, shelarcy 
<shela****@capel*****> wrote:
>> Subject: [Gauche-devel-jp] Re: gosh の開発で行き詰まった
>> Date: Mon, 12 Jul 2004 22:36:38 +0900
>>
>>> --- load.c.2~	Mon Jul 12 07:48:18 2004
>>> +++ load.c	Mon Jul 12 21:08:12 2004
>>> @@ -275,10 +275,10 @@
>>>        } else if (*ptr == '/'
>>>                   || (*ptr == '.' && *(ptr+1) == '/')
>>>                   || (*ptr == '.' && *(ptr+1) == '.' && *(ptr+2) == 
>>> '/')
>>> -#ifdef __CYGWIN__
>>> +#ifdef __CYGWIN__ || WIN32_NATIVE
>>>    	       /* support for wicked legacy DOS drive letter */
>>>    	       || (isalpha(*ptr) && *(ptr+1) == ':')
>>> -#endif /* __CYGWIN__ */
>>> +#endif /* __CYGWIN__ || WIN32_NATIVE */
>>>    	       ) {
>>>            use_load_paths = FALSE;
>>>        }
>>
>> こんな書き方ってできましたっけ? (少なくともgccではだめ)
>> 標準Cならこうしておく方が無難なような:
>>
>> #if __CYGWIN__ || WIN32_NATIVE
>>
>> もしくは
>>
>> #if defined(__CYGWIN__) || defined(WIN32_NATIVE)
>>
>>> やってなかったのでやりましたが、結果に変化がないようです。
>>> 他は全部認識されるのに、ドライブレターだけミスります。
>
> そうですね。そうしないと WIN32_Native の定義による認識フラグが無視されま
>> ね。
> そういうわけで直しました。

すると、これも直しとかないとまずいですね。

--- gauche.h.2~	Mon Jul 12 18:59:25 2004
+++ gauche.h	Tue Jul 13 09:28:23 2004
@@ -74,7 +74,7 @@
  #endif

  /* Ugly cliche for Win32. */
-#if defined(__CYGWIN__) || WIN32_NATIVE
+#if defined(__CYGWIN__) || defined(WIN32_NATIVE)
  # if defined(LIBGAUCHE_BODY)
  #  define SCM_EXTERN extern
  # else




-- 
shelarcy <shela****@capel*****>
http://page.freett.com/shelarcy/



Gauche-devel-jp メーリングリストの案内
Back to archive index