steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extra/gpu/shaders/shaders.factor
View File

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