compiler.tests: fix test for generalizations change

db4
Slava Pestov 2010-05-18 23:08:37 -04:00
parent e30a429985
commit 4dd58ce40e
1 changed files with 3 additions and 2 deletions

View File

@ -1,7 +1,9 @@
USING: math.private kernel combinators accessors arrays
generalizations tools.test words ;
generalizations sequences.generalizations tools.test words ;
IN: compiler.tests.spilling
! These tests are stupid and don't trigger spilling anymore
: float-spill-bug ( a -- b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b b )
{
[ dup float+ ]
@ -163,7 +165,6 @@ IN: compiler.tests.spilling
[ 4 ] [ 1 1 resolve-spill-bug ] unit-test
! The above don't really test spilling...
: spill-test-1 ( a -- b )
dup 1 fixnum+fast
dup 1 fixnum+fast