add psapi stub to windows.nt
parent
4c2cdb18b5
commit
58557e41bf
|
@ -14,4 +14,5 @@ USING: alien sequences alien.libraries ;
|
||||||
{ "glu" "glu32.dll" "stdcall" }
|
{ "glu" "glu32.dll" "stdcall" }
|
||||||
{ "ole32" "ole32.dll" "stdcall" }
|
{ "ole32" "ole32.dll" "stdcall" }
|
||||||
{ "usp10" "usp10.dll" "stdcall" }
|
{ "usp10" "usp10.dll" "stdcall" }
|
||||||
|
{ "psapi" "psapi.dll" "stdcall" }
|
||||||
} [ first3 add-library ] each
|
} [ first3 add-library ] each
|
||||||
|
|
|
@ -0,0 +1 @@
|
||||||
|
Doug Coleman
|
|
@ -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
|
Loading…
Reference in New Issue