2023-02-13 08:45:50 -05:00
|
|
|
/* $Revision: 1.18 $
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <assert.h>
|
|
|
|
#include <limits.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <ctype.h>
|
|
|
|
#include <time.h>
|
|
|
|
#include <math.h>
|
|
|
|
|
|
|
|
|
2023-02-15 07:36:40 -05:00
|
|
|
#include <elk/scheme.h>
|
2023-02-13 08:45:50 -05:00
|
|
|
|
|
|
|
|
|
|
|
/* Used for passing a `char' to a function that takes an `int' argument,
|
|
|
|
* such as isspace(). Maybe I should have used `unsigned char' rather
|
|
|
|
* than `char' in the first place...
|
|
|
|
*/
|
|
|
|
#define UCHAR(c) ((unsigned char)(c))
|
|
|
|
|
|
|
|
|
|
|
|
#include "config.h"
|
|
|
|
#include "args.h"
|
|
|
|
#include "buffer.h"
|
|
|
|
#include "table.h"
|
|
|
|
#include "error.h"
|
|
|
|
#include "event.h"
|
|
|
|
#include "expr.h"
|
|
|
|
#include "gcroot.h"
|
|
|
|
#include "insert.h"
|
|
|
|
#include "malloc.h"
|
|
|
|
#include "parse.h"
|
|
|
|
#include "prim.h"
|
|
|
|
#include "scmtable.h"
|
|
|
|
#include "stream.h"
|
|
|
|
#include "subst.h"
|
2023-02-15 12:37:37 -05:00
|
|
|
|
|
|
|
const char *get_version_string(void);
|