diff --git a/mps/code/mpm.h b/mps/code/mpm.h
index 01f1785e402..a20c2bbc89c 100644
--- a/mps/code/mpm.h
+++ b/mps/code/mpm.h
@@ -1,7 +1,7 @@
/* mpm.h: MEMORY POOL MANAGER DEFINITIONS
*
* $Id$
- * Copyright (c) 2001-2016 Ravenbrook Limited. See end of file for license.
+ * Copyright (c) 2001-2018 Ravenbrook Limited. See end of file for license.
* Portions copyright (C) 2002 Global Graphics Software.
*
* .trans.bufferinit: The Buffer data structure has an Init field and
@@ -487,7 +487,7 @@ extern void GlobalsReinitializeAll(void);
#define ArenaGreyRing(arena, rank) (&(arena)->greyRing[rank])
#define ArenaPoolRing(arena) (&ArenaGlobals(arena)->poolRing)
#define ArenaChunkTree(arena) RVALUE((arena)->chunkTree)
-#define ArenaChunkRing(arena) RVALUE(&(arena)->chunkRing)
+#define ArenaChunkRing(arena) (&(arena)->chunkRing)
#define ArenaShield(arena) (&(arena)->shieldStruct)
#define ArenaHistory(arena) (&(arena)->historyStruct)
@@ -692,7 +692,7 @@ extern Addr (SegLimit)(Seg seg);
#define SegGrey(seg) RVALUE((TraceSet)(seg)->grey)
#define SegWhite(seg) RVALUE((TraceSet)(seg)->white)
#define SegNailed(seg) RVALUE((TraceSet)(seg)->nailed)
-#define SegPoolRing(seg) RVALUE(&(seg)->poolRing)
+#define SegPoolRing(seg) (&(seg)->poolRing)
#define SegOfPoolRing(node) RING_ELT(Seg, poolRing, (node))
#define SegOfGreyRing(node) (&(RING_ELT(GCSeg, greyRing, (node)) \
->segStruct))
@@ -1008,7 +1008,7 @@ DECLARE_CLASS(Land, Land, Inst);
/* C. COPYRIGHT AND LICENSE
*
- * Copyright (C) 2001-2016 Ravenbrook Limited .
+ * Copyright (C) 2001-2018 Ravenbrook Limited .
* All rights reserved. This is an open source license. Contact
* Ravenbrook for commercial licensing options.
*
diff --git a/mps/code/tract.h b/mps/code/tract.h
index ce7c602a176..73322f2d9d3 100644
--- a/mps/code/tract.h
+++ b/mps/code/tract.h
@@ -1,7 +1,7 @@
/* tract.h: PAGE TABLE INTERFACE
*
* $Id$
- * Copyright (c) 2001-2014 Ravenbrook Limited. See end of file for license.
+ * Copyright (c) 2001-2018 Ravenbrook Limited. See end of file for license.
*/
@@ -110,7 +110,7 @@ typedef union PageUnion { /* page structure */
#define PagePool(page) RVALUE((page)->pool.pool)
#define PageIsAllocated(page) RVALUE(PagePool(page) != NULL)
#define PageState(page) RVALUE((page)->pool.state)
-#define PageSpareRing(page) RVALUE(&(page)->spare.spareRing)
+#define PageSpareRing(page) (&(page)->spare.spareRing)
#define PageOfSpareRing(node) PARENT(PageUnion, spare, RING_ELT(PageSpare, spareRing, node))
#define PageSetPool(page, _pool) \
@@ -259,7 +259,7 @@ extern void PageFree(Chunk chunk, Index pi);
/* C. COPYRIGHT AND LICENSE
*
- * Copyright (C) 2001-2014 Ravenbrook Limited .
+ * Copyright (C) 2001-2018 Ravenbrook Limited .
* All rights reserved. This is an open source license. Contact
* Ravenbrook for commercial licensing options.
*