Skip to content
Snippets Groups Projects
Commit 7190b61c authored by Raymond Toy's avatar Raymond Toy
Browse files

Add test for sincos(-0d0).

parent b79c2872
No related branches found
No related tags found
No related merge requests found
...@@ -142,6 +142,10 @@ ...@@ -142,6 +142,10 @@
-4.08066388841804238545143494525595117765084022768d-1) -4.08066388841804238545143494525595117765084022768d-1)
(rt:deftest sincos.0
(multiple-value-list (kernel::%sincos -0d0))
(-0d0 1d0))
(rt:deftest sincos.1 (rt:deftest sincos.1
(let (results) (let (results)
(dotimes (k 1000) (dotimes (k 1000)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment