interpolate: split out format into a hook

[factor.git] / basis / windows / directx / directx.factor

diff --git a/basis/windows/directx/directx.factor b/basis/windows/directx/directx.factor
index 0e647b9f7fe9968b89cd5ad478eb4ea3e53a93c7..4a9291467c3940d089eebc992970345de9830f00 100644 (file)
--- a/basis/windows/directx/directx.factor
+++ b/basis/windows/directx/directx.factor
@@ -1,16 +1,15 @@
-USING: alien sequences alien.libraries ;
+USING: alien sequences alien.libraries alien.libraries.finder ;
 IN: windows.directx
 
 {
     { "dinput"      "dinput8.dll"        stdcall }
-    { "xinput"      "xinput1_3.dll"      stdcall }
     { "dxgi"        "dxgi.dll"           stdcall }
     { "d2d1"        "d2d1.dll"           stdcall }
     { "d3d9"        "d3d9.dll"           stdcall }
     { "d3d10"       "d3d10.dll"          stdcall }
     { "d3d10_1"     "d3d10_1.dll"        stdcall }
     { "d3d11"       "d3d11.dll"          stdcall }
-    { "d3dcompiler" "d3dcompiler_42.dll" stdcall } 
+    { "d3dcompiler" "d3dcompiler_42.dll" stdcall }
     { "d3dcsx"      "d3dcsx_42.dll"      stdcall }
     { "d3dx9"       "d3dx9_42.dll"       stdcall }
     { "d3dx10"      "d3dx10_42.dll"      stdcall }
@@ -21,3 +20,5 @@ IN: windows.directx
     { "xapofx"      "xapofx1_3.dll"      stdcall }
     { "xaudio2"     "xaudio2_5.dll"      stdcall }
 } [ first3 add-library ] each
+
+"xinput" { "xinput1_4.dll" "xinput1_3.dll" } find-library-from-list stdcall add-library