mirrors: fix tests.

db4
John Benediktsson 2013-04-23 07:56:58 -07:00
parent 6bac58fa97
commit 739a721cc3
1 changed files with 3 additions and 2 deletions

View File

@ -60,5 +60,6 @@ TUPLE: color
[ 1 ] [ "red" "mirror" get at ] unit-test
! Issue #857.
{ 4 } [ "asdf" make-mirror assoc-size ] unit-test
{ 3 } [ { 1 2 3 } make-mirror assoc-size ] unit-test
{ 2 } [ "asdf" make-mirror assoc-size ] unit-test
{ 8 } [ \ + make-mirror assoc-size ] unit-test