win32 ffi work

diff --git a/basis/windows/kernel32/kernel32.factor b/basis/windows/kernel32/kernel32.factor
index f19561cda3c8ab1bde38930047149c3cae713813..dfac6a5236ddafd6c17f2b9a7a23cf39147ad1fa 100644 (file)
--- a/basis/windows/kernel32/kernel32.factor
+++ b/basis/windows/kernel32/kernel32.factor
@@ -928,7 +928,8 @@ FUNCTION: HANDLE GetCurrentThread ( ) ;
 ! FUNCTION: GetDevicePowerState
 ! FUNCTION: GetDiskFreeSpaceA
 ! FUNCTION: GetDiskFreeSpaceExA
-! FUNCTION: GetDiskFreeSpaceExW
+FUNCTION: BOOL GetDiskFreeSpaceExW ( LPCTSTR lpDirectoryName, PULARGE_INTEGER pFreeBytesAvailable, PULARGE_INTEGER lpTotalNumberOfBytes, PULARGE_INTEGER lpTotalNumberOfFreeBytes ) ;
+ALIAS: GetDiskFreeSpaceEx GetDiskFreeSpaceExW
 ! FUNCTION: GetDiskFreeSpaceW
 ! FUNCTION: GetDllDirectoryA
 ! FUNCTION: GetDllDirectoryW

diff --git a/basis/windows/types/types.factor b/basis/windows/types/types.factor
index b1d8914be9ebb99d8d18d2d646f56141c0c9c4ef..0ac84090162d87cba6d9f9cf49541d7e5fe74f38 100644 (file)
--- a/basis/windows/types/types.factor
+++ b/basis/windows/types/types.factor
@@ -62,7 +62,9 @@ TYPEDEF: ulonglong   ULONGLONG
 TYPEDEF: longlong    LONG64
 TYPEDEF: ulonglong   DWORD64
 TYPEDEF: longlong    LARGE_INTEGER
+TYPEDEF: ulonglong   ULARGE_INTEGER
 TYPEDEF: LARGE_INTEGER* PLARGE_INTEGER
+TYPEDEF: ULARGE_INTEGER* PULARGE_INTEGER
 
 TYPEDEF: wchar_t*  LPCSTR
 TYPEDEF: wchar_t*  LPWSTR