From 2fe793e09e8508311fa2bfda4870edc288fa0495 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sat, 11 Apr 2009 18:29:51 +0000 Subject: Fix SF/2749682 * interp/sys-os.boot ($NaNvalue): Fix typo. * testsuite/interpreter/sf-2749682.input: New. --- src/ChangeLog | 6 ++++++ src/interp/sys-os.boot | 2 +- src/testsuite/interpreter/sf-2749682.input | 1 + 3 files changed, 8 insertions(+), 1 deletion(-) create mode 100644 src/testsuite/interpreter/sf-2749682.input (limited to 'src') diff --git a/src/ChangeLog b/src/ChangeLog index 8a66eca0..ecae7c4f 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2009-04-11 Gabriel Dos Reis + + Fix SF/2749682 + * interp/sys-os.boot ($NaNvalue): Fix typo. + * testsuite/interpreter/sf-2749682.input: New. + 2009-04-08 Gabriel Dos Reis Fix SF/2564917 diff --git a/src/interp/sys-os.boot b/src/interp/sys-os.boot index f844fba7..c4f45e66 100644 --- a/src/interp/sys-os.boot +++ b/src/interp/sys-os.boot @@ -207,7 +207,7 @@ import NANQ: () -> double for NaNQ $plusInfinity := plusInfinity() $minusInfinity := minusInfinity() -$NaNValue := NaNQ() +$NaNvalue := NaNQ() )elseif %hasFeature KEYWORD::SBCL $plusInfinity == SB_-EXT::DOUBLE_-FLOAT_-POSITIVE_-INFINITY diff --git a/src/testsuite/interpreter/sf-2749682.input b/src/testsuite/interpreter/sf-2749682.input new file mode 100644 index 00000000..5e432a59 --- /dev/null +++ b/src/testsuite/interpreter/sf-2749682.input @@ -0,0 +1 @@ +draw(csc(x),x=0..10) -- cgit v1.2.3