Skip to content
Snippets Groups Projects
Commit 538ec2f3 authored by pfdietz's avatar pfdietz
Browse files

Fixed typos spotted by CR.

parent 250ed256
No related branches found
No related tags found
No related merge requests found
...@@ -65,7 +65,7 @@ ...@@ -65,7 +65,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
;;; FIXME ;;; FIXME
......
...@@ -63,7 +63,7 @@ ...@@ -63,7 +63,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
;;; FIXME ;;; FIXME
......
...@@ -77,7 +77,7 @@ ...@@ -77,7 +77,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 rlist)))
nil) nil)
(deftest atanh.7 (deftest atanh.7
...@@ -90,7 +90,7 @@ ...@@ -90,7 +90,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 rlist)))
nil) nil)
......
...@@ -65,7 +65,7 @@ ...@@ -65,7 +65,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
;;; FIXME ;;; FIXME
......
...@@ -78,7 +78,7 @@ ...@@ -78,7 +78,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
(deftest log.8 (deftest log.8
...@@ -92,7 +92,7 @@ ...@@ -92,7 +92,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
;;; FIXME ;;; FIXME
......
...@@ -63,7 +63,7 @@ ...@@ -63,7 +63,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
;;; FIXME ;;; FIXME
......
...@@ -63,7 +63,7 @@ ...@@ -63,7 +63,7 @@
repeat 1000 repeat 1000
unless (and (null (cdr rlist)) unless (and (null (cdr rlist))
(typep y `(complex ,type))) (typep y `(complex ,type)))
collect (list x rlist))) collect (list x1 x2 rlist)))
nil) nil)
;;; FIXME ;;; FIXME
......
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