[svn:parrot] r49604 - trunk/config/gen/platform/win32

bacek at svn.parrot.org bacek at svn.parrot.org
Wed Oct 20 09:35:32 UTC 2010


Author: bacek
Date: Wed Oct 20 09:35:31 2010
New Revision: 49604
URL: https://trac.parrot.org/parrot/changeset/49604

Log:
Second blind commit to fix win32 build based on http://www.perlmonks.org/?node_id=749964

Modified:
   trunk/config/gen/platform/win32/sysmem.c

Modified: trunk/config/gen/platform/win32/sysmem.c
==============================================================================
--- trunk/config/gen/platform/win32/sysmem.c	Wed Oct 20 09:14:44 2010	(r49603)
+++ trunk/config/gen/platform/win32/sysmem.c	Wed Oct 20 09:35:31 2010	(r49604)
@@ -26,6 +26,22 @@
 #include <windows.h>
 #include <stdio.h>
 
+/* Solution copied from http://www.perlmonks.org/?node_id=749964 */
+#ifndef _MSC_VER
+typedef struct _MEMORYSTATUSEX {
+    DWORD dwLength;
+    DWORD dwMemoryLoad;
+    DWORDLONG ullTotalPhys;
+    DWORDLONG ullAvailPhys;
+    DWORDLONG ullTotalPageFile;
+    DWORDLONG ullAvailPageFile;
+    DWORDLONG ullTotalVirtual;
+    DWORDLONG ullAvailVirtual;
+    DWORDLONG ullAvailExtendedVirtual;
+} MEMORYSTATUSEX,*LPMEMORYSTATUSEX;
+
+WINBASEAPI BOOL WINAPI GlobalMemoryStatusEx(LPMEMORYSTATUSEX);
+
 /*
 
 =item C<PMC * Parrot_sysmem_amount(PARROT_INTERP)>
@@ -36,6 +52,8 @@
 
 */
 
+
+
 size_t
 Parrot_sysmem_amount(PARROT_INTERP)
 {


More information about the parrot-commits mailing list