172445Sassar/* 2233294Sstas * Copyright (c) 1998 - 2000 Kungliga Tekniska H��gskolan 3233294Sstas * (Royal Institute of Technology, Stockholm, Sweden). 4233294Sstas * All rights reserved. 572445Sassar * 6233294Sstas * Redistribution and use in source and binary forms, with or without 7233294Sstas * modification, are permitted provided that the following conditions 8233294Sstas * are met: 972445Sassar * 10233294Sstas * 1. Redistributions of source code must retain the above copyright 11233294Sstas * notice, this list of conditions and the following disclaimer. 1272445Sassar * 13233294Sstas * 2. Redistributions in binary form must reproduce the above copyright 14233294Sstas * notice, this list of conditions and the following disclaimer in the 15233294Sstas * documentation and/or other materials provided with the distribution. 1672445Sassar * 17233294Sstas * 3. Neither the name of the Institute nor the names of its contributors 18233294Sstas * may be used to endorse or promote products derived from this software 19233294Sstas * without specific prior written permission. 2072445Sassar * 21233294Sstas * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 22233294Sstas * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23233294Sstas * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24233294Sstas * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 25233294Sstas * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26233294Sstas * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27233294Sstas * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28233294Sstas * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29233294Sstas * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30233294Sstas * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31233294Sstas * SUCH DAMAGE. 3272445Sassar */ 3372445Sassar 34233294Sstas/* $Id$ */ 3572445Sassar 3672445Sassar#ifndef __COMPILE_ET_H__ 3772445Sassar#define __COMPILE_ET_H__ 3872445Sassar 3972445Sassar#include <config.h> 4072445Sassar 41178825Sdfr#include <err.h> 4272445Sassar#include <stdio.h> 4372445Sassar#include <string.h> 4472445Sassar#include <stdlib.h> 4572445Sassar#include <stdarg.h> 4672445Sassar#include <ctype.h> 4772445Sassar#include <roken.h> 4872445Sassar 49178825Sdfrextern long base_id; 5072445Sassarextern int number; 5172445Sassarextern char *prefix; 5272445Sassarextern char name[128]; 5372445Sassarextern char *id_str; 5472445Sassarextern char *filename; 5572445Sassarextern int numerror; 5672445Sassar 5772445Sassarstruct error_code { 5872445Sassar unsigned number; 5972445Sassar char *name; 6072445Sassar char *string; 6172445Sassar struct error_code *next, **tail; 6272445Sassar}; 6372445Sassar 6472445Sassarextern struct error_code *codes; 6572445Sassar 6672445Sassar#define APPEND(L, V) \ 6772445Sassardo { \ 6872445Sassar if((L) == NULL) { \ 6972445Sassar (L) = (V); \ 7072445Sassar (L)->tail = &(V)->next; \ 7172445Sassar (L)->next = NULL; \ 7272445Sassar }else{ \ 7372445Sassar *(L)->tail = (V); \ 7472445Sassar (L)->tail = &(V)->next; \ 7572445Sassar } \ 7672445Sassar}while(0) 7772445Sassar 7872445Sassar#endif /* __COMPILE_ET_H__ */ 79