Revert "factor: rename [ ] [ ] unit-test -> { } [ ] unit-test using a refactoring...

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

diff --git a/extra/gpu/render/render-tests.factor b/extra/gpu/render/render-tests.factor
index da79b138cc0eac692bce021b4c501e405e2a3b83..2dafac8907481b79ff860950209fbeae1d889862 100644 (file)
--- a/extra/gpu/render/render-tests.factor
+++ b/extra/gpu/render/render-tests.factor
@@ -21,25 +21,25 @@ UNIFORM-TUPLE: array-of-struct-containing-texture
 UNIFORM-TUPLE: array-of-struct-containing-array-of-texture
     { "threads" array-of-textures 2 } ;
 
-{  1 } [ texture-uniform uniform-type-texture-units ] unit-test
-{  0 } [ float-uniform uniform-type-texture-units ] unit-test
-{  2 } [ two-textures uniform-type-texture-units ] unit-test
-{  3 } [ inherited-textures uniform-type-texture-units ] unit-test
-{  6 } [ array-of-textures uniform-type-texture-units ] unit-test
-{  2 } [ struct-containing-texture uniform-type-texture-units ] unit-test
-{  9 } [ array-of-struct-containing-texture uniform-type-texture-units ] unit-test
-{ 12 } [ array-of-struct-containing-array-of-texture uniform-type-texture-units ] unit-test
+[  1 ] [ texture-uniform uniform-type-texture-units ] unit-test
+[  0 ] [ float-uniform uniform-type-texture-units ] unit-test
+[  2 ] [ two-textures uniform-type-texture-units ] unit-test
+[  3 ] [ inherited-textures uniform-type-texture-units ] unit-test
+[  6 ] [ array-of-textures uniform-type-texture-units ] unit-test
+[  2 ] [ struct-containing-texture uniform-type-texture-units ] unit-test
+[  9 ] [ array-of-struct-containing-texture uniform-type-texture-units ] unit-test
+[ 12 ] [ array-of-struct-containing-array-of-texture uniform-type-texture-units ] unit-test
 
-{ { [ ] } } [ texture-uniform f uniform-texture-accessors ] unit-test
+[ { [ ] } ] [ texture-uniform f uniform-texture-accessors ] unit-test
 
-{ { } } [ float-uniform f uniform-texture-accessors ] unit-test
+[ { } ] [ float-uniform f uniform-texture-accessors ] unit-test
 
-{ { [ argyle>> ] [ tweed>> ] } } [ two-textures f uniform-texture-accessors ] unit-test
+[ { [ argyle>> ] [ tweed>> ] } ] [ two-textures f uniform-texture-accessors ] unit-test
 
-{ { [ argyle>> ] [ tweed>> ] [ paisley>> ] } }
+[ { [ argyle>> ] [ tweed>> ] [ paisley>> ] } ]
 [ inherited-textures f uniform-texture-accessors ] unit-test
 
-{ {
+[ {
     [ argyle>> ]
     [ tweed>> ]
     [ plaids>> {
@@ -48,16 +48,16 @@ UNIFORM-TUPLE: array-of-struct-containing-array-of-texture
         [ 2 swap nth ]
         [ 3 swap nth ]
     } ]
-} } [ array-of-textures f uniform-texture-accessors ] unit-test
+} ] [ array-of-textures f uniform-texture-accessors ] unit-test
 
-{ {
+[ {
     [ threads>> {
         [ argyle>> ]
         [ tweed>> ]
     } ]
-} } [ struct-containing-texture f uniform-texture-accessors ] unit-test
+} ] [ struct-containing-texture f uniform-texture-accessors ] unit-test
 
-{ {
+[ {
     [ threads>> {
         [ 0 swap nth {
             [ argyle>> ]
@@ -75,9 +75,9 @@ UNIFORM-TUPLE: array-of-struct-containing-array-of-texture
             [ paisley>> ]
         } ]
     } ]
-} } [ array-of-struct-containing-texture f uniform-texture-accessors ] unit-test
+} ] [ array-of-struct-containing-texture f uniform-texture-accessors ] unit-test
 
-{ {
+[ {
     [ threads>> {
         [ 0 swap nth {
             [ argyle>> ]
@@ -100,9 +100,9 @@ UNIFORM-TUPLE: array-of-struct-containing-array-of-texture
             } ]
         } ]
     } ]
-} } [ array-of-struct-containing-array-of-texture f uniform-texture-accessors ] unit-test
+} ] [ array-of-struct-containing-array-of-texture f uniform-texture-accessors ] unit-test
 
-{ [
+[ [
     nip {
         [ argyle>> 0 (bind-texture-unit) ]
         [ tweed>> 1 (bind-texture-unit) ]
@@ -113,4 +113,4 @@ UNIFORM-TUPLE: array-of-struct-containing-array-of-texture
             [ 3 swap nth 5 (bind-texture-unit) ]
         } cleave ]
     } cleave
-] } [ array-of-textures [bind-uniform-textures] ] unit-test
+] ] [ array-of-textures [bind-uniform-textures] ] unit-test