From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: Fu-gangqiang <lispor@163.com>
Newsgroups: gmane.lisp.guile.bugs
Subject: Guile1.9.14 formatted output
Date: Mon, 10 Jan 2011 19:56:25 +0800 (CST)
Message-ID: <1e4ee42.447f.12d6fc8c893.Coremail.lispor@163.com>
NNTP-Posting-Host: lo.gmane.org
Mime-Version: 1.0
Content-Type: multipart/alternative; 
	boundary="----=_Part_46803_6510719.1294660585619"
X-Trace: dough.gmane.org 1294660641 27018 80.91.229.12 (10 Jan 2011 11:57:21 GMT)
X-Complaints-To: usenet@dough.gmane.org
NNTP-Posting-Date: Mon, 10 Jan 2011 11:57:21 +0000 (UTC)
To: "Guile bug" <bug-guile@gnu.org>
Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Mon Jan 10 12:57:17 2011
Return-path: <bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org>
Envelope-to: guile-bugs@m.gmane.org
Original-Received: from lists.gnu.org ([199.232.76.165])
	by lo.gmane.org with esmtp (Exim 4.69)
	(envelope-from <bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org>)
	id 1PcGNA-0007p1-RM
	for guile-bugs@m.gmane.org; Mon, 10 Jan 2011 12:57:17 +0100
Original-Received: from localhost ([127.0.0.1]:59875 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43)
	id 1PcGN9-0003cf-Lh
	for guile-bugs@m.gmane.org; Mon, 10 Jan 2011 06:57:15 -0500
Original-Received: from [140.186.70.92] (port=56166 helo=eggs.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1PcGMt-0003bA-SA
	for bug-guile@gnu.org; Mon, 10 Jan 2011 06:57:10 -0500
Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <lispor@163.com>) id 1PcGMf-0007nC-Ed
	for bug-guile@gnu.org; Mon, 10 Jan 2011 06:56:58 -0500
Original-Received: from m13-133.163.com ([220.181.13.133]:57509)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <lispor@163.com>) id 1PcGMd-0007aL-Mw
	for bug-guile@gnu.org; Mon, 10 Jan 2011 06:56:45 -0500
Original-Received: from lispor ( [110.52.62.11] ) by ajax-webmail-wmsvr133 (Coremail)
	; Mon, 10 Jan 2011 19:56:25 +0800 (CST)
X-Originating-IP: [110.52.62.11]
X-Priority: 3
X-Mailer: Coremail Webmail Server Version SP_ntes V3.5 build
	101227(12597.3587.3569) Copyright (c) 2002-2011 www.mailtech.cn 163com
X-CM-CTRLDATA: vWNoyGZvb3Rlcl9odG09NTM2Mjo4MQ==
X-CM-TRANSID: hcGowKDbEAbq8ypN3V4AAA--.2539W
X-CM-SenderInfo: xolv10ru6rljoofrz/1tbiPgrCp0zBvUcGYwAAsD
X-Coremail-Antispam: 1U5529EdanIXcx71UUUUU7vcSsGvfC2KfnxnUU==
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6, seldom 2.4 (older,
	4)
X-BeenThere: bug-guile@gnu.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: "Bug reports for GUILE,
	GNU's Ubiquitous Extension Language" <bug-guile.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/bug-guile>,
	<mailto:bug-guile-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/bug-guile>
List-Post: <mailto:bug-guile@gnu.org>
List-Help: <mailto:bug-guile-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/bug-guile>,
	<mailto:bug-guile-request@gnu.org?subject=subscribe>
Original-Sender: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org
Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org
Xref: news.gmane.org gmane.lisp.guile.bugs:4948
Archived-At: <http://permalink.gmane.org/gmane.lisp.guile.bugs/4948>

------=_Part_46803_6510719.1294660585619
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit

Hi,all
my guile1.9.14 output like this:
when I studied the format procedure following the mannual:
====== mannual start=====
~f 

