diff --git a/ansi-tests/universe.lsp b/ansi-tests/universe.lsp index b153a6238f334a9a9b53f89c2348fb8bf448f53a..a9d44c2feff2b41665e080f26c386537fb27fb06 100644 --- a/ansi-tests/universe.lsp +++ b/ansi-tests/universe.lsp @@ -136,6 +136,8 @@ (defvar *reals* (append *integers* *floats* *ratios*)) +(defvar *rationals* (append *integers* *ratios*)) + (defun try-to-read-chars (&rest namelist) (loop for name in namelist append