]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ui/backend/x11/x11.factor
Updating code to use with-out-parameters
[factor.git] / basis / ui / backend / x11 / x11.factor
index 2f979ee4f134969aa25aed616258093711e09621..ef0618dff339142c1c0b05b5cd2d89a5fa5e0b5a 100644 (file)
@@ -60,7 +60,7 @@ M: x11-ui-backend (pixel-format-attribute)
     [ handle>> ] [ >glx-visual ] bi*
     [ 2drop f ] [
         first
-        0 <int> [ glXGetConfig drop ] keep *int
+        { int } [ glXGetConfig drop ] with-out-parameters
     ] if-empty ;
 
 CONSTANT: modifiers