change ERROR: words from throw-foo back to foo.

[factor.git] / extra / gpu / render / render.factor

diff --git a/extra/gpu/render/render.factor b/extra/gpu/render/render.factor
index 312559e0dea15e808d71adde47fa6491e002775a..f157e322a81185555952f73c6f1e9618ea838518 100755 (executable)
--- a/extra/gpu/render/render.factor
+++ b/extra/gpu/render/render.factor
@@ -399,7 +399,7 @@ DEFER: [bind-uniform-tuple]
         { mat4-uniform   { [ dim 0 ] dip 4 4 >uniform-matrix-array glUniformMatrix4fv   } }
 
         { texture-uniform { drop dim dup iota [ texture-unit + ] int-array{ } map-as glUniform1iv } }
-    } at [ uniform throw-invalid-uniform-type ] unless* >quotation :> value-quot
+    } at [ uniform invalid-uniform-type ] unless* >quotation :> value-quot
 
     type uniform-type-texture-units dim * texture-unit +
     pre-quot value-quot append ;
@@ -442,7 +442,7 @@ DEFER: [bind-uniform-tuple]
         { mat4-uniform   [ [ 1 0 ] dip 4 4 >uniform-matrix glUniformMatrix4fv   ] }
 
         { texture-uniform { drop texture-unit glUniform1i } }
-    } at [ uniform throw-invalid-uniform-type ] unless* >quotation :> value-quot
+    } at [ uniform invalid-uniform-type ] unless* >quotation :> value-quot
 
     type uniform-type-texture-units texture-unit +
     pre-quot value-quot append ;