From 8cb78d5bd283e2f6ad96dcb15d361ac3c74c4a77 Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Sat, 26 Nov 2011 17:46:38 -0800 Subject: [PATCH] math.complex: pass tests even if number-base set --- basis/math/complex/complex-tests.factor | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/basis/math/complex/complex-tests.factor b/basis/math/complex/complex-tests.factor index f85ec49f81..5c41d6219e 100644 --- a/basis/math/complex/complex-tests.factor +++ b/basis/math/complex/complex-tests.factor @@ -1,5 +1,5 @@ USING: kernel math math.constants math.functions math.order -tools.test prettyprint ; +tools.test prettyprint prettyprint.config namespaces ; IN: math.complex.tests [ 1 C{ 0 1 } rect> ] must-fail @@ -73,4 +73,6 @@ IN: math.complex.tests [ t ] [ 0.0 pi rect> exp C{ -1 0 } 1.0e-7 ~ ] unit-test [ t ] [ 0 pi rect> exp C{ -1 0 } 1.0e-7 ~ ] unit-test -[ "C{ 1/2 2/3 }" ] [ C{ 1/2 2/3 } unparse ] unit-test +10 number-base [ + [ "C{ 1/2 2/3 }" ] [ C{ 1/2 2/3 } unparse ] unit-test +] with-variable