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

        * sid-cpu.scm (-gen-scache-semantic-fn): Generate a declation of 'writte
n'
        if with-profile or with-parallel-write.
        (cgen-semantics.cxx): Make the @prefix@ namespace available if with-para
llel.

diff --git a/ChangeLog b/ChangeLog
index 66c4772e4d07883086d5ebc5f6fe2a2c0355550c..8ba56577ac9597200ad0c57d0541e66f4d7308e7 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2005-07-29  Dave Brolley  <brolley@redhat.com>
 
+       * sid-cpu.scm (-gen-scache-semantic-fn): Generate a declation of 'written'
+       if with-profile or with-parallel-write.
+       (cgen-semantics.cxx): Make the @prefix@ namespace available if with-parallel.
        * operand.scm (op:new-mode): Convert (obj:name op) to a string for
        string-append.
 

diff --git a/sid-cpu.scm b/sid-cpu.scm
index a13bc51d4d007d59e74c6ef3a16faea75627bb26..161b5f062a1901c02aa0cf18447204351498421e 100644 (file)
--- a/sid-cpu.scm
+++ b/sid-cpu.scm
@@ -736,7 +736,10 @@ using namespace cgen;
      (gen-define-field-macro (insn-sfmt insn))
      "  sem_status status = SEM_STATUS_NORMAL;\n"
      "  @prefix@_scache* abuf = sem;\n"
-
+     ; Unconditionally written operands are not recorded here.
+     (if (or (with-profile?) (with-parallel-write?))
+        "  unsigned long long written = 0;\n"
+        "")
      ; The address of this insn, needed by extraction and semantic code.
      ; Note that the address recorded in the cpu state struct is not used.
      ; For faster engines that copy will be out of date.
@@ -792,8 +795,11 @@ using namespace cgen;
 #endif
 #include \"@cpu@.h\"
 
-using namespace @cpu@; // FIXME: namespace organization still wip
-
+using namespace @cpu@; // FIXME: namespace organization still wip\n")
+  (if (with-parallel?)
+      (string-write "\
+using namespace @prefix@; // FIXME: namespace organization still wip\n"))
+  (string-write "\
 #define GET_ATTR(name) GET_ATTR_##name ()
 
 \n"