From 7abded836658981b5042b6f4527190f3cfbdfa88 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Mon, 5 Nov 1990 19:10:18 +0000 Subject: [PATCH] Fixed ftype proclaim of defprinter-prin[1c] to allow nil for the indent. --- compiler/macros.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/macros.lisp b/compiler/macros.lisp index 0dcbd0f9f..d4f6aef99 100644 --- a/compiler/macros.lisp +++ b/compiler/macros.lisp @@ -733,7 +733,7 @@ ;;; These functions are called by the expansion of the Defprinter ;;; macro to do the actual printing. ;;; -(proclaim '(ftype (function (symbol t stream fixnum) void) +(proclaim '(ftype (function (symbol t stream (or null fixnum)) void) defprinter-prin1 defprinter-princ)) (defun defprinter-prin1 (name value stream indent) (if *defprint-pretty* -- GitLab