This is the mail archive of the
cgen@sourceware.org
mailing list for the CGEN project.
[patch][commit] String Handling in sid-model.scm
- From: Dave Brolley <brolley at redhat dot com>
- To: cgen at sources dot redhat dot com, sid at sources dot redhat dot com
- Date: Tue, 07 Nov 2006 16:14:05 -0500
- Subject: [patch][commit] String Handling in sid-model.scm
Hi,
Guile 1.6.4 was choking because of a missing symbol->string call. I've
committed the attached patch.
Dave
2006-11-07 Dave Brolley <brolley@redhat.com>
* sid-model.scm (gen-model-unit-fn-decl): Use symbol->string where
necessary.
Index: cgen/sid-model.scm
===================================================================
RCS file: /cvs/src/src/cgen/sid-model.scm,v
retrieving revision 1.9
diff -c -p -r1.9 sid-model.scm
*** cgen/sid-model.scm 9 May 2006 18:33:04 -0000 1.9
--- cgen/sid-model.scm 7 Nov 2006 21:10:05 -0000
*************** static const MACH_IMP_PROPERTIES @cpu@_i
*** 85,91 ****
(gen-c-args (map (lambda (arg)
(string-append
(mode:c-type (mode:lookup (cadr arg)))
! " /*" (car arg) "*/"))
(find (lambda (arg)
; Indices of scalars not passed.
(not (null? (cdr arg))))
--- 85,91 ----
(gen-c-args (map (lambda (arg)
(string-append
(mode:c-type (mode:lookup (cadr arg)))
! " /*" (symbol->string (car arg)) "*/"))
(find (lambda (arg)
; Indices of scalars not passed.
(not (null? (cdr arg))))