Skip to content
Snippets Groups Projects
Commit 97ccff18 authored by pfdietz's avatar pfdietz
Browse files

Fixed typo in cmucl-type-prop.20

parent 3474242a
No related branches found
No related tags found
No related merge requests found
...@@ -246,7 +246,7 @@ ...@@ -246,7 +246,7 @@
(declare (optimize (speed 2) (safety 3) (debug 3) (space 3)) (declare (optimize (speed 2) (safety 3) (debug 3) (space 3))
(type (rational -1255531/68466 4) p1)) (type (rational -1255531/68466 4) p1))
(+ p1 41888.98682005542d0))) (+ p1 41888.98682005542d0)))
-1255531/6846) -1255531/68466)
'double-float)) 'double-float))
t) t)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment