From 25e0d3e6a1fcab1cb48ce7874367ac6ea5dd5c29 Mon Sep 17 00:00:00 2001 From: "waldemar%netscape.com" Date: Wed, 25 Sep 2002 23:54:34 +0000 Subject: [PATCH] Fixed bug --- js2/semantics/Markup.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/js2/semantics/Markup.lisp b/js2/semantics/Markup.lisp index 0d833011c64b..d1e022ad5e86 100644 --- a/js2/semantics/Markup.lisp +++ b/js2/semantics/Markup.lisp @@ -289,7 +289,7 @@ (pretail nil :type list) ;Tail's predecessor if tail's car is a block that can be inlined at the end of the output list; nil otherwise. (logical-line-width 0 :type integer);Logical line width for the current paragraph (division-length nil) ;Number of characters in the current division block; t if more than one line; nil if not emitting division block. - (logical-position nil :type logical-position)) ;Information about the current logical lines or nil if not emitting paragraph contents + (logical-position nil :type (or null logical-position))) ;Information about the current logical lines or nil if not emitting paragraph contents ; ;RTF ;HTML (defconstant *markup-stream-top-level* 0) ;Top-level group ;Top level