2008-12-23 Frank Ch. Eigler <fche@redhat.com>

	* sim.scm (-op-gen-queued-write): Add needed symbol->string.

diff --git a/ChangeLog b/ChangeLog
index aec6131325870717353bc1ced5dad242f1c0b84a..c17ffa4ee29e844945fe461b9ca3331df056f1be 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2008-12-23  Frank Ch. Eigler  <fche@redhat.com>
+
+       * sim.scm (-op-gen-queued-write): Add needed symbol->string.
+
 2008-06-17  Dave Brolley  <brolley@redhat.com>
 
        * cpu/xstormy16.cpu (h-pc): Add a set handler.

diff --git a/sim.scm b/sim.scm
index 64bd16ad8525efbcedc2a41b6c2dda33ca6ab06f..92798c7b6d0e1afe33f1a31b6c80ddc3f505eb9f 100644 (file)
--- a/sim.scm
+++ b/sim.scm
@@ -1144,9 +1144,9 @@
             (if setter
                 "fn_"
                 "")
-            (string-downcase (if sem-mode
+            (string-downcase (symbol->string (if sem-mode
                                  (mode-real-name sem-mode)
-                                 (mode-real-name mode))))))
+                                 (mode-real-name mode)))))))
      "_write (current_cpu"
      ; ??? May need to include h/w id some day.
      (if setter