* FML interpreter. Europagate, 1995
*
* $Log: fmlp.h,v $
- * Revision 1.8 1995/02/10 18:15:52 adam
+ * Revision 1.11 1995/02/27 09:01:21 adam
+ * Regular expression support. Argument passing by name option. New FML
+ * function strlen.
+ *
+ * Revision 1.10 1995/02/23 08:32:06 adam
+ * Changed header.
+ *
+ * Revision 1.8 1995/02/10 18:15:52 adam
* FML function 'strcmp' implemented. This function can be used to
* test for existence of MARC fields.
*
struct fml_node *fml_node_alloc (Fml fml);
struct fml_atom *fml_atom_alloc (Fml fml, char *str);
int fml_atom_str (struct fml_atom *a, char *str);
+int fml_atom_len (struct fml_atom *a);
void fml_atom_strx (struct fml_atom *a, char *str, int max);
int fml_atom_val (struct fml_atom *a);
void fml_node_delete (Fml fml, struct fml_node *fn);
#define FML_CPREFIX 11
#define FML_BINARY 12
#define FML_BIN 13
+#define FML_CODE 14
void fml_rel_init (Fml fml);
void fml_arit_init (Fml fml);
void fml_lr_values (Fml fml, struct fml_node *l, int *left_val,
struct fml_node *r, int *right_val);
void fml_cmd_lex (struct fml_node **np, struct token *tp);
+void fml_cmd_lex_s (struct fml_node **np, struct token *tp, int esc_stop);
void fml_init_token (struct token *tp, Fml fml);
void fml_del_token (struct token *tp, Fml fml);
struct fml_node *fml_expr_term (Fml fml, struct fml_node **lp,