If overflowchar and width are both given and if the output would exceed width, then that many overflowchars are printed instead of the value.

               (format #t "~5,,,'xf" 12345) -| 12345
               (format #t "~4,,,'xf" 12345) -| xxxx           <- bug
====== mannual end=====
but i got like this:
====== repl start=====
scheme@(guile-user)> (format #f "~5,,,'xf" 12345)
"xxxxx"
scheme@(guile-user)> (format #f "~6,,,'xf" 12345)
"12345."
====== repl end=====
------=_Part_46803_6510719.1294660585619
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: 7bit

<div>Hi,all</div><div><span class="Apple-style-span" style="font-family: 'Times New Roman'; line-height: normal; font-size: medium; white-space: pre-wrap; ">my guile1.9.14 output like this:</span></div><div><meta http-equiv="content-type" content="text/html; charset=utf-8"><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal;"><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; ">when I studied&nbsp;</span></span></font><span class="Apple-style-span" style="white-space: normal; ">the format procedure</span><span class="Apple-style-span" style="white-space: normal; ">&nbsp;following the ma
 nnual:</span></pre><meta http-equiv="content-type" content="text/html; charset=utf-8"><pre class="example"><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal;"><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; ">====== mannual start=====</span></span></font></pre><pre class="example"><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal;"><meta http-equiv="content-type" content="text/html; charset=utf-8"><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; ">~f&nbsp;<div><p style="font-family: 'Times New Roman'; line-height: normal; font-size: medium; ">If&nbsp;<var>overflowchar</var>&nbsp;and&nbsp;<var>width</va
 r>&nbsp;are both given and if the output would exceed&nbsp;<var>width</var>, then that many&nbsp;<var>overflowchar</var>s are printed instead of the value.</p><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: 'Times New Roman'; line-height: normal; font-size: medium; ">               (format #t "~5,,,'xf" 12345) -| 12345
               (format #t "~4,,,'xf" 12345) -| xxxx           &lt;- bug</pre><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: 'Times New Roman'; line-height: normal; font-size: medium; "><meta http-equiv="content-type" content="text/html; charset=utf-8"><span class="Apple-style-span" style="white-space: normal; font-family: arial, verdana, sans-serif; font-size: 14px; line-height: 23px; "><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal; "><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; ">====== mannual end=====</span></span></font></pre></spa
 n></pre></div></span>but i got like this:</span></font></pre><pre class="example"><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal;"><meta http-equiv="content-type" content="text/html; charset=utf-8"><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; "><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal; "><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; ">====== repl start=====</span></span></font></pre></span></span></font></pre><pre class="example"><font class="Apple-style-span" size="3">
 <span class="Apple-style-span" style="line-height: normal;"><meta http-equiv="content-type" content="text/html; charset=utf-8"><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; "><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><span class="Apple-style-span" style="line-height: normal; font-size: medium; ">scheme@(guile-user)&gt; (format #f "~5,,,'xf" 12345)</span></pre><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><span class="Apple-style-span" style="line-height: normal; font-size: medium; ">"xxxxx"</span></pre><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, v
 erdana, sans-serif; "><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal; ">scheme@(guile-user)&gt; (format #f "~6,,,'xf" 12345)
"12345."</span></font></pre><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal; "><meta http-equiv="content-type" content="text/html; charset=utf-8"><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; "><pre class="example" style="white-space: pre-wrap; word-wrap: break-word; font-family: arial, verdana, sans-serif; "><font class="Apple-style-span" size="3"><span class="Apple-style-span" style="line-height: normal; "><span class="Apple-style-span" style="white-space: normal; font-size: 14px; line-height: 23px; ">====== repl end=====</span></span></font></pre></span></span></font></pre><
 /span></span></font></pre></div><br><br><span title="neteasefooter"><span id="netease_mail_footer"></span></span>
------=_Part_46803_6510719.1294660585619--