gpu.shaders: use "counter" instead of reinventing it

release
Joe Groff 2010-04-07 15:33:19 -07:00
parent 12f187d0eb
commit 181c45209f
1 changed files with 2 additions and 4 deletions
extra/gpu/shaders

View File

@ -301,13 +301,11 @@ M: f (verify-feedback-format)
dup 1 = [ drop ] [ 2array ] if ;
SYMBOL: padding-no
padding-no [ 0 ] initialize
: padding-name ( -- name )
"padding-"
padding-no get number>string append
"(" ")" surround
padding-no inc ;
padding-no counter number>string append
"(" ")" surround ;
: vertex-attribute>struct-slot ( vertex-attribute -- struct-slot-spec )
[ name>> [ padding-name ] unless* ]