From 053bbbaddd67efc79ed320871e1dc911d542fab0 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Fri, 16 Nov 2018 09:08:43 +0000 Subject: [PATCH] Tickle error case that I missed. --- tests/runtime/test-numpar.scm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/tests/runtime/test-numpar.scm b/tests/runtime/test-numpar.scm index 34410caec..a2641421c 100644 --- a/tests/runtime/test-numpar.scm +++ b/tests/runtime/test-numpar.scm @@ -85,6 +85,8 @@ USA. (define-eqv-test "#d#e-100" -100) (define-eqv-test "#x#e-100" -256) +(define-eqv-test "#e1e1+1e1i" 10+10i 'xerror) + (define-eqv-test "#e#x1p10" (expt 2 10)) (define-eqv-test "#e#x1.1p4" #x11) (define-eqv-test "#e#x1.1p-1" (* #x11 (expt 2 (- (+ 1 4))))) -- 2.25.1