mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-03-13 08:20:31 -07:00
Code Issues Projects Releases Packages Wiki Activity

The pretty printer has to accept extended characters now.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2008-10-26 17:45:22 +01:00
parent 541956193a
commit fc60fc304c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/lsp/pprint.lsp
View file

@ -145,7 +145,7 @@
(defun pretty-out (stream char)
(declare (type pretty-stream stream)
(type base-char char)
(type character char)
(si::c-local))
(cond ((char= char #\newline)
(enqueue-newline stream :literal))