* PATCH: use concat instead of string-append, elsewhere
@ 2005-01-20 23:13 Jim Blandy
0 siblings, 0 replies; only message in thread
From: Jim Blandy @ 2005-01-20 23:13 UTC (permalink / raw)
To: cgen
I've committed the following.
2005-01-20 Jim Blandy <jimb@redhat.com>
* opcodes.scm (gen-switch): Use concat instead of string-map.
Index: cgen/opcodes.scm
===================================================================
RCS file: /cvs/cvsfiles/devo/cgen/opcodes.scm,v
retrieving revision 1.74
diff -c -p -r1.74 opcodes.scm
*** cgen/opcodes.scm 20 Oct 2003 01:25:22 -0000 1.74
--- cgen/opcodes.scm 20 Jan 2005 23:10:26 -0000
***************
*** 516,522 ****
(lambda (ops)
; OPS is a list of operands with the same name that for whatever reason
; were defined separately.
! (logit 3 (string-append "Processing " (obj:str-name (car ops)) " " what " ...\n"))
(if (= (length ops) 1)
(gen-obj-sanitize
(car ops)
--- 516,522 ----
(lambda (ops)
; OPS is a list of operands with the same name that for whatever reason
; were defined separately.
! (logit 3 (concat "Processing " (obj:str-name (car ops)) " " what " ...\n"))
(if (= (length ops) 1)
(gen-obj-sanitize
(car ops)
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2005-01-20 23:13 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2005-01-20 23:13 PATCH: use concat instead of string-append, elsewhere Jim Blandy
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).