--- IO-AIO/Makefile.PL	2005/08/30 15:45:10	1.7
+++ IO-AIO/Makefile.PL	2007/07/08 13:43:29	1.14
@@ -4,25 +4,59 @@
 
 require "autoconf.pm";
 
-if ($^O =~ /freebsd/i) {
-   print <<EOF;
+if ($^O =~ /win32/i or $^O =~ /mswin/) {
+
+   # configuration on windows is hardcoded - as always
+
+   warn "your platform is not standards-compliant, you have to port this module first\n";
+   warn "using some hardcoded config that will not work on your system\n";
+
+   $INC  = "-I/Perl/lib/CORE -I/sdk/include -I/vc98/include -I/gtk/include -I/gtk/include/pango-1.0 -I/gtk/include/glib-2.0 -I/gtk/lib/glib-2.0/include/ -I/gtk/include/freetype2";
+   $LIBS = ["-L/gtk/lib -lpthreadVC2"];
+
+} else {
+
+   $INC  = "";
+   $LIBS = ['-lpthread -lrt', '-lpthread', '-lpthreads', '-lpthreadVC2', ''];
+
+   if ($^O =~ /freebsd/i) {
+      print <<EOF;
+
+This package seems to deadlock or otherwise misbehave under FreeBSD. As
+documentation on FreeBSD threading is sorely lacking and confusing, I'll
+just call FreeBSD broken with regards to threading.
 
-This package seems to deadlock under FreeBSD. As documentation on FreeBSD
-threading is sorely lacking and confusing, I'll just call FreeBSD broken
-with regards to threading.
-
-If you get it to work, tell me how (maybe you need to specify magical link
-flags despite man pthread telling me otherwise, maybe yo need special
-library, maybe you need magical preprocessor symbols, maybe you need to
-recompile or re-link perl with threads enabled (a bad idea) - I have no
-idea, and I no longer care). Or maybe I do, but am frustrated about the
-continous "we are different=broken" attitude.
+If you find out whats wrong, please tell me.
+
+Some people had luck with using OPTIMIZE=-O instead of -O2, so you might
+want to try that.
 
 EOF
+   }
+
+   autoconf::run_script()
+      and die "\nconfigure failed, check it's output above and autoconf/config.log\n\n";
 }
 
-autoconf::run_script()
-   and die "\nconfigure failed, check it's output above and autoconf/config.log\n\n";
+if ($^O =~ /linux/ && $Config{usemymalloc} eq "y") {
+   print <<EOF;
+
+***
+*** WARNING:
+***
+*** Your perl uses it's own memory allocator (-Dusemymalloc=y),
+*** which is known not to be threadsafe on GNU/Linux and probably
+*** other platforms (even when not used concurrently, it trashes
+*** the data structures of the system malloc running concurrently),
+*** for perls up to 5.8.8 and possibly later versions.
+***
+*** If you are unsure wether your perl has been fixed, your system
+*** is safe for other reasons, or you experience spurious segfaults,
+*** please compile your perl with -Dusemymalloc=n.
+***
+
+EOF
+}
 
 my $mm = MM->new({
     dist         => {
@@ -32,7 +66,11 @@
 	            },
     NAME         => "IO::AIO",
     VERSION_FROM => "AIO.pm",
-    LIBS         => ['-lpthread -lrt', '-lpthread', '-lpthreads', ''],
+    INC          => $INC,
+    LIBS         => $LIBS,
+    PM           => {
+    		    'AIO.pm'		=> '$(INST_LIBDIR)/AIO.pm',
+                    },
     clean        => { FILES => "autoconf/config.h autoconf/config.log autoconf/config.status" },
 });