Re: [Sbcl-devel] Possible Bug: MACROEXPAND-1'ing this code results in error in FORMAT due to symbol defpackage in backquoted list

[Nikodemus S. <nik...@ra...>]

2009/4/23 Sidney Markowitz <si...@si...>:

> diff --git a/src/code/pprint.lisp b/src/code/pprint.lisp
> index 89bac81..74c368c 100644
> --- a/src/code/pprint.lisp
> +++ b/src/code/pprint.lisp
> @@ -1241,7 +1241,7 @@ line break."
>  (defun pprint-defpackage (stream list &rest noise)
>   (declare (ignore noise))
>   (funcall  (formatter
> -             "~:<~W~^ ~3I~:_~W~^~1I~@{~:@_~:<~W~^ ~:I~@_~@{~W~^ ~_~}~:>~}~:>")
> +             "~:<~W~^ ~3I~:_~W~^~1I~@{~:@_~:<~^~W~^ ~:I~@_~@{~W~^ ~_~}~:>~}~:>")
>             stream
>             list))

Merged as 1.0.27.24, thank you!

Cheers,

 -- Nikodemus