From: Chip Salzenberg <chip@perl.com>
Date: Fri, 21 Mar 1997 02:50:39 +0000 (+1200)
Subject: Put "dXSUB_SYS" last in declarations
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=78ec65c7656b24d386e37c2e5cf28db6ca67b5d1;p=p5sagit%2Fp5-mst-13.2.git

Put "dXSUB_SYS" last in declarations
---

diff --git a/win32/perllib.c b/win32/perllib.c
index 13d4b8b..9d2aaa9 100644
--- a/win32/perllib.c
+++ b/win32/perllib.c
@@ -63,8 +63,9 @@ EXTERN_C void boot_DynaLoader _((CV* cv));
 static void
 xs_init()
 {
-    dXSUB_SYS;
     char *file = __FILE__;
+    dXSUB_SYS;
+
     newXS("DynaLoader::boot_DynaLoader", boot_DynaLoader, file);
 }