Minor changes.

[egate.git] / fml / fml.c

diff --git a/fml/fml.c b/fml/fml.c
index 371d2b4..74caaee 100644 (file)
--- a/fml/fml.c
+++ b/fml/fml.c
@@ -2,7 +2,10 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fml.c,v $
- * Revision 1.8  1995/02/10 18:15:52  adam
+ * Revision 1.9  1995/02/21 14:00:03  adam
+ * Minor changes.
+ *
+ * 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.
  *
@@ -532,7 +535,6 @@ static struct fml_node *fml_sub0 (Fml fml, struct fml_node *list)
     if (!list)
         return NULL;
     fml_init_token (&token, fml);
-    assert (list);
     fml_cmd_lex (&list, &token);
     fn1 = fn = fml_sub1 (fml, &list, &token);
     if (fn->p[1] && token.kind != '\0')