classes.struct: moving to new/boa instead of <struct>/<struct-boa>

[factor.git] / basis / game / input / xinput / xinput.factor

diff --git a/basis/game/input/xinput/xinput.factor b/basis/game/input/xinput/xinput.factor
index 6a38f96e2fad16a818607199fb200be30acfd0bb..0959df79f5f8b0bbcf3b19f2313ad58aa5ad6846 100644 (file)
--- a/basis/game/input/xinput/xinput.factor
+++ b/basis/game/input/xinput/xinput.factor
@@ -114,13 +114,13 @@ M: xinput-game-input-backend instance-id
     if ;
 
 M: xinput-game-input-backend read-controller
-    XINPUT_STATE <struct> [ XInputGetState drop ] keep
+    XINPUT_STATE new [ XInputGetState drop ] keep
     fill-controller-state ;
 
 M: xinput-game-input-backend calibrate-controller drop ;
 
 M: xinput-game-input-backend vibrate-controller
-    [ >vibration ] bi@ XINPUT_VIBRATION <struct-boa> XInputSetState drop ;
+    [ >vibration ] bi@ XINPUT_VIBRATION boa XInputSetState drop ;
 
 M: xinput-game-input-backend read-keyboard
     +keyboard-device+ get