aboutsummaryrefslogtreecommitdiffstats
path: root/mps/code
diff options
context:
space:
mode:
authorRichard Brooksby2013-05-16 03:12:11 +0100
committerRichard Brooksby2013-05-16 03:12:11 +0100
commitbb02f55b62ea785cb64bc60bebca8721dd52d886 (patch)
tree82f07496859de3ab616ddb271a720aab4abfaee0 /mps/code
parent8acbc5780bb54ade61a95de766bb112a4a694894 (diff)
downloademacs-bb02f55b62ea785cb64bc60bebca8721dd52d886.tar.gz
emacs-bb02f55b62ea785cb64bc60bebca8721dd52d886.zip
Making clear the size of the array of args passed to varargs conversion methods.
Copied from Perforce Change: 181845 ServerID: perforce.ravenbrook.com
Diffstat (limited to 'mps/code')
-rw-r--r--mps/code/arena.c2
-rw-r--r--mps/code/arenacl.c2
-rw-r--r--mps/code/arenavm.c2
-rw-r--r--mps/code/buffer.c4
-rw-r--r--mps/code/mpm.h2
-rw-r--r--mps/code/poolabs.c2
-rw-r--r--mps/code/poolamc.c2
-rw-r--r--mps/code/poolams.c4
-rw-r--r--mps/code/poolawl.c2
-rw-r--r--mps/code/poollo.c2
-rw-r--r--mps/code/poolmfs.c2
-rw-r--r--mps/code/poolmv.c4
-rw-r--r--mps/code/poolmv2.c4
-rw-r--r--mps/code/poolmvff.c4
14 files changed, 19 insertions, 19 deletions
diff --git a/mps/code/arena.c b/mps/code/arena.c
index 8b8a0ccab13..189503b348e 100644
--- a/mps/code/arena.c
+++ b/mps/code/arena.c
@@ -48,7 +48,7 @@ static Res ArenaTrivDescribe(Arena arena, mps_lib_FILE *stream)
48 48
49/* ArenaTrivVarargs -- ignore obsolete varargs for future arena classes */ 49/* ArenaTrivVarargs -- ignore obsolete varargs for future arena classes */
50 50
51static void ArenaTrivVarargs(ArgStruct args[], va_list varargs) 51static void ArenaTrivVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
52{ 52{
53 UNUSED(varargs); 53 UNUSED(varargs);
54 args[0].key = MPS_KEY_ARGS_END; 54 args[0].key = MPS_KEY_ARGS_END;
diff --git a/mps/code/arenacl.c b/mps/code/arenacl.c
index a9af0c4d7bc..57918755b77 100644
--- a/mps/code/arenacl.c
+++ b/mps/code/arenacl.c
@@ -181,7 +181,7 @@ static void ClientChunkFinish(Chunk chunk)
181 181
182/* ClientArenaVarargs -- parse obsolete varargs */ 182/* ClientArenaVarargs -- parse obsolete varargs */
183 183
184static void ClientArenaVarargs(ArgStruct args[], va_list varargs) 184static void ClientArenaVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
185{ 185{
186 args[0].key = MPS_KEY_ARENA_SIZE; 186 args[0].key = MPS_KEY_ARENA_SIZE;
187 args[0].val.size = va_arg(varargs, Size); 187 args[0].val.size = va_arg(varargs, Size);
diff --git a/mps/code/arenavm.c b/mps/code/arenavm.c
index 6e3256ae61a..f05ce46117b 100644
--- a/mps/code/arenavm.c
+++ b/mps/code/arenavm.c
@@ -446,7 +446,7 @@ static void VMChunkFinish(Chunk chunk)
446 446
447/* VMArenaVarargs -- parse obsolete varargs */ 447/* VMArenaVarargs -- parse obsolete varargs */
448 448
449static void VMArenaVarargs(ArgStruct args[], va_list varargs) 449static void VMArenaVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
450{ 450{
451 args[0].key = MPS_KEY_ARENA_SIZE; 451 args[0].key = MPS_KEY_ARENA_SIZE;
452 args[0].val.size = va_arg(varargs, Size); 452 args[0].val.size = va_arg(varargs, Size);
diff --git a/mps/code/buffer.c b/mps/code/buffer.c
index 434635c9d3a..d9af5933fcd 100644
--- a/mps/code/buffer.c
+++ b/mps/code/buffer.c
@@ -1066,7 +1066,7 @@ void BufferRampReset(Buffer buffer)
1066 1066
1067/* bufferTrivVarargs -- basic buffer varargs method */ 1067/* bufferTrivVarargs -- basic buffer varargs method */
1068 1068
1069static void bufferTrivVarargs(ArgStruct args[], va_list varargs) { 1069static void bufferTrivVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs) {
1070 UNUSED(varargs); 1070 UNUSED(varargs);
1071 args[0].key = MPS_KEY_ARGS_END; 1071 args[0].key = MPS_KEY_ARGS_END;
1072 AVER(ArgListCheck(args)); 1072 AVER(ArgListCheck(args));
@@ -1486,7 +1486,7 @@ DEFINE_CLASS(SegBufClass, class)
1486 1486
1487/* rankBufVarargs -- parse obsolete varargs into keywords */ 1487/* rankBufVarargs -- parse obsolete varargs into keywords */
1488 1488
1489static void rankBufVarargs(ArgStruct args[], va_list varargs) 1489static void rankBufVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
1490{ 1490{
1491 args[0].key = MPS_KEY_RANK; 1491 args[0].key = MPS_KEY_RANK;
1492 args[0].val.rank = va_arg(varargs, Rank); 1492 args[0].val.rank = va_arg(varargs, Rank);
diff --git a/mps/code/mpm.h b/mps/code/mpm.h
index 5e3984a8b0c..ced8ec3e4f6 100644
--- a/mps/code/mpm.h
+++ b/mps/code/mpm.h
@@ -219,7 +219,7 @@ extern void PoolTraceEnd(Pool pool, Trace trace);
219extern void PoolWalk(Pool pool, Seg seg, FormattedObjectsStepMethod f, 219extern void PoolWalk(Pool pool, Seg seg, FormattedObjectsStepMethod f,
220 void *v, size_t s); 220 void *v, size_t s);
221extern void PoolFreeWalk(Pool pool, FreeBlockStepMethod f, void *p); 221extern void PoolFreeWalk(Pool pool, FreeBlockStepMethod f, void *p);
222extern void PoolTrivVarargs(ArgStruct args[], va_list varargs); 222extern void PoolTrivVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs);
223extern Res PoolTrivInit(Pool pool, ArgList arg); 223extern Res PoolTrivInit(Pool pool, ArgList arg);
224extern void PoolTrivFinish(Pool pool); 224extern void PoolTrivFinish(Pool pool);
225extern Res PoolNoAlloc(Addr *pReturn, Pool pool, Size size, 225extern Res PoolNoAlloc(Addr *pReturn, Pool pool, Size size,
diff --git a/mps/code/poolabs.c b/mps/code/poolabs.c
index 6fc0e279cb8..c29f409ae9b 100644
--- a/mps/code/poolabs.c
+++ b/mps/code/poolabs.c
@@ -195,7 +195,7 @@ void PoolTrivFinish(Pool pool)
195 NOOP; 195 NOOP;
196} 196}
197 197
198void PoolTrivVarargs(ArgStruct args[], va_list varargs) 198void PoolTrivVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
199{ 199{
200 UNUSED(varargs); 200 UNUSED(varargs);
201 args[0].key = MPS_KEY_ARGS_END; 201 args[0].key = MPS_KEY_ARGS_END;
diff --git a/mps/code/poolamc.c b/mps/code/poolamc.c
index 874b01b2b5d..09f39903437 100644
--- a/mps/code/poolamc.c
+++ b/mps/code/poolamc.c
@@ -937,7 +937,7 @@ static Bool amcNailRangeIsMarked(Seg seg, Addr base, Addr limit)
937 937
938/* amcVarargs -- decode obsolete varargs */ 938/* amcVarargs -- decode obsolete varargs */
939 939
940static void AMCVarargs(ArgStruct args[], va_list varargs) 940static void AMCVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
941{ 941{
942 args[0].key = MPS_KEY_FORMAT; 942 args[0].key = MPS_KEY_FORMAT;
943 args[0].val.format = va_arg(varargs, Format); 943 args[0].val.format = va_arg(varargs, Format);
diff --git a/mps/code/poolams.c b/mps/code/poolams.c
index b871bd98b68..ae7778562bb 100644
--- a/mps/code/poolams.c
+++ b/mps/code/poolams.c
@@ -730,7 +730,7 @@ static void AMSSegsDestroy(AMS ams)
730 730
731/* AMSVarargs -- decode obsolete varargs */ 731/* AMSVarargs -- decode obsolete varargs */
732 732
733static void AMSVarargs(ArgStruct args[], va_list varargs) 733static void AMSVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
734{ 734{
735 args[0].key = MPS_KEY_FORMAT; 735 args[0].key = MPS_KEY_FORMAT;
736 args[0].val.format = va_arg(varargs, Format); 736 args[0].val.format = va_arg(varargs, Format);
@@ -742,7 +742,7 @@ static void AMSVarargs(ArgStruct args[], va_list varargs)
742 AVER(ArgListCheck(args)); 742 AVER(ArgListCheck(args));
743} 743}
744 744
745static void AMSDebugVarargs(ArgStruct args[], va_list varargs) 745static void AMSDebugVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
746{ 746{
747 args[0].key = MPS_KEY_POOL_DEBUG_OPTIONS; 747 args[0].key = MPS_KEY_POOL_DEBUG_OPTIONS;
748 args[0].val.pool_debug_options = va_arg(varargs, mps_pool_debug_option_s *); 748 args[0].val.pool_debug_options = va_arg(varargs, mps_pool_debug_option_s *);
diff --git a/mps/code/poolawl.c b/mps/code/poolawl.c
index e77256ee236..42a47ea501a 100644
--- a/mps/code/poolawl.c
+++ b/mps/code/poolawl.c
@@ -521,7 +521,7 @@ static Bool AWLSegAlloc(Addr *baseReturn, Addr *limitReturn,
521 521
522/* AWLVarargs -- decode obsolete varargs */ 522/* AWLVarargs -- decode obsolete varargs */
523 523
524static void AWLVarargs(ArgStruct args[], va_list varargs) 524static void AWLVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
525{ 525{
526 args[0].key = MPS_KEY_FORMAT; 526 args[0].key = MPS_KEY_FORMAT;
527 args[0].val.format = va_arg(varargs, Format); 527 args[0].val.format = va_arg(varargs, Format);
diff --git a/mps/code/poollo.c b/mps/code/poollo.c
index d59bc1995b8..3f9994954ca 100644
--- a/mps/code/poollo.c
+++ b/mps/code/poollo.c
@@ -469,7 +469,7 @@ static void LOWalk(Pool pool, Seg seg,
469 469
470/* LOVarargs -- decode obsolete varargs */ 470/* LOVarargs -- decode obsolete varargs */
471 471
472static void LOVarargs(ArgStruct args[], va_list varargs) 472static void LOVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
473{ 473{
474 args[0].key = MPS_KEY_FORMAT; 474 args[0].key = MPS_KEY_FORMAT;
475 args[0].val.format = va_arg(varargs, Format); 475 args[0].val.format = va_arg(varargs, Format);
diff --git a/mps/code/poolmfs.c b/mps/code/poolmfs.c
index 538be571934..b26bdc9d05c 100644
--- a/mps/code/poolmfs.c
+++ b/mps/code/poolmfs.c
@@ -79,7 +79,7 @@ Pool (MFSPool)(MFS mfs)
79 79
80/* MFSVarargs -- decode obsolete varargs */ 80/* MFSVarargs -- decode obsolete varargs */
81 81
82static void MFSVarargs(ArgStruct args[], va_list varargs) 82static void MFSVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
83{ 83{
84 args[0].key = MPS_KEY_EXTEND_BY; 84 args[0].key = MPS_KEY_EXTEND_BY;
85 args[0].val.size = va_arg(varargs, Size); 85 args[0].val.size = va_arg(varargs, Size);
diff --git a/mps/code/poolmv.c b/mps/code/poolmv.c
index 812d3099266..14cf2c12ce2 100644
--- a/mps/code/poolmv.c
+++ b/mps/code/poolmv.c
@@ -184,7 +184,7 @@ static Bool MVSpanCheck(MVSpan span)
184 184
185/* MVVarargs -- decode obsolete varargs */ 185/* MVVarargs -- decode obsolete varargs */
186 186
187static void MVVarargs(ArgStruct args[], va_list varargs) 187static void MVVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
188{ 188{
189 args[0].key = MPS_KEY_EXTEND_BY; 189 args[0].key = MPS_KEY_EXTEND_BY;
190 args[0].val.size = va_arg(varargs, Size); 190 args[0].val.size = va_arg(varargs, Size);
@@ -196,7 +196,7 @@ static void MVVarargs(ArgStruct args[], va_list varargs)
196 AVER(ArgListCheck(args)); 196 AVER(ArgListCheck(args));
197} 197}
198 198
199static void MVDebugVarargs(ArgStruct args[], va_list varargs) 199static void MVDebugVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
200{ 200{
201 args[0].key = MPS_KEY_POOL_DEBUG_OPTIONS; 201 args[0].key = MPS_KEY_POOL_DEBUG_OPTIONS;
202 args[0].val.pool_debug_options = va_arg(varargs, mps_pool_debug_option_s *); 202 args[0].val.pool_debug_options = va_arg(varargs, mps_pool_debug_option_s *);
diff --git a/mps/code/poolmv2.c b/mps/code/poolmv2.c
index 92b6708dec2..3ed4c65a9af 100644
--- a/mps/code/poolmv2.c
+++ b/mps/code/poolmv2.c
@@ -27,7 +27,7 @@ SRCID(poolmv2, "$Id$");
27/* Private prototypes */ 27/* Private prototypes */
28 28
29typedef struct MVTStruct *MVT; 29typedef struct MVTStruct *MVT;
30static void MVTVarargs(ArgStruct args[], va_list varargs); 30static void MVTVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs);
31static Res MVTInit(Pool pool, ArgList arg); 31static Res MVTInit(Pool pool, ArgList arg);
32static Bool MVTCheck(MVT mvt); 32static Bool MVTCheck(MVT mvt);
33static void MVTFinish(Pool pool); 33static void MVTFinish(Pool pool);
@@ -193,7 +193,7 @@ static SegPref MVTSegPref(MVT mvt)
193 193
194/* MVTVarargs -- decode obsolete varargs */ 194/* MVTVarargs -- decode obsolete varargs */
195 195
196static void MVTVarargs(ArgStruct args[], va_list varargs) 196static void MVTVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
197{ 197{
198 args[0].key = MPS_KEY_MIN_SIZE; 198 args[0].key = MPS_KEY_MIN_SIZE;
199 args[0].val.size = va_arg(varargs, Size); 199 args[0].val.size = va_arg(varargs, Size);
diff --git a/mps/code/poolmvff.c b/mps/code/poolmvff.c
index 4d3044aae86..02823df0e04 100644
--- a/mps/code/poolmvff.c
+++ b/mps/code/poolmvff.c
@@ -409,7 +409,7 @@ static void MVFFBufferEmpty(Pool pool, Buffer buffer,
409 409
410/* MVFFVarargs -- decode obsolete varargs */ 410/* MVFFVarargs -- decode obsolete varargs */
411 411
412static void MVFFVarargs(ArgStruct args[], va_list varargs) 412static void MVFFVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
413{ 413{
414 args[0].key = MPS_KEY_EXTEND_BY; 414 args[0].key = MPS_KEY_EXTEND_BY;
415 args[0].val.size = va_arg(varargs, Size); 415 args[0].val.size = va_arg(varargs, Size);
@@ -427,7 +427,7 @@ static void MVFFVarargs(ArgStruct args[], va_list varargs)
427 AVER(ArgListCheck(args)); 427 AVER(ArgListCheck(args));
428} 428}
429 429
430static void MVFFDebugVarargs(ArgStruct args[], va_list varargs) 430static void MVFFDebugVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs)
431{ 431{
432 args[0].key = MPS_KEY_POOL_DEBUG_OPTIONS; 432 args[0].key = MPS_KEY_POOL_DEBUG_OPTIONS;
433 args[0].val.pool_debug_options = va_arg(varargs, mps_pool_debug_option_s *); 433 args[0].val.pool_debug_options = va_arg(varargs, mps_pool_debug_option_s *);