From 513aabb046ca6417eea1355428d212e1f3a1573d Mon Sep 17 00:00:00 2001
From: Richard Brooksby
Date: Wed, 12 Sep 2012 19:45:27 +0100
Subject: Further elimination of type puns that violate the strict aliasing
 rule.  this change eliminates puns on the format methods.

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

---
 mps/code/root.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'mps/code/root.c')

diff --git a/mps/code/root.c b/mps/code/root.c
index c94217c04ad..edb932f800a 100644
--- a/mps/code/root.c
+++ b/mps/code/root.c
@@ -53,7 +53,7 @@ typedef struct RootStruct {
       size_t s;                 /* passed to scan */
     } reg;
     struct {
-      FormatScanMethod scan;    /* format-like scanner */
+      mps_fmt_scan_t scan;      /* format-like scanner */
       Addr base, limit;         /* passed to scan */
     } fmt;
   } the;
@@ -315,7 +315,7 @@ Res RootCreateReg(Root *rootReturn, Arena arena,
 }
 
 Res RootCreateFmt(Root *rootReturn, Arena arena,
-                  Rank rank, RootMode mode, FormatScanMethod scan,
+                  Rank rank, RootMode mode, mps_fmt_scan_t scan,
                   Addr base, Addr limit)
 {
   union RootUnion theUnion;
-- 
cgit v1.2.1