steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

add psapi stub to windows.nt

db4
Doug Coleman 2009-10-15 21:43:19 -05:00
parent 4c2cdb18b5
commit 58557e41bf
3 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/windows/nt/nt.factor
View File

@ -14,4 +14,5 @@ USING: alien sequences alien.libraries ;
{ "glu" "glu32.dll" "stdcall" }
{ "ole32" "ole32.dll" "stdcall" }
{ "usp10" "usp10.dll" "stdcall" }
{ "psapi" "psapi.dll" "stdcall" }
} [ first3 add-library ] each

1
basis/windows/psapi/authors.txt Executable file
View File

@ -0,0 +1 @@
Doug Coleman

12
basis/windows/psapi/psapi.factor Executable file
View File

@ -0,0 +1,12 @@
! Copyright (C) 2009 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.syntax windows.types ;
IN: windows.psapi
LIBRARY: psapi
FUNCTION: BOOL EnumDeviceDrivers ( LPVOID* lpImageBase, DWORD cb, LPDWORD lpcbNeeded ) ;
FUNCTION: DWORD GetDeviceDriverBaseNameW ( LPVOID ImageBase, LPTSTR lpBaseName, DWORD nSize ) ;
ALIAS: GetDeviceDriverBaseName GetDeviceDriverBaseNameW