aboutsummaryrefslogtreecommitdiffstats
path: root/mps/code
diff options
context:
space:
mode:
Diffstat (limited to 'mps/code')
-rw-r--r--mps/code/amcss.c4
-rw-r--r--mps/code/amcsshe.c2
-rw-r--r--mps/code/amcssth.c2
-rw-r--r--mps/code/amsss.c2
-rw-r--r--mps/code/amssshe.c3
-rw-r--r--mps/code/exposet0.c2
-rw-r--r--mps/code/mpsicv.c9
-rw-r--r--mps/code/segsmss.c3
-rw-r--r--mps/code/steptest.c3
-rw-r--r--mps/code/walkt0.c2
10 files changed, 13 insertions, 19 deletions
diff --git a/mps/code/amcss.c b/mps/code/amcss.c
index 279b33ce407..277ffca434a 100644
--- a/mps/code/amcss.c
+++ b/mps/code/amcss.c
@@ -38,9 +38,7 @@ static mps_gen_param_s testChain[genCOUNT] = {
38 38
39 39
40/* objNULL needs to be odd so that it's ignored in exactRoots. */ 40/* objNULL needs to be odd so that it's ignored in exactRoots. */
41/* @@@@ W3I6MV Temporary fix (ull) to prevent Microsoft C complaining. Need 41#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
42 to work out what to do about such cases. */
43#define objNULL ((mps_addr_t)0xDECEA5EDull)
44 42
45 43
46static mps_pool_t pool; 44static mps_pool_t pool;
diff --git a/mps/code/amcsshe.c b/mps/code/amcsshe.c
index edc76a16deb..646f6c4f90b 100644
--- a/mps/code/amcsshe.c
+++ b/mps/code/amcsshe.c
@@ -41,7 +41,7 @@ static mps_gen_param_s testChain[genCOUNT] = {
41 41
42 42
43/* objNULL needs to be odd so that it's ignored in exactRoots. */ 43/* objNULL needs to be odd so that it's ignored in exactRoots. */
44#define objNULL ((mps_addr_t)0xDECEA5ED) 44#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
45 45
46 46
47static mps_pool_t pool; 47static mps_pool_t pool;
diff --git a/mps/code/amcssth.c b/mps/code/amcssth.c
index e71849d72fa..08597be51a4 100644
--- a/mps/code/amcssth.c
+++ b/mps/code/amcssth.c
@@ -38,7 +38,7 @@ static mps_gen_param_s testChain[genCOUNT] = {
38 38
39 39
40/* objNULL needs to be odd so that it's ignored in exactRoots. */ 40/* objNULL needs to be odd so that it's ignored in exactRoots. */
41#define objNULL ((mps_addr_t)0xDECEA5ED) 41#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
42 42
43 43
44static mps_pool_t pool; 44static mps_pool_t pool;
diff --git a/mps/code/amsss.c b/mps/code/amsss.c
index 394107abe29..c561aa96ff1 100644
--- a/mps/code/amsss.c
+++ b/mps/code/amsss.c
@@ -31,7 +31,7 @@
31#define totalSizeSTEP 200 * (size_t)1024 31#define totalSizeSTEP 200 * (size_t)1024
32/* objNULL needs to be odd so that it's ignored in exactRoots. */ 32/* objNULL needs to be odd so that it's ignored in exactRoots. */
33/* @@@@ temporary fix W3I6MV */ 33/* @@@@ temporary fix W3I6MV */
34#define objNULL ((mps_addr_t)0xDECEA5EDull) 34#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
35#define testArenaSIZE ((size_t)16<<20) 35#define testArenaSIZE ((size_t)16<<20)
36#define initTestFREQ 3000 36#define initTestFREQ 3000
37#define splatTestFREQ 6000 37#define splatTestFREQ 6000
diff --git a/mps/code/amssshe.c b/mps/code/amssshe.c
index d80a83f7aaa..4e7c09c10f0 100644
--- a/mps/code/amssshe.c
+++ b/mps/code/amssshe.c
@@ -28,8 +28,7 @@
28#define totalSizeMAX 800 * (size_t)1024 28#define totalSizeMAX 800 * (size_t)1024
29#define totalSizeSTEP 200 * (size_t)1024 29#define totalSizeSTEP 200 * (size_t)1024
30/* objNULL needs to be odd so that it's ignored in exactRoots. */ 30/* objNULL needs to be odd so that it's ignored in exactRoots. */
31/* @@@@ Temporary fix for W3I6MV build ull */ 31#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
32#define objNULL ((mps_addr_t)0xDECEA5EDull)
33#define testArenaSIZE ((size_t)16<<20) 32#define testArenaSIZE ((size_t)16<<20)
34#define initTestFREQ 6000 33#define initTestFREQ 6000
35static mps_gen_param_s testChain[1] = { { 160, 0.90 } }; 34static mps_gen_param_s testChain[1] = { { 160, 0.90 } };
diff --git a/mps/code/exposet0.c b/mps/code/exposet0.c
index 009347ec8bd..c7000214d97 100644
--- a/mps/code/exposet0.c
+++ b/mps/code/exposet0.c
@@ -45,7 +45,7 @@ static mps_gen_param_s testChain[genCOUNT] = {
45 45
46 46
47/* objNULL needs to be odd so that it's ignored in exactRoots. */ 47/* objNULL needs to be odd so that it's ignored in exactRoots. */
48#define objNULL ((mps_addr_t)0xDECEA5ED) 48#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
49 49
50 50
51static mps_pool_t pool_g; 51static mps_pool_t pool_g;
diff --git a/mps/code/mpsicv.c b/mps/code/mpsicv.c
index 0d4fcf88361..4440d648333 100644
--- a/mps/code/mpsicv.c
+++ b/mps/code/mpsicv.c
@@ -29,8 +29,7 @@
29#define patternFREQ 100 29#define patternFREQ 100
30 30
31/* objNULL needs to be odd so that it's ignored in exactRoots. */ 31/* objNULL needs to be odd so that it's ignored in exactRoots. */
32/* @@@@ Temporary fix W3I6MV ull */ 32#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
33#define objNULL ((mps_addr_t)0xDECEA5EDull)
34#define FILLER_OBJECT_SIZE 1023 33#define FILLER_OBJECT_SIZE 1023
35 34
36#define genCOUNT 2 35#define genCOUNT 2
@@ -263,10 +262,10 @@ static void addr_pool_test(mps_arena_t arena,
263 mps_addr_t addr; 262 mps_addr_t addr;
264 /* DISTInguished values are to observe overwrites. */ 263 /* DISTInguished values are to observe overwrites. */
265 /* @@@@ Temporary fix W3I6MV ull */ 264 /* @@@@ Temporary fix W3I6MV ull */
266 mps_pool_t poolDistinguished = (mps_pool_t)0x000d1521ull; 265 mps_pool_t poolDistinguished = (mps_pool_t)MPS_WORD_CONST(0x000d1521);
267 mps_pool_t pool = poolDistinguished; 266 mps_pool_t pool = poolDistinguished;
268 /* @@@@ Temporary fix W3I6MV ull */ 267 /* @@@@ Temporary fix W3I6MV ull */
269 mps_fmt_t fmtDistinguished = (mps_fmt_t)0x000d1521ull; 268 mps_fmt_t fmtDistinguished = (mps_fmt_t)MPS_WORD_CONST(0x000d1521);
270 mps_fmt_t fmt = fmtDistinguished; 269 mps_fmt_t fmt = fmtDistinguished;
271 270
272 /* 0a -- obj1 in pool1 (unformatted) */ 271 /* 0a -- obj1 in pool1 (unformatted) */
@@ -441,7 +440,7 @@ static void *test(void *arg, size_t s)
441 die(mps_root_create_table_masked(&exactRoot, arena, 440 die(mps_root_create_table_masked(&exactRoot, arena,
442 MPS_RANK_EXACT, (mps_rm_t)0, 441 MPS_RANK_EXACT, (mps_rm_t)0,
443 &exactRoots[0], exactRootsCOUNT, 442 &exactRoots[0], exactRootsCOUNT,
444 (mps_word_t)1ull), 443 MPS_WORD_CONST(1)),
445 "root_create_table(exact)"); 444 "root_create_table(exact)");
446 die(mps_root_create_table(&ambigRoot, arena, 445 die(mps_root_create_table(&ambigRoot, arena,
447 MPS_RANK_AMBIG, (mps_rm_t)0, 446 MPS_RANK_AMBIG, (mps_rm_t)0,
diff --git a/mps/code/segsmss.c b/mps/code/segsmss.c
index c0b18af8f6f..75dffa5e772 100644
--- a/mps/code/segsmss.c
+++ b/mps/code/segsmss.c
@@ -714,8 +714,7 @@ static mps_class_t mps_class_amst(void)
714#define totalSizeMAX sizeScale * 800 * (size_t)1024 714#define totalSizeMAX sizeScale * 800 * (size_t)1024
715#define totalSizeSTEP 200 * (size_t)1024 715#define totalSizeSTEP 200 * (size_t)1024
716/* objNULL needs to be odd so that it's ignored in exactRoots. */ 716/* objNULL needs to be odd so that it's ignored in exactRoots. */
717/* @@@@ Temporary fix W3I6MV */ 717#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
718#define objNULL ((mps_addr_t)0xDECEA5EDDECEA5ED)
719#define testArenaSIZE ((size_t)16<<20) 718#define testArenaSIZE ((size_t)16<<20)
720#define initTestFREQ 6000 719#define initTestFREQ 6000
721#define stressTestFREQ 40 720#define stressTestFREQ 40
diff --git a/mps/code/steptest.c b/mps/code/steptest.c
index 0f357c511ea..b36d4c4fa5d 100644
--- a/mps/code/steptest.c
+++ b/mps/code/steptest.c
@@ -63,8 +63,7 @@ static int test_number = 0;
63 63
64 64
65/* objNULL needs to be odd so that it's ignored in exactRoots. */ 65/* objNULL needs to be odd so that it's ignored in exactRoots. */
66/* @@@@ Temporary fix W3I6MV */ 66#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
67#define objNULL ((mps_addr_t)0xDECEA5EDull)
68 67
69static mps_pool_t pool; 68static mps_pool_t pool;
70static mps_ap_t ap; 69static mps_ap_t ap;
diff --git a/mps/code/walkt0.c b/mps/code/walkt0.c
index 1764b3f9f10..4b2163d88ee 100644
--- a/mps/code/walkt0.c
+++ b/mps/code/walkt0.c
@@ -42,7 +42,7 @@ static mps_gen_param_s testChain[genCOUNT] = {
42}; 42};
43 43
44/* objNULL needs to be odd so that it's ignored in exactRoots. */ 44/* objNULL needs to be odd so that it's ignored in exactRoots. */
45#define objNULL ((mps_addr_t)0xDECEA5ED) 45#define objNULL ((mps_addr_t)MPS_WORD_CONST(0xDECEA5ED))
46 46
47static mps_ap_t ap; 47static mps_ap_t ap;
48static mps_addr_t exactRoots[exactRootsCOUNT]; 48static mps_addr_t exactRoots[exactRootsCOUNT];