From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <cgen-return-1774-listarch-cgen=sources.redhat.com@sources.redhat.com>
Received: (qmail 15776 invoked by alias); 29 Jul 2005 18:53:14 -0000
Mailing-List: contact cgen-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:cgen-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/cgen/>
List-Post: <mailto:cgen@sources.redhat.com>
List-Help: <mailto:cgen-help@sources.redhat.com>, <http://sources.redhat.com/lists.html#faqs>
Sender: cgen-owner@sources.redhat.com
Received: (qmail 15759 invoked by uid 22791); 29 Jul 2005 18:53:11 -0000
Received: from mx1.redhat.com (HELO mx1.redhat.com) (66.187.233.31)
    by sourceware.org (qpsmtpd/0.30-dev) with ESMTP; Fri, 29 Jul 2005 18:53:11 +0000
Received: from int-mx1.corp.redhat.com (int-mx1.corp.redhat.com [172.16.52.254])
	by mx1.redhat.com (8.12.11/8.12.11) with ESMTP id j6TIrACQ028009
	for <cgen@sources.redhat.com>; Fri, 29 Jul 2005 14:53:10 -0400
Received: from potter.sfbay.redhat.com (potter.sfbay.redhat.com [172.16.27.15])
	by int-mx1.corp.redhat.com (8.11.6/8.11.6) with ESMTP id j6TIr9V12869
	for <cgen@sources.redhat.com>; Fri, 29 Jul 2005 14:53:09 -0400
Received: from [127.0.0.1] (vpn50-100.rdu.redhat.com [172.16.50.100])
	by potter.sfbay.redhat.com (8.12.8/8.12.8) with ESMTP id j6TIr59U026997
	for <cgen@sources.redhat.com>; Fri, 29 Jul 2005 14:53:08 -0400
Message-ID: <42EA7B11.7040001@redhat.com>
Date: Fri, 29 Jul 2005 18:53:00 -0000
From: Dave Brolley <brolley@redhat.com>
User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206)
MIME-Version: 1.0
To: cgen@sources.redhat.com
Subject: [patch][commit] String conversion for error message
Content-Type: multipart/mixed;
 boundary="------------070009040500050907080004"
X-SW-Source: 2005-q3/txt/msg00007.txt.bz2

This is a multi-part message in MIME format.
--------------070009040500050907080004
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Content-length: 122

Hi,

I've committed the attached patch which ensures that (obj:name op) is a 
string when passed to string-append.

Dave


--------------070009040500050907080004
Content-Type: text/plain;
 name="cgen-string.ChangeLog"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
 filename="cgen-string.ChangeLog"
Content-length: 133

2005-07-29  Dave Brolley  <brolley@redhat.com>

	* operand.scm (op:new-mode): Convert (obj:name op) to a string for
	string-append.


--------------070009040500050907080004
Content-Type: text/plain;
 name="cgen-string.patch.txt"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
 filename="cgen-string.patch.txt"
Content-length: 675

Index: cgen/operand.scm
===================================================================
RCS file: /cvs/src/src/cgen/operand.scm,v
retrieving revision 1.10
diff -c -p -r1.10 operand.scm
*** cgen/operand.scm	15 Jun 2005 21:28:18 -0000	1.10
--- cgen/operand.scm	29 Jul 2005 18:46:16 -0000
***************
*** 295,301 ****
  	      result)
  	    (parse-error "op:new-mode"
  			 (string-append "invalid mode for operand `"
! 					(obj:name op)
  					"'")
  			 new-mode-name))))
  )
--- 295,301 ----
  	      result)
  	    (parse-error "op:new-mode"
  			 (string-append "invalid mode for operand `"
! 					(->string (obj:name op))
  					"'")
  			 new-mode-name))))
  )

--------------070009040500050907080004--