/* "@(#)varargs.h	5.1	6/6/86" */

typedef char *va_list;
# define va_dcl int va_alist;
# define va_start(list) list = (char *) &va_alist
# define va_end(list)
#ifdef ridge
#define va_szm(mode) ((sizeof(mode)<=sizeof(double))?sizeof(double):(((sizeof(mode)+sizeof(double)-1)/sizeof(double))*sizeof(double)))
#define va_arg(list, mode) (*(mode *)((list+=va_szm(mode))-(va_szm(mode)-((sizeof(mode)<sizeof(int))?4-sizeof(mode):0))))
#else
# define va_arg(list,mode) ((mode *)(list += sizeof(mode)))[-1]
#endif
