ui.backend.x11: fix typo

diff --git a/basis/ui/backend/x11/x11.factor b/basis/ui/backend/x11/x11.factor
index 61441b7f350b1068be66ca6ca005b89d334ee78f..f3d603ddd8fe920a33eb64f8a4878bcd89ca42f4 100644 (file)
--- a/basis/ui/backend/x11/x11.factor
+++ b/basis/ui/backend/x11/x11.factor
@@ -40,7 +40,7 @@ SINGLETON: x11-ui-backend
         Success assert=
     ]
     [| type format n-atoms bytes-after atoms |
-        atoms ulong-array-cast >array
+        atoms n-atoms <direct-ulong-array> >array
         atoms XFree
     ]
     with-out-parameters ;