2 * FML interpreter. Europagate, 1995
5 * Revision 1.3 1995/02/10 15:50:55 adam
6 * MARC interface implemented. Minor bugs fixed. fmltest can
7 * be used to format single MARC records. New function '\list'
10 * Revision 1.2 1995/02/09 16:06:06 adam
11 * FML can be called from the outside multiple times by the functions:
12 * fml_exec_call and fml_exec_call_str.
13 * An interactive parameter (-i) to fmltest starts a shell-like
14 * interface to FML by using the fml_exec_call_str function.
16 * Revision 1.1.1.1 1995/02/06 13:48:10 adam
17 * First version of the FML interpreter. It's slow and memory isn't
18 * freed properly. In particular, the FML nodes aren't released yet.
24 typedef struct Fml_record {
25 struct fml_node *list;
26 struct fml_sym_tab *sym_tab;
28 struct fml_atom *atom_free_list;
29 struct fml_node *node_free_list;
35 int (*read_func)(void);
36 void (*err_handle)(int no);
42 int fml_preprocess (Fml fml);
44 void fml_exec (Fml fml);
45 void fml_exec_call (Fml fml);
46 void fml_exec_call_str (Fml fml, const char *str);
47 void fml_exec_call_argv (Fml fml, const char **argv);
49 #define FML_ERR_NOMEM 1