diff --git a/extra/bake/bake-tests.factor b/extra/bake/bake-tests.factor index 64329de92d..7b40d603f1 100644 --- a/extra/bake/bake-tests.factor +++ b/extra/bake/bake-tests.factor @@ -26,3 +26,9 @@ IN: bake.tests [ { 1 2 3 4 5 6 7 8 9 } ] unit-test* +[ 10 20 30 40 `[ , V{ , { , } } , ] ] [ [ 10 V{ 20 { 30 } } 40 ] ] unit-test* + +[ { 1 2 3 } { 4 5 6 } { 7 8 9 } `[ , { V{ @ } { , } } ] ] +[ [ { 1 2 3 } { V{ 4 5 6 } { { 7 8 9 } } } ] ] +unit-test* +