rts.h

一个编译器修改的例子

#ifndef RTS_H
#define RTS_H

#include "bool.h"
#include <stdlib.h>

/* This is part of the runtime system. It is linked with the C code
 * the compiler produces when compiling Asterix source. It is not part
 * of the compiler itself.
 */

typedef struct
{
    int	size;		/* Koen: experience tells *never* to use unsigneds */
    union {
      char	c[1];
      int	i[1];
      double	d[1];
      Bool	b[1];
    } 		data;	/* excess data behind this struct */
}
*array;

extern struct strings
{
    array	a;
    const int   s;
    const char	*c;
}
strings [];


void	runtime_error(const char *msg);

array	new_array(int size, size_t element_size);
void	delete_array(array);
void	*array_index(array, size_t element_size, int index);
int	array_size(array);


#endif /* defined RTS_H */