opengl.annotations: use dupd

[factor.git] / basis / opengl / annotations / annotations.factor

diff --git a/basis/opengl/annotations/annotations.factor b/basis/opengl/annotations/annotations.factor
index 3282973b69ca8146231dae4c512309432ccdbb7d..29c56ea7614bfd34936726b700beb699d3022f68 100644 (file)
--- a/basis/opengl/annotations/annotations.factor
+++ b/basis/opengl/annotations/annotations.factor
@@ -29,7 +29,7 @@ gl-error-log [ V{ } clone ] initialize
 
 : annotate-gl-functions ( quot -- )
     [
-        [ gl-functions ] dip [ [ dup ] dip curry (annotate) ] curry each
+        [ gl-functions ] dip [ dupd curry (annotate) ] curry each
     ] with-compilation-unit ;
 
 : reset-gl-functions ( -- )