diff --git a/pkgs/racket-test-core/tests/racket/extflonum.rktl b/pkgs/racket-test-core/tests/racket/extflonum.rktl index e1f9b635b5..e95922504b 100644 --- a/pkgs/racket-test-core/tests/racket/extflonum.rktl +++ b/pkgs/racket-test-core/tests/racket/extflonum.rktl @@ -10,8 +10,8 @@ (test "+inf.t" format "~a" +inf.t) (test "-inf.t" format "~a" -inf.t) (test "+nan.t" format "~a" +nan.t) -(test "7.0t0" format "~a" 007.000t000) -(test "-7.0t0" format "~a" -007.000t000) +(test #t regexp-match? #rx"7[.]0*t0" (format "~a" 007.000t000)) +(test #t regexp-match? #rx"-0*7[.]0*t0" (format "~a" -007.000t000)) (test #t extflonum? 7.t0) (test #f extflonum? 7.0) (test #f number? 7.t0)