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