]> gitweb.factorcode.org Git - factor.git/blobdiff - unmaintained/opengl-gadgets/gadgets.factor
tools.test: Make the flag public. Finish porting tester changes to fuzzer.
[factor.git] / unmaintained / opengl-gadgets / gadgets.factor
index b24783e4ef68e2537f30e3ac709c2a50e51a2267..70d7758a7bf42c534d0465be80819c3a7c55b616 100644 (file)
@@ -34,7 +34,7 @@ C: <entry> cache-entry
 
 : get-entry ( gadget -- {texture,dims} )
     dup cache-key* textures get at
-    [ nip ] [ make-entry ] if* ;
+    [ ] [ make-entry ] ?if ;
 
 : get-dims ( gadget -- dims )
     get-entry dims>> ;