[ruby-dev:12558] Re: compile error on mswin32

なかだです。

At Thu, 15 Mar 2001 09:45:00 +0900
[e-mail] (Yukihiro Matsumoto) wrote:
> |CVSのHEADですが、mswin32でコンパイルが通りません。
> |missing/dir.hが削除されたためですが、そもそもどうして削除されて
> |しまったんでしょう?
> 
> 主にライセンス上の理由です。mswin32での<dir.h>の対応は別の形
> で行うべきだと思います(win32/win32.cで実装されているので)。

  とりあえずコンパイル通るようにしてみました。それとついでに、
win32_stat() で DLL リンケージが違うとかいわれたり、再帰でルー
プするのも。


--- /dev/null   Mon Mar 19 14:10:46 2001
+++ win32/dir.h Mon Mar 19 13:22:06 2001
@@ -0,0 +1,20 @@
+struct direct
+{
+    long d_namlen;
+    ino_t d_ino;
+    char d_name[256];
+};
+typedef struct {
+    char *start;
+    char *curr;
+    long size;
+    long nfiles;
+    struct direct dirstr;
+} DIR;
+
+DIR* opendir(const char*);
+struct direct* readdir(DIR *);
+long telldir(DIR *);
+void seekdir(DIR *, long);
+void rewinddir(DIR *);
+void closedir(DIR *);
Index: win32.h
===================================================================
RCS file: /home/cvs/ruby/src/ruby/win32/win32.h,v
retrieving revision 1.17
diff -u -2 -p -r1.17 win32.h
--- win32/win32.h	2001/03/19 03:20:24	1.17
+++ win32/win32.h	2001/03/19 04:58:07
@@ -99,4 +99,5 @@ extern "C++" {
 #include <time.h>
 #include <math.h>
+#include <sys/stat.h>
 #include <sys/types.h>
 #include <sys/utime.h>
--- win32/win32.c	2001/03/05 08:28:50	1.37
+++ win32/win32.c	2001/03/19 04:44:21
@@ -26,9 +26,10 @@
 #include <wincon.h>
 #include "win32.h"
-#include "dir.h"
+#include "win32/dir.h"
 #ifndef index
 #define index(x, y) strchr((x), (y))
 #endif
 #define isdirsep(x) ((x) == '/' || (x) == '\\')
+#undef stat
 
 #ifndef bool
@@ -1335,5 +1336,5 @@ NtMakeCmdVector (char *cmdline, char ***
 
 DIR *
-opendir(char *filename)
+opendir(const char *filename)
 {
     DIR            *p;
@@ -1345,7 +1346,4 @@ opendir(char *filename)
     WIN32_FIND_DATA FindData;
     HANDLE          fh;
-    char            root[PATHLEN];
-    char            volname[PATHLEN];
-    DWORD           serial, maxname, flags;
 
     //


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