From: WATANABE Hirofumi <eban@...>
Date: 2000-03-04T21:51:59+09:00
Subject: [ruby-dev:9368] [PATCH] Win32API

わたなべです.

Win32API の object が宙に浮いてました. すみません.
GC.start すると FreeLibrary されて SEGV.

Sat Mar  4 21:26:39 2000  WATANABE Hirofumi  <eban@os.rim.or.jp>

	* ext/Win32API/Win32API.c (Win32API_initialize):
	  protect Win32API object from GC.


--- ext/Win32API/Win32API.c.orig	Thu Jan  6 22:05:09 2000
+++ ext/Win32API/Win32API.c	Sat Mar  4 20:40:14 2000
@@ -59,3 +59,3 @@
 	    rb_raise(rb_eRuntimeError, "LoadLibrary: %s\n", RSTRING(dllname)->ptr);
-	Data_Wrap_Struct(self, 0, Win32API_FreeLibrary, hdll);
+	rb_iv_set(self, "__hdll__", Data_Wrap_Struct(self, 0, Win32API_FreeLibrary, hdll));
     }