fml/fmlcall.c

   1 /*
   2  * FML interpreter. Europagate, 1995
   3  *
   4  * $Log: fmlcall.c,v $
   5  * Revision 1.3  1995/02/23 08:32:04  adam
   6  * Changed header.
   7  *
   8  * Revision 1.1  1995/02/09  16:06:07  adam
   9  * FML can be called from the outside multiple times by the functions:
  10  * fml_exec_call and fml_exec_call_str.
  11  * An interactive parameter (-i) to fmltest starts a shell-like
  12  * interface to FML by using the fml_exec_call_str function.
  13  *
  14  */
  15 #include <assert.h>
  16 #include <stdlib.h>
  17 #include <stdio.h>
  18
  19 #include "fmlp.h"
  20
  21 void fml_exec_call (Fml fml)
  22 {
  23     struct fml_node *fn;
  24
  25     fml_node_stat (fml);
  26     fn = fml_tokenize (fml);
  27
  28     fml_exec_group (fn, fml);
  29     fml_node_delete (fml, fn);
  30 }
  31