Remove many uses of <int> and *int etc

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

diff --git a/basis/x11/xim/xim.factor b/basis/x11/xim/xim.factor
index 06add388b18fa4744551f61c0e93110cd4e2f7b3..d47672d59833a9a102c6415b1d6f672c6088f33e 100644 (file)
--- a/basis/x11/xim/xim.factor
+++ b/basis/x11/xim/xim.factor
@@ -51,7 +51,7 @@ SYMBOL: keysym
 : lookup-string ( event xic -- string keysym )
     [
         prepare-lookup
-        swap keybuf get buf-size keysym get 0 <int>
+        swap keybuf get buf-size keysym get 0 int <ref>
         XwcLookupString
         finish-lookup
     ] with-scope ;