]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/compiler/cfg/value-numbering/value-numbering-tests.factor
factor: second stab at [ ] [ ] unit-test -> { } [ ] unit-test
[factor.git] / basis / compiler / cfg / value-numbering / value-numbering-tests.factor
index cb2753e9db8dce7262d71ab5956f48d611b06b50..72d483d8d45e0b5e8a413474f353d2b1c8605ccd 100644 (file)
@@ -25,36 +25,36 @@ IN: compiler.cfg.value-numbering.tests
     ] map ;
 
 ! Folding constants together
-[
+{
     {
         T{ ##load-reference f 0 0.0 }
         T{ ##load-reference f 1 -0.0 }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 0.0 }
         T{ ##load-reference f 1 -0.0 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-reference f 0 0.0 }
         T{ ##copy f 1 0 any-rep }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 0.0 }
         T{ ##load-reference f 1 0.0 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-reference f 0 t }
         T{ ##copy f 1 0 any-rep }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 t }
         T{ ##load-reference f 1 t }
@@ -130,7 +130,7 @@ cpu x86.64? [
 ] when
 
 ! Double compare elimination
-[
+{
     {
         T{ ##peek f 1 D 1 }
         T{ ##peek f 2 D 2 }
@@ -138,7 +138,7 @@ cpu x86.64? [
         T{ ##copy f 6 4 any-rep }
         T{ ##replace f 6 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 1 D 1 }
         T{ ##peek f 2 D 2 }
@@ -148,14 +148,14 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 1 D 1 }
         T{ ##compare-imm f 2 1 16 cc= }
         T{ ##copy f 3 2 any-rep }
         T{ ##replace f 3 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 1 D 1 }
         T{ ##compare-imm f 2 1 16 cc= }
@@ -164,7 +164,7 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 1 D 1 }
         T{ ##peek f 2 D 2 }
@@ -172,7 +172,7 @@ cpu x86.64? [
         T{ ##copy f 6 4 any-rep }
         T{ ##replace f 6 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 1 D 1 }
         T{ ##peek f 2 D 2 }
@@ -182,7 +182,7 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 1 D 1 }
         T{ ##peek f 2 D 2 }
@@ -190,7 +190,7 @@ cpu x86.64? [
         T{ ##compare-integer f 6 2 1 cc/<= }
         T{ ##replace f 6 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 1 D 1 }
         T{ ##peek f 2 D 2 }
@@ -200,14 +200,14 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 1 D 1 }
         T{ ##compare-integer-imm f 2 1 100 cc<= }
         T{ ##compare-integer-imm f 3 1 100 cc/<= }
         T{ ##replace f 3 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 1 D 1 }
         T{ ##compare-integer-imm f 2 1 100 cc<= }
@@ -216,7 +216,7 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 8 D 0 }
         T{ ##peek f 9 D -1 }
@@ -224,7 +224,7 @@ cpu x86.64? [
         T{ ##compare-float-unordered f 14 8 9 cc/< }
         T{ ##replace f 14 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 8 D 0 }
         T{ ##peek f 9 D -1 }
@@ -234,14 +234,14 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 29 D -1 }
         T{ ##peek f 30 D -2 }
         T{ ##compare f 33 29 30 cc= }
         T{ ##compare-branch f 29 30 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 29 D -1 }
         T{ ##peek f 30 D -2 }
@@ -250,14 +250,14 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 29 D -1 }
         T{ ##peek f 30 D -2 }
         T{ ##compare-integer f 33 29 30 cc<= }
         T{ ##compare-integer-branch f 29 30 cc<= }
     }
-] [
+} [
     {
         T{ ##peek f 29 D -1 }
         T{ ##peek f 30 D -2 }
@@ -266,14 +266,14 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 29 D -1 }
         T{ ##peek f 30 D -2 }
         T{ ##test f 33 29 30 cc= }
         T{ ##test-branch f 29 30 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 29 D -1 }
         T{ ##peek f 30 D -2 }
@@ -282,13 +282,13 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 29 D -1 }
         T{ ##test-imm f 33 29 30 cc= }
         T{ ##test-imm-branch f 29 30 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 29 D -1 }
         T{ ##test-imm f 33 29 30 cc= }
@@ -296,13 +296,13 @@ cpu x86.64? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 1 D -1 }
         T{ ##test-vector f 2 1 f float-4-rep vcc-any }
         T{ ##test-vector-branch f 1 f float-4-rep vcc-any }
     }
-] [
+} [
     {
         T{ ##peek f 1 D -1 }
         T{ ##test-vector f 2 1 f float-4-rep vcc-any }
@@ -327,13 +327,13 @@ cpu x86.32? [
 ] when
 
 ! Immediate operand fusion
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##add-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -341,13 +341,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##add-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -355,13 +355,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##add-imm f 2 0 -100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -369,25 +369,25 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##sub f 1 0 0 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##mul-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -395,13 +395,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##mul-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -409,25 +409,25 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 1 D 0 }
         T{ ##shl-imm f 2 1 3 }
     }
-] [
+} [
     {
         T{ ##peek f 1 D 0 }
         T{ ##mul-imm f 2 1 8 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -1 }
         T{ ##neg f 2 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -1 }
@@ -435,13 +435,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -1 }
         T{ ##neg f 2 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -1 }
@@ -449,13 +449,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
         T{ ##neg f 2 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
@@ -463,14 +463,14 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
         T{ ##neg f 2 0 }
         T{ ##copy f 3 0 any-rep }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
@@ -479,13 +479,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##neg f 1 0 }
         T{ ##copy f 2 0 any-rep }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##neg f 1 0 }
@@ -493,13 +493,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##not f 1 0 }
         T{ ##copy f 2 0 any-rep }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##not f 1 0 }
@@ -507,13 +507,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##and-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -521,13 +521,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##and-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -535,13 +535,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##or-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -549,13 +549,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##or-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -563,13 +563,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##xor-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -577,13 +577,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##xor-imm f 2 0 100 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -591,13 +591,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##compare-imm f 2 0 100 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -605,13 +605,13 @@ cpu x86.32? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##compare-integer-imm f 2 0 100 cc<= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -679,13 +679,13 @@ cpu x86.32? [
     ] unit-test
 ] unless
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##compare-integer-imm f 2 0 100 cc>= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -693,13 +693,13 @@ cpu x86.32? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##compare-integer-imm-branch f 0 100 cc<= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -707,13 +707,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
         T{ ##compare-integer-imm-branch f 0 100 cc>= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -722,13 +722,13 @@ cpu x86.32? [
 ] unit-test
 
 ! Compare folding
-[
+{
     {
         T{ ##load-integer f 1 100 }
         T{ ##load-integer f 2 200 }
         T{ ##load-reference f 3 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 100 }
         T{ ##load-integer f 2 200 }
@@ -736,13 +736,13 @@ cpu x86.32? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 100 }
         T{ ##load-integer f 2 200 }
         T{ ##load-reference f 3 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 100 }
         T{ ##load-integer f 2 200 }
@@ -750,25 +750,25 @@ cpu x86.32? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 100 }
         T{ ##load-reference f 2 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 100 }
         T{ ##compare-integer-imm f 2 1 123 cc= }
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-integer f 2 20 }
         T{ ##load-reference f 3 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-integer f 2 20 }
@@ -776,13 +776,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
         T{ ##load-reference f 3 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
@@ -790,13 +790,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
         T{ ##load-reference f 3 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
@@ -804,13 +804,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-integer f 2 20 }
         T{ ##load-reference f 3 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-integer f 2 20 }
@@ -818,25 +818,25 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 f }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer f 1 0 0 cc< }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##load-reference f 2 f }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
@@ -844,108 +844,108 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 t }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer f 1 0 0 cc<= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 f }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer f 1 0 0 cc> }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 t }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer f 1 0 0 cc>= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 f }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer f 1 0 0 cc/= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 t }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer f 1 0 0 cc= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-reference f 2 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 10 }
         T{ ##compare-imm f 2 1 10 cc= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-reference f 2 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 10 }
         T{ ##compare-imm f 2 1 20 cc= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-reference f 2 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 10 }
         T{ ##compare-imm f 2 1 100 cc/= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 10 }
         T{ ##load-reference f 2 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 10 }
         T{ ##compare-imm f 2 1 10 cc/= }
@@ -1002,72 +1002,72 @@ cpu x86.32? [
     ] unit-test
 ] when
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 t }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare f 1 0 0 cc= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 f }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare f 1 0 0 cc/= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 12 }
         T{ ##load-reference f 3 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 12 }
         T{ ##test-imm f 3 1 13 cc/= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 15 }
         T{ ##load-reference f 3 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 15 }
         T{ ##test-imm f 3 1 16 cc/= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 12 }
         T{ ##load-reference f 3 f }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 12 }
         T{ ##test-imm f 3 1 13 cc= }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 15 }
         T{ ##load-reference f 3 t }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 15 }
         T{ ##test-imm f 3 1 16 cc= }
@@ -1075,14 +1075,14 @@ cpu x86.32? [
 ] unit-test
 
 ! Rewriting a ##test of an ##and into a ##test
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
         T{ ##and f 2 0 1 }
         T{ ##test f 3 0 1 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -1091,13 +1091,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##and-imm f 2 0 12 }
         T{ ##test-imm f 3 0 12 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##and-imm f 2 0 12 }
@@ -1106,13 +1106,13 @@ cpu x86.32? [
 ] unit-test
 
 ! Rewriting ##test into ##test-imm
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
         T{ ##test-imm f 2 0 10 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
@@ -1120,13 +1120,13 @@ cpu x86.32? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
         T{ ##test-imm f 2 0 10 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
@@ -1134,13 +1134,13 @@ cpu x86.32? [
     } value-numbering-step trim-temps
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
         T{ ##test-imm-branch f 0 10 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
@@ -1148,13 +1148,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
         T{ ##test-imm-branch f 0 10 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
@@ -1162,13 +1162,13 @@ cpu x86.32? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
         T{ ##test-imm-branch f 0 10 cc= }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 10 }
@@ -1283,7 +1283,7 @@ cpu x86? [
 ] when
 
 ! Reassociation
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1291,7 +1291,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##add-imm f 4 0 150 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1301,7 +1301,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1309,7 +1309,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##add-imm f 4 0 150 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1319,7 +1319,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1327,7 +1327,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##add-imm f 4 0 50 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1337,7 +1337,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1345,7 +1345,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##add-imm f 4 0 -150 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1355,7 +1355,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1363,7 +1363,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##mul-imm f 4 0 5000 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1373,7 +1373,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1381,7 +1381,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##mul-imm f 4 0 5000 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1391,7 +1391,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1399,7 +1399,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##and-imm f 4 0 32 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1409,7 +1409,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1417,7 +1417,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##and-imm f 4 0 32 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1427,7 +1427,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1435,7 +1435,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##or-imm f 4 0 118 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1445,7 +1445,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1453,7 +1453,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##or-imm f 4 0 118 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1463,7 +1463,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1471,7 +1471,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##xor-imm f 4 0 86 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1481,7 +1481,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1489,7 +1489,7 @@ cpu x86? [
         T{ ##load-integer f 3 50 }
         T{ ##xor-imm f 4 0 86 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 100 }
@@ -1499,14 +1499,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##shl-imm f 1 0 10 }
         T{ ##shl-imm f 2 0 21 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shl-imm f 1 0 10 }
@@ -1515,14 +1515,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##shl-imm f 1 0 10 }
         T{ ##shl-imm f 2 1 $[ cell-bits 1 - ] }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shl-imm f 1 0 10 }
@@ -1531,14 +1531,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##sar-imm f 1 0 10 }
         T{ ##sar-imm f 2 0 21 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##sar-imm f 1 0 10 }
@@ -1547,14 +1547,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##sar-imm f 1 0 10 }
         T{ ##sar-imm f 2 1 $[ cell-bits 1 - ] }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##sar-imm f 1 0 10 }
@@ -1563,14 +1563,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 1 0 10 }
         T{ ##shr-imm f 2 0 21 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 1 0 10 }
@@ -1579,14 +1579,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 1 0 10 }
         T{ ##shr-imm f 2 1 $[ cell-bits 1 - ] }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 1 0 10 }
@@ -1595,14 +1595,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 1 0 10 }
         T{ ##sar-imm f 2 1 11 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 1 0 10 }
@@ -1614,7 +1614,7 @@ cpu x86? [
 ! Distributive law
 2 vreg-counter set-global
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##add-imm f 1 0 10 }
@@ -1622,7 +1622,7 @@ cpu x86? [
         T{ ##add-imm f 2 3 40 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##add-imm f 1 0 10 }
@@ -1631,7 +1631,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##add-imm f 1 0 10 }
@@ -1639,7 +1639,7 @@ cpu x86? [
         T{ ##add-imm f 2 4 30 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##add-imm f 1 0 10 }
@@ -1648,7 +1648,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##add-imm f 1 0 -10 }
@@ -1656,7 +1656,7 @@ cpu x86? [
         T{ ##add-imm f 2 5 -40 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##sub-imm f 1 0 10 }
@@ -1665,7 +1665,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##add-imm f 1 0 -10 }
@@ -1673,7 +1673,7 @@ cpu x86? [
         T{ ##add-imm f 2 6 -30 }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##sub-imm f 1 0 10 }
@@ -1683,14 +1683,14 @@ cpu x86? [
 ] unit-test
 
 ! Simplification
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
         T{ ##copy f 3 0 any-rep }
         T{ ##replace f 3 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -1699,14 +1699,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
         T{ ##copy f 3 0 any-rep }
         T{ ##replace f 3 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -1715,14 +1715,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
         T{ ##copy f 3 0 any-rep }
         T{ ##replace f 3 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -1731,25 +1731,25 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##and-imm f 1 0 0 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##and-imm f 1 0 -1 }
@@ -1757,13 +1757,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##and f 1 0 0 }
@@ -1771,13 +1771,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##or-imm f 1 0 0 }
@@ -1785,25 +1785,25 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -1 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##or-imm f 1 0 -1 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##or f 1 0 0 }
@@ -1811,13 +1811,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##xor-imm f 1 0 0 }
@@ -1825,13 +1825,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##not f 1 0 }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##xor-imm f 1 0 -1 }
@@ -1839,25 +1839,25 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##xor f 1 0 0 }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 2 0 any-rep }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##mul-imm f 2 0 1 }
@@ -1865,13 +1865,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 2 0 any-rep }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shl-imm f 2 0 0 }
@@ -1879,13 +1879,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 2 0 any-rep }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##shr-imm f 2 0 0 }
@@ -1893,13 +1893,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##copy f 2 0 any-rep }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##sar-imm f 2 0 0 }
@@ -1908,14 +1908,14 @@ cpu x86? [
 ] unit-test
 
 ! Constant folding
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 3 }
         T{ ##load-integer f 3 4 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
@@ -1924,14 +1924,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 3 }
         T{ ##load-integer f 3 -2 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
@@ -1940,14 +1940,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
         T{ ##load-integer f 2 3 }
         T{ ##load-integer f 3 6 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
@@ -1956,14 +1956,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
         T{ ##load-integer f 2 1 }
         T{ ##load-integer f 3 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
@@ -1972,14 +1972,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
         T{ ##load-integer f 2 1 }
         T{ ##load-integer f 3 3 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
@@ -1988,14 +1988,14 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
         T{ ##load-integer f 2 3 }
         T{ ##load-integer f 3 1 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 2 }
@@ -2004,13 +2004,13 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 3 8 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
@@ -2034,13 +2034,13 @@ cell 8 = [
     ] unit-test
 ] when
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -8 }
         T{ ##load-integer f 3 -4 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 -8 }
@@ -2099,13 +2099,13 @@ cell 8 = [
     ] unless
 ] when
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 -1 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
@@ -2113,13 +2113,13 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 -2 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 1 1 }
@@ -2128,13 +2128,13 @@ cell 8 = [
 ] unit-test
 
 ! ##tagged>integer constant folding
-[
+{
     {
         T{ ##load-reference f 1 f }
         T{ ##load-integer f 2 $[ \ f type-number ] }
         T{ ##copy f 3 2 any-rep }
     }
-] [
+} [
     {
         T{ ##load-reference f 1 f }
         T{ ##tagged>integer f 2 1 }
@@ -2142,13 +2142,13 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 100 }
         T{ ##load-integer f 2 $[ 100 tag-fixnum ] }
         T{ ##load-integer f 3 $[ 100 tag-fixnum 1 + ] }
     }
-] [
+} [
     {
         T{ ##load-integer f 1 100 }
         T{ ##tagged>integer f 2 1 }
@@ -2157,14 +2157,14 @@ cell 8 = [
 ] unit-test
 
 ! Alien boxing and unboxing
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##box-alien f 1 0 }
         T{ ##copy f 2 0 any-rep }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##box-alien f 1 0 }
@@ -2173,14 +2173,14 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##box-alien f 1 0 }
         T{ ##copy f 2 0 any-rep }
         T{ ##replace f 2 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##box-alien f 1 0 }
@@ -2189,14 +2189,14 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 2 0 }
         T{ ##copy f 1 0 any-rep }
         T{ ##replace f 1 D 0 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 2 0 }
@@ -2207,7 +2207,7 @@ cell 8 = [
 
 3 vreg-counter set-global
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 2 16 }
@@ -2215,7 +2215,7 @@ cell 8 = [
         T{ ##unbox-any-c-ptr f 4 0 }
         T{ ##add-imm f 3 4 16 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 2 16 }
@@ -2226,7 +2226,7 @@ cell 8 = [
 
 4 vreg-counter set-global
 
-[
+{
     {
         T{ ##box-alien f 0 1 }
         T{ ##load-integer f 2 16 }
@@ -2234,7 +2234,7 @@ cell 8 = [
         T{ ##copy f 5 1 any-rep }
         T{ ##add-imm f 4 5 16 }
     }
-] [
+} [
     {
         T{ ##box-alien f 0 1 }
         T{ ##load-integer f 2 16 }
@@ -2245,14 +2245,14 @@ cell 8 = [
 
 3 vreg-counter set-global
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 2 0 }
         T{ ##copy f 3 0 any-rep }
         T{ ##replace f 3 D 1 }
     }
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-integer f 2 0 }
@@ -2262,59 +2262,59 @@ cell 8 = [
 ] unit-test
 
 ! Various SIMD simplifications
-[
+{
     {
         T{ ##vector>scalar f 1 0 float-4-rep }
         T{ ##copy f 2 0 any-rep }
     }
-] [
+} [
     {
         T{ ##vector>scalar f 1 0 float-4-rep }
         T{ ##scalar>vector f 2 1 float-4-rep }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##copy f 1 0 any-rep }
     }
-] [
+} [
     {
         T{ ##shuffle-vector-imm f 1 0 { 0 1 2 3 } float-4-rep }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##shuffle-vector-imm f 1 0 { 1 2 3 0 } float-4-rep }
         T{ ##shuffle-vector-imm f 2 0 { 0 2 3 1 } float-4-rep }
     }
-] [
+} [
     {
         T{ ##shuffle-vector-imm f 1 0 { 1 2 3 0 } float-4-rep }
         T{ ##shuffle-vector-imm f 2 1 { 3 1 2 0 } float-4-rep }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##shuffle-vector-imm f 1 0 { 1 2 3 0 } float-4-rep }
         T{ ##shuffle-vector-imm f 2 1 { 1 0 } double-2-rep }
     }
-] [
+} [
     {
         T{ ##shuffle-vector-imm f 1 0 { 1 2 3 0 } float-4-rep }
         T{ ##shuffle-vector-imm f 2 1 { 1 0 } double-2-rep }
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 0 55 }
         T{ ##load-reference f 1 B{ 55 0 0 0  55 0 0 0  55 0 0 0  55 0 0 0 } }
         T{ ##load-reference f 2 B{ 55 0 0 0  55 0 0 0  55 0 0 0  55 0 0 0 } }
     }
-] [
+} [
     {
         T{ ##load-integer f 0 55 }
         T{ ##scalar>vector f 1 0 int-4-rep }
@@ -2322,13 +2322,13 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##load-reference f 1 B{ 0 0 160 63 0 0 160 63 0 0 160 63 0 0 160 63 } }
         T{ ##load-reference f 2 B{ 0 0 160 63 0 0 160 63 0 0 160 63 0 0 160 63 } }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##scalar>vector f 1 0 float-4-rep }
@@ -2336,13 +2336,13 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##load-reference f 1 B{ 0 0 160 63 0 0 160 63 0 0 160 63 0 0 160 63 } }
         T{ ##load-reference f 2 B{ 0 0 160 63 0 0 160 63 0 0 160 63 0 0 160 63 } }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##scalar>vector f 1 0 float-4-rep }
@@ -2350,14 +2350,14 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 0 55 }
         T{ ##load-reference f 1 B{ 55 0 55 0 55 0 55 0 55 0 55 0 55 0 55 0 } }
         T{ ##load-reference f 2 B{ 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 } }
         T{ ##load-reference f 3 B{ 0 55 0 55 0 55 0 55 0 55 0 55 0 55 0 55 } }
     }
-] [
+} [
     {
         T{ ##load-integer f 0 55 }
         T{ ##scalar>vector f 1 0 short-8-rep }
@@ -2366,13 +2366,13 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##load-reference f 2 3.75 }
         T{ ##load-reference f 4 B{ 0 0 0 0 0 0 244 63 0 0 0 0 0 0 14 64 } }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##load-reference f 2 3.75 }
@@ -2380,13 +2380,13 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 0 125 }
         T{ ##load-integer f 2 375 }
         T{ ##load-reference f 4 B{ 125 0 0 0 0 0 0 0 119 1 0 0 0 0 0 0 } }
     }
-] [
+} [
     {
         T{ ##load-integer f 0 125 }
         T{ ##load-integer f 2 375 }
@@ -2394,7 +2394,7 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##load-reference f 1 2.50 }
@@ -2402,7 +2402,7 @@ cell 8 = [
         T{ ##load-reference f 3 5.00 }
         T{ ##load-reference f 4 B{ 0 0 160 63 0 0 32 64 0 0 112 64 0 0 160 64 } }
     }
-] [
+} [
     {
         T{ ##load-reference f 0 1.25 }
         T{ ##load-reference f 1 2.50 }
@@ -2412,7 +2412,7 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 0 125 }
         T{ ##load-integer f 1 250 }
@@ -2420,7 +2420,7 @@ cell 8 = [
         T{ ##load-integer f 3 500 }
         T{ ##load-reference f 4 B{ 125 0 0 0 250 0 0 0 119 1 0 0 244 1 0 0 } }
     }
-] [
+} [
     {
         T{ ##load-integer f 0 125 }
         T{ ##load-integer f 1 250 }
@@ -2430,11 +2430,11 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##zero-vector f 2 float-4-rep }
     }
-] [
+} [
     {
         T{ ##xor-vector f 2 1 1 float-4-rep }
     } value-numbering-step
@@ -2442,13 +2442,13 @@ cell 8 = [
 
 ! NOT x AND y => x ANDN y
 
-[
+{
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
         T{ ##andn-vector f 5 0 1 float-4-rep }
     }
-] [
+} [
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
@@ -2456,12 +2456,12 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##not-vector  f 4 0 float-4-rep }
         T{ ##andn-vector f 5 0 1 float-4-rep }
     }
-] [
+} [
     {
         T{ ##not-vector  f 4 0 float-4-rep }
         T{ ##and-vector  f 5 4 1 float-4-rep }
@@ -2470,13 +2470,13 @@ cell 8 = [
 
 ! x AND NOT y => y ANDN x
 
-[
+{
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
         T{ ##andn-vector f 5 0 1 float-4-rep }
     }
-] [
+} [
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
@@ -2484,12 +2484,12 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##not-vector  f 4 0 float-4-rep }
         T{ ##andn-vector f 5 0 1 float-4-rep }
     }
-] [
+} [
     {
         T{ ##not-vector  f 4 0 float-4-rep }
         T{ ##and-vector  f 5 1 4 float-4-rep }
@@ -2498,13 +2498,13 @@ cell 8 = [
 
 ! NOT x ANDN y => x AND y
 
-[
+{
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
         T{ ##and-vector  f 5 0 1 float-4-rep }
     }
-] [
+} [
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
@@ -2512,12 +2512,12 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##not-vector  f 4 0 float-4-rep }
         T{ ##and-vector  f 5 0 1 float-4-rep }
     }
-] [
+} [
     {
         T{ ##not-vector  f 4 0 float-4-rep }
         T{ ##andn-vector f 5 4 1 float-4-rep }
@@ -2526,7 +2526,7 @@ cell 8 = [
 
 ! AND <=> ANDN
 
-[
+{
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
@@ -2534,7 +2534,7 @@ cell 8 = [
         T{ ##and-vector  f 6 0 2 float-4-rep }
         T{ ##or-vector   f 7 5 6 float-4-rep }
     }
-] [
+} [
     {
         T{ ##fill-vector f 3 float-4-rep }
         T{ ##xor-vector  f 4 0 3 float-4-rep }
@@ -2544,14 +2544,14 @@ cell 8 = [
     } value-numbering-step
 ] unit-test
 
-[
+{
     {
         T{ ##not-vector  f 4 0   float-4-rep }
         T{ ##andn-vector f 5 0 1 float-4-rep }
         T{ ##and-vector  f 6 0 2 float-4-rep }
         T{ ##or-vector   f 7 5 6 float-4-rep }
     }
-] [
+} [
     {
         T{ ##not-vector  f 4 0   float-4-rep }
         T{ ##and-vector  f 5 4 1 float-4-rep }
@@ -2566,14 +2566,14 @@ cell 8 = [
     [ V{ 0 1 } clone >>successors basic-block set value-numbering-step ] keep
     successors>> first ;
 
-[
+{
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
         T{ ##branch }
     }
     1
-] [
+} [
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
@@ -2581,14 +2581,14 @@ cell 8 = [
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
         T{ ##branch }
     }
     0
-] [
+} [
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
@@ -2596,14 +2596,14 @@ cell 8 = [
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
         T{ ##branch }
     }
     0
-] [
+} [
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
@@ -2611,14 +2611,14 @@ cell 8 = [
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
         T{ ##branch }
     }
     1
-] [
+} [
     {
         T{ ##load-integer f 1 1 }
         T{ ##load-integer f 2 2 }
@@ -2626,92 +2626,92 @@ cell 8 = [
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##branch }
     }
     1
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer-branch f 0 0 cc< }
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##branch }
     }
     0
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer-branch f 0 0 cc<= }
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##branch }
     }
     1
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer-branch f 0 0 cc> }
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##branch }
     }
     0
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer-branch f 0 0 cc>= }
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##branch }
     }
     0
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer-branch f 0 0 cc= }
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##branch }
     }
     1
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare-integer-branch f 0 0 cc/= }
     } test-branch-folding
 ] unit-test
 
-[
+{
     {
         T{ ##peek f 0 D 0 }
         T{ ##load-reference f 1 t }
         T{ ##branch }
     }
     0
-] [
+} [
     {
         T{ ##peek f 0 D 0 }
         T{ ##compare f 1 0 0 cc<= }
@@ -2745,18 +2745,18 @@ V{
 
 test-diamond
 
-[ ] [
+{ } [
     0 get block>cfg dup cfg set
     [ value-numbering ]
     [ select-representations ]
     [ destruct-ssa ] tri
 ] unit-test
 
-[ 1 ] [ 1 get successors>> length ] unit-test
+{ 1 } [ 1 get successors>> length ] unit-test
 
-[ t ] [ 1 get successors>> first 3 get eq? ] unit-test
+{ t } [ 1 get successors>> first 3 get eq? ] unit-test
 
-[ 2 ] [ 4 get instructions>> length ] unit-test
+{ 2 } [ 4 get instructions>> length ] unit-test
 
 V{
     T{ ##peek f 0 D 0 }
@@ -2785,14 +2785,14 @@ V{
 
 test-diamond
 
-[ ] [
+{ } [
     0 get block>cfg
     { value-numbering eliminate-dead-code } apply-passes
 ] unit-test
 
-[ t ] [ 1 get successors>> first 3 get eq? ] unit-test
+{ t } [ 1 get successors>> first 3 get eq? ] unit-test
 
-[ 1 ] [ 3 get instructions>> first inputs>> assoc-size ] unit-test
+{ 1 } [ 3 get instructions>> first inputs>> assoc-size ] unit-test
 
 V{ T{ ##prologue } T{ ##branch } } 0 test-bb
 
@@ -2852,12 +2852,12 @@ V{
 2 3 edge
 4 5 edge
 
-[ ] [
+{ } [
     0 get block>cfg
     { value-numbering eliminate-dead-code } apply-passes
 ] unit-test
 
-[ f ] [ 1 get instructions>> [ ##peek? ] any? ] unit-test
+{ f } [ 1 get instructions>> [ ##peek? ] any? ] unit-test
 
 ! Slot addressing optimization
 cpu x86? [
@@ -2881,14 +2881,14 @@ cpu x86? [
 ! Alien addressing optimization
 
 ! Base offset fusion on ##load/store-memory-imm
-[
+{
     V{
         T{ ##peek f 1 D 0 }
         T{ ##tagged>integer f 2 1 }
         T{ ##add-imm f 3 2 10 }
         T{ ##load-memory-imm f 4 2 10 int-rep c:uchar }
     }
-] [
+} [
     V{
         T{ ##peek f 1 D 0 }
         T{ ##tagged>integer f 2 1 }
@@ -2897,7 +2897,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -2906,7 +2906,7 @@ cpu x86? [
         T{ ##add-imm f 4 3 10 }
         T{ ##store-memory-imm f 2 3 10 int-rep c:uchar }
     }
-] [
+} [
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -2918,7 +2918,7 @@ cpu x86? [
 ] unit-test
 
 ! Displacement fusion on ##load/store-memory-imm
-[
+{
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -2927,7 +2927,7 @@ cpu x86? [
         T{ ##add f 4 2 3 }
         T{ ##load-memory f 5 2 3 0 0 int-rep c:uchar }
     }
-] [
+} [
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -2938,7 +2938,7 @@ cpu x86? [
     } value-numbering-step
 ] unit-test
 
-[
+{
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -2947,7 +2947,7 @@ cpu x86? [
         T{ ##add f 4 2 3 }
         T{ ##store-memory f 5 2 3 0 0 int-rep c:uchar }
     }
-] [
+} [
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }
@@ -3026,7 +3026,7 @@ cpu x86?
 
 ! Displacement offset fusion should not occur on
 ! ##load/store-memory with non-zero scale
-[ ] [
+{ } [
     V{
         T{ ##peek f 0 D 0 }
         T{ ##peek f 1 D 1 }