Mps: adding uses of diag_decl so that variety=hi builds on os x.

Copied from Perforce
 Change: 163257
 ServerID: perforce.ravenbrook.com

2 files changed, 2 insertions, 2 deletions

diff --git a/mps/code/diag.c b/mps/code/diag.c
index 46fb1c4342a..c43e682d857 100644
--- a/mps/code/diag.c
+++ b/mps/code/diag.c
@@ -171,7 +171,7 @@ static void rules_diag(Rule rules)
     "Only showing diags permitted by these tag/paragraph/line"
     " rules:\n", NULL ));
   for(ir = 0; rules[ir].action != NULL; ir++) {
-    Rule rule = &rules[ir];
+    DIAG_DECL( Rule rule = &rules[ir]; )
     DIAG_MOREF(( "$S$S/$S/$S\n", rule->action, rule->tag, 
                  rule->para, rule->line,
                  NULL ));
diff --git a/mps/code/trace.c b/mps/code/trace.c
index 7c3c6fe97e1..3614f3157df 100644
--- a/mps/code/trace.c
+++ b/mps/code/trace.c
@@ -1821,7 +1821,7 @@ static void TraceStartGenDesc_diag(GenDesc desc, int i)
     "         ZoneSet:$B\n", desc->zones,
     NULL ));
   RING_FOR(n, &desc->locusRing, nn) {
-    PoolGen gen = RING_ELT(PoolGen, genRing, n);
+    DIAG_DECL( PoolGen gen = RING_ELT(PoolGen, genRing, n); )
     DIAG_WRITEF(( DIAG_STREAM,
       "           PoolGen $U ($S)", gen->nr, gen->pool->class->name,
       " totalSize $U", gen->totalSize,