diff --git a/ansi-tests/misc.lsp b/ansi-tests/misc.lsp index c0dff57d75908c3a014bbea4c797e507e4f854de..c482e832762807260b1a4362ec0cb3fd95e1a451 100644 --- a/ansi-tests/misc.lsp +++ b/ansi-tests/misc.lsp @@ -10689,3 +10689,11 @@ Broken at C::WT-MAKE-CLOSURE. (ash c (min 82 -28192897)))) 0 -714979492 1474663829) 0) + +;;; ecl +;;; 10000000.0d0 is not of type INTEGER. + +(deftest misc.595 + (floor 1/2 1.0d0) + 0 #.(float 1/2 1.0d0)) +