X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=fml%2Ffmlp.h;h=9a4244e0ef1ece308b05705f1cbf7d8e54bce35e;hb=372b7a22555387ae193ed303132342e654319420;hp=3c7015e266ba471b93928a42ee11af58111f2c30;hpb=5bc115d3b598f5ad198411dcd033a91a8356c9be;p=egate.git

diff --git a/fml/fmlp.h b/fml/fmlp.h
index 3c7015e..9a4244e 100644
--- a/fml/fmlp.h
+++ b/fml/fmlp.h
@@ -2,7 +2,12 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fmlp.h,v $
- * Revision 1.6  1995/02/09 16:06:07  adam
+ * Revision 1.7  1995/02/10 15:50:56  adam
+ * MARC interface implemented. Minor bugs fixed. fmltest can
+ * be used to format single MARC records. New function '\list'
+ * implemented.
+ *
+ * Revision 1.6  1995/02/09  16:06:07  adam
  * FML can be called from the outside multiple times by the functions:
  * fml_exec_call and fml_exec_call_str.
  * An interactive parameter (-i) to fmltest starts a shell-like
@@ -29,7 +34,10 @@
  *
  */
 
-#include "fml.h"
+#include <fml.h>
+
+#ifndef FMLP_H
+#define FMLP_H
 
 #define FML_MAX_TOKEN 2048
 
@@ -119,3 +127,4 @@ void fml_del_token (struct token *tp, Fml fml);
 struct fml_node *fml_expr_term (Fml fml, struct fml_node **lp, 
                                 struct token *tp);
 struct fml_node *fml_exec_group (struct fml_node *list, Fml fml);
+#endif