opengl: Rename gl-error to gl-error-tuple.

diff --git a/basis/opengl/opengl.factor b/basis/opengl/opengl.factor
index 9c66002f7eee0e2f142838f0f92bf02438bdaf6e..175d5ba4139ed7f8ceb2b62f36573cb936e25a85 100644 (file)
--- a/basis/opengl/opengl.factor
+++ b/basis/opengl/opengl.factor
@@ -32,10 +32,10 @@ SYMBOL: gl-scale-factor
         { 0x0506 "Invalid framebuffer operation" }
     } at "Unknown error" or ;
 
-TUPLE: gl-error function code string ;
+TUPLE: gl-error-tuple function code string ;
 
 : <gl-error> ( function code -- gl-error )
-    dup error>string \ gl-error boa ; inline
+    dup error>string \ gl-error-tuple boa ; inline
 
 : gl-error-code ( -- code/f )
     glGetError dup 0 = [ drop f ] when ; inline