Fix dinput for recent slot renaming

diff --git a/basis/windows/dinput/constants/constants.factor b/basis/windows/dinput/constants/constants.factor
index b918ec121bc6ca8b72c705f80820d8682e0ad663..6c55ff0e67cbfbb7f89e61fbcc8334d77853ca2f 100755 (executable)
--- a/basis/windows/dinput/constants/constants.factor
+++ b/basis/windows/dinput/constants/constants.factor
@@ -22,7 +22,7 @@ SYMBOLS:
 : (offsetof) ( field struct -- offset )
     [ (field-spec-of) offset>> ] [ drop 0 ] if* ;
 : (sizeof) ( field struct -- size )
-    [ (field-spec-of) class>> "[" split1 drop heap-size ] [ drop 1 ] if* ;
+    [ (field-spec-of) type>> "[" split1 drop heap-size ] [ drop 1 ] if* ;
 
 : (flag) ( thing -- integer )
     {