From ...
From: Erik Naggum <erik@naggum.net>
Subject: Re: string printing within specified margins
Date: 2000/08/03
Message-ID: <3174309221400582@naggum.net>#1/1
X-Deja-AN: 654091340
References: <xaoya2es6td.fsf@anarky.sogs.stsci.edu>
mail-copies-to: never
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: newsmaster@eunet.no
X-Trace: oslo-nntp.eunet.no 965322417 5700 195.0.192.66 (3 Aug 2000 17:06:57 GMT)
Organization: Naggum Software; vox: +47 8800 8879; fax: +47 8800 8601; http://naggum.no; http://naggum.net
User-Agent: Gnus/5.0803 (Gnus v5.8.3) Emacs/20.7
Mime-Version: 1.0
NNTP-Posting-Date: 3 Aug 2000 17:06:57 GMT
Newsgroups: comp.lang.lisp

* John M. Adams
|     Given a long string, 
|     what is a natural way
|     to print it within 
|     certain margins, like
|     this?
| 
| With all the power of format and pretty-printing, it seems like
| there ought to be a way, but I'm not getting it.

(let ((*print-miser-width* 0)
      (*print-right-margin* 20))
  (format t "~@<Given a long string, what is a natural way to print it within certain margins, like this?~@:>"))
Given a long
string, what is a
natural way to
print it within
certain margins,
like this?
=> nil

  I haven't found (in five minutes) a good way to make this work for
  an argument string instead of a constant string.

#:Erik
-- 
  If this is not what you expected, please alter your expectations.