15e9cd1aeSAssar Westerlund /*
25e9cd1aeSAssar Westerlund  * Copyright (c) 1998 - 2000 Kungliga Tekniska Högskolan
35e9cd1aeSAssar Westerlund  * (Royal Institute of Technology, Stockholm, Sweden).
45e9cd1aeSAssar Westerlund  * All rights reserved.
55e9cd1aeSAssar Westerlund  *
65e9cd1aeSAssar Westerlund  * Redistribution and use in source and binary forms, with or without
75e9cd1aeSAssar Westerlund  * modification, are permitted provided that the following conditions
85e9cd1aeSAssar Westerlund  * are met:
95e9cd1aeSAssar Westerlund  *
105e9cd1aeSAssar Westerlund  * 1. Redistributions of source code must retain the above copyright
115e9cd1aeSAssar Westerlund  *    notice, this list of conditions and the following disclaimer.
125e9cd1aeSAssar Westerlund  *
135e9cd1aeSAssar Westerlund  * 2. Redistributions in binary form must reproduce the above copyright
145e9cd1aeSAssar Westerlund  *    notice, this list of conditions and the following disclaimer in the
155e9cd1aeSAssar Westerlund  *    documentation and/or other materials provided with the distribution.
165e9cd1aeSAssar Westerlund  *
175e9cd1aeSAssar Westerlund  * 3. Neither the name of the Institute nor the names of its contributors
185e9cd1aeSAssar Westerlund  *    may be used to endorse or promote products derived from this software
195e9cd1aeSAssar Westerlund  *    without specific prior written permission.
205e9cd1aeSAssar Westerlund  *
215e9cd1aeSAssar Westerlund  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
225e9cd1aeSAssar Westerlund  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
235e9cd1aeSAssar Westerlund  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
245e9cd1aeSAssar Westerlund  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
255e9cd1aeSAssar Westerlund  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
265e9cd1aeSAssar Westerlund  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
275e9cd1aeSAssar Westerlund  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
285e9cd1aeSAssar Westerlund  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
295e9cd1aeSAssar Westerlund  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
305e9cd1aeSAssar Westerlund  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
315e9cd1aeSAssar Westerlund  * SUCH DAMAGE.
325e9cd1aeSAssar Westerlund  */
335e9cd1aeSAssar Westerlund 
34c19800e8SDoug Rabson /* $Id$ */
355e9cd1aeSAssar Westerlund 
365e9cd1aeSAssar Westerlund #ifndef __COMPILE_ET_H__
375e9cd1aeSAssar Westerlund #define __COMPILE_ET_H__
385e9cd1aeSAssar Westerlund 
395e9cd1aeSAssar Westerlund #include <config.h>
405e9cd1aeSAssar Westerlund 
415e9cd1aeSAssar Westerlund #include <err.h>
425e9cd1aeSAssar Westerlund #include <stdio.h>
43c19800e8SDoug Rabson #include <string.h>
445e9cd1aeSAssar Westerlund #include <stdlib.h>
455e9cd1aeSAssar Westerlund #include <stdarg.h>
465e9cd1aeSAssar Westerlund #include <ctype.h>
475e9cd1aeSAssar Westerlund #include <roken.h>
485e9cd1aeSAssar Westerlund 
495e9cd1aeSAssar Westerlund extern long base_id;
505e9cd1aeSAssar Westerlund extern int number;
51c19800e8SDoug Rabson extern char *prefix;
525e9cd1aeSAssar Westerlund extern char name[128];
535e9cd1aeSAssar Westerlund extern char *id_str;
545e9cd1aeSAssar Westerlund extern char *filename;
555e9cd1aeSAssar Westerlund extern int numerror;
565e9cd1aeSAssar Westerlund 
575e9cd1aeSAssar Westerlund struct error_code {
585e9cd1aeSAssar Westerlund     unsigned number;
595e9cd1aeSAssar Westerlund     char *name;
605e9cd1aeSAssar Westerlund     char *string;
615e9cd1aeSAssar Westerlund     struct error_code *next, **tail;
625e9cd1aeSAssar Westerlund };
635e9cd1aeSAssar Westerlund 
645e9cd1aeSAssar Westerlund extern struct error_code *codes;
655e9cd1aeSAssar Westerlund 
665e9cd1aeSAssar Westerlund #define APPEND(L, V) 				\
675e9cd1aeSAssar Westerlund do {						\
685e9cd1aeSAssar Westerlund     if((L) == NULL) {				\
695e9cd1aeSAssar Westerlund 	(L) = (V);				\
705e9cd1aeSAssar Westerlund 	(L)->tail = &(V)->next;			\
715e9cd1aeSAssar Westerlund 	(L)->next = NULL;			\
725e9cd1aeSAssar Westerlund     }else{					\
735e9cd1aeSAssar Westerlund 	*(L)->tail = (V);			\
745e9cd1aeSAssar Westerlund 	(L)->tail = &(V)->next;			\
755e9cd1aeSAssar Westerlund     }						\
765e9cd1aeSAssar Westerlund }while(0)
775e9cd1aeSAssar Westerlund 
785e9cd1aeSAssar Westerlund #endif /* __COMPILE_ET_H__ */
795e9cd1aeSAssar Westerlund