#pragma force_top_level
#pragma include_only_once

/*
 * Copyright (c) 1989 Acorn Computers Ltd., Cambridge, England
 */

typedef char *va_list;
#define  va_dcl            int va_alist;
#define  va_start(list)    list = (char *) &va_alist
#define  va_end(list)
#define  va_arg(list,mode) ((mode *)(list += sizeof(mode)))[-1]
