diff --git a/basis/math/functions/functions-tests.factor b/basis/math/functions/functions-tests.factor index 430d2918c0..d61bed8e04 100644 --- a/basis/math/functions/functions-tests.factor +++ b/basis/math/functions/functions-tests.factor @@ -101,7 +101,7 @@ CONSTANT: log10-factorial-1000 0x1.40f3593ed6f8ep11 { 1/0. } [ 1/0. e^-1 ] unit-test { -1.0 } [ -1/0. e^-1 ] unit-test { -1.0 } [ -1/0. e^-1 ] unit-test -{ t } [ NAN: 8000000000000 dup e^-1 [ fp-nan-payload ] same? ] unit-test +{ t } [ nan: 8000000000000 dup e^-1 [ fp-nan-payload ] same? ] unit-test { 5e-324 } [ 5e-324 e^-1 ] unit-test { 1e-20 } [ 1e-20 e^-1 ] unit-test { -5e-324 } [ -5e-324 e^-1 ] unit-test