From 394af82b1fca5a616ab70d8d32c4fe0403ac6b53 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Sun, 24 Mar 2013 14:20:32 -0700 Subject: [PATCH] gpu.shaders: use ERROR: --- extra/gpu/shaders/shaders.factor | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/extra/gpu/shaders/shaders.factor b/extra/gpu/shaders/shaders.factor index 19e61fe616..0c52fc0aa0 100755 --- a/extra/gpu/shaders/shaders.factor +++ b/extra/gpu/shaders/shaders.factor @@ -451,16 +451,16 @@ M: vertex-array-collection vertex-array-buffers : vertex-array-buffer ( vertex-array: vertex-array -- vertex-buffer: buffer ) vertex-array-buffers first ; inline -TUPLE: compile-shader-error shader log ; -TUPLE: link-program-error program log ; +ERROR: compile-shader-error shader log ; +ERROR: link-program-error program log ; : throw-compile-shader-error ( shader instance -- * ) - [ dup ] dip [ gl-shader-info-log ] [ delete-gl-shader ] bi replace-log-line-numbers - \ compile-shader-error boa throw ; + [ dup ] dip [ gl-shader-info-log ] [ delete-gl-shader ] bi + replace-log-line-numbers compile-shader-error ; : throw-link-program-error ( program instance -- * ) - [ dup ] dip [ gl-program-info-log ] [ delete-gl-program ] bi replace-log-line-numbers - \ link-program-error boa throw ; + [ dup ] dip [ gl-program-info-log ] [ delete-gl-program ] bi + replace-log-line-numbers link-program-error ; DEFER: