[patch][commit] String Handling in sid-model.scm

Dave Brolley <[email protected]> Tue, 07 Nov 2006 16:14:05 -0500
Newsgroups gmane.comp.tools.cgen.devel,gmane.comp.emulators.sid.devel
Message-ID <[email protected]>
Hi,

Guile 1.6.4 was choking because of a missing symbol->string call. I've 
committed the attached patch.

Dave
sid-model.ChangeLog (text/plain, 129 B)
2006-11-07  Dave Brolley  <[email protected]>

	* sid-model.scm (gen-model-unit-fn-decl): Use symbol->string where
	necessary.
sid-model.patch.txt (text/plain, 911 B)
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))))