Private symbols _mps_sac_s and _mps_sac_freelist_block_s now start with underscores, as per external interface policy.

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

3 files changed, 8 insertions, 8 deletions

diff --git a/mps/code/mps.h b/mps/code/mps.h
index e47a4ca8e34..d4422c85f47 100644
--- a/mps/code/mps.h
+++ b/mps/code/mps.h
@@ -142,22 +142,22 @@ typedef struct mps_ap_s {       /* allocation point descriptor */
 /* Segregated-fit Allocation Caches */
 /* .sac: Keep in sync with <code/sac.h>. */
 
-typedef struct mps_sac_s *mps_sac_t;
+typedef struct _mps_sac_s *mps_sac_t;
 
 #define MPS_SAC_CLASS_LIMIT ((size_t)8)
 
-typedef struct mps_sac_freelist_block_s {
+typedef struct _mps_sac_freelist_block_s {
   size_t _size;
   size_t _count;
   size_t _count_max;
   mps_addr_t _blocks;
-} mps_sac_freelist_block_s;
+} _mps_sac_freelist_block_s;
 
-typedef struct mps_sac_s {
+typedef struct _mps_sac_s {
   size_t _middle;
   mps_bool_t _trapped;
-  mps_sac_freelist_block_s _freelists[2 * MPS_SAC_CLASS_LIMIT];
-} mps_sac_s;
+  _mps_sac_freelist_block_s _freelists[2 * MPS_SAC_CLASS_LIMIT];
+} _mps_sac_s;
 
 /* .sacc: Keep in sync with <code/sac.h>. */
 typedef struct mps_sac_class_s {
diff --git a/mps/code/sac.c b/mps/code/sac.c
index 3b82cd846d8..2a87f9a2810 100644
--- a/mps/code/sac.c
+++ b/mps/code/sac.c
@@ -10,7 +10,7 @@
 SRCID(sac, "$Id$");
 
 
-typedef mps_sac_freelist_block_s *SACFreeListBlock;
+typedef _mps_sac_freelist_block_s *SACFreeListBlock;
 
 
 /* SACCheck -- check function for SACs */
diff --git a/mps/code/sac.h b/mps/code/sac.h
index 78e676125d1..bd52a35daff 100644
--- a/mps/code/sac.h
+++ b/mps/code/sac.h
@@ -25,7 +25,7 @@ typedef struct SACStruct {
   Pool pool;
   Count classesCount;  /* number of classes */
   Index middleIndex;   /* index of the middle */
-  mps_sac_s esac_s;     /* variable length, must be last */
+  _mps_sac_s esac_s;   /* variable length, must be last */
 } SACStruct;
 
 #define SACOfExternalSAC(esac) PARENT(SACStruct, esac_s, esac)