X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fgame-input%2Fiokit%2Fiokit.factor;h=71d547ad29ed7521f7ac1c78678a524ea117cc9f;hp=92c0c7173ae6b9d6948f307437e0c48379e42622;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e diff --git a/basis/game-input/iokit/iokit.factor b/basis/game-input/iokit/iokit.factor index 92c0c7173a..71d547ad29 100755 --- a/basis/game-input/iokit/iokit.factor +++ b/basis/game-input/iokit/iokit.factor @@ -153,7 +153,7 @@ CONSTANT: pov-values IOHIDValueGetIntegerValue pov-values ?nth [ pov-neutral ] unless* ; : record-button ( state hid-value element -- ) - [ buttons>> ] [ button-value ] [ IOHIDElementGetUsage 1- ] tri* rot set-nth ; + [ buttons>> ] [ button-value ] [ IOHIDElementGetUsage 1 - ] tri* rot set-nth ; : record-controller ( controller-state value -- ) dup IOHIDValueGetElement {