specialized-arrays: performed some cleanup.

[factor.git] / basis / x11 / xim / xim.factor

diff --git a/basis/x11/xim/xim.factor b/basis/x11/xim/xim.factor
index b9248bac05c584fcb630dd89f69ff3311843d37f..5fd42fd77efedfb5593a6127cfe3fd476e56ce8a 100644 (file)
--- a/basis/x11/xim/xim.factor
+++ b/basis/x11/xim/xim.factor
@@ -41,7 +41,7 @@ SYMBOL: keybuf
 SYMBOL: keysym
 
 : prepare-lookup ( -- )
-    buf-size <uint-array> keybuf set
+    buf-size uint <c-array> keybuf set
     0 KeySym <ref> keysym set ;
 
 : finish-lookup ( len -- string keysym )