diff options
Diffstat (limited to 'mps/code/arena.c')
| -rw-r--r-- | mps/code/arena.c | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/mps/code/arena.c b/mps/code/arena.c index 189503b348e..a77a72f590c 100644 --- a/mps/code/arena.c +++ b/mps/code/arena.c | |||
| @@ -46,16 +46,6 @@ static Res ArenaTrivDescribe(Arena arena, mps_lib_FILE *stream) | |||
| 46 | } | 46 | } |
| 47 | 47 | ||
| 48 | 48 | ||
| 49 | /* ArenaTrivVarargs -- ignore obsolete varargs for future arena classes */ | ||
| 50 | |||
| 51 | static void ArenaTrivVarargs(ArgStruct args[MPS_ARGS_MAX], va_list varargs) | ||
| 52 | { | ||
| 53 | UNUSED(varargs); | ||
| 54 | args[0].key = MPS_KEY_ARGS_END; | ||
| 55 | AVER(ArgListCheck(args)); | ||
| 56 | } | ||
| 57 | |||
| 58 | |||
| 59 | /* AbstractArenaClass -- The abstract arena class definition | 49 | /* AbstractArenaClass -- The abstract arena class definition |
| 60 | * | 50 | * |
| 61 | * .null: Most abstract class methods are set to NULL. See | 51 | * .null: Most abstract class methods are set to NULL. See |
| @@ -69,7 +59,7 @@ DEFINE_CLASS(AbstractArenaClass, class) | |||
| 69 | class->name = "ABSARENA"; | 59 | class->name = "ABSARENA"; |
| 70 | class->size = 0; | 60 | class->size = 0; |
| 71 | class->offset = 0; | 61 | class->offset = 0; |
| 72 | class->varargs = ArenaTrivVarargs; | 62 | class->varargs = ArgTrivVarargs; |
| 73 | class->init = NULL; | 63 | class->init = NULL; |
| 74 | class->finish = NULL; | 64 | class->finish = NULL; |
| 75 | class->reserved = NULL; | 65 | class->reserved = NULL; |