From: Adam Dickmeiss <adam@indexdata.dk>
Date: Mon, 6 Feb 1995 13:48:10 +0000 (+0000)
Subject: First version of the FML interpreter. It's slow and memory isn't
X-Git-Tag: FML0
X-Git-Url: http://sru.miketaylor.org.uk/cgi-bin?a=commitdiff_plain;h=779719b37d33b06ccd7673c441cf853fe03aa56a;p=egate.git

First version of the FML interpreter. It's slow and memory isn't
freed properly. In particular, the FML nodes aren't released yet.
---

diff --git a/fml/Makefile b/fml/Makefile
index 519ef31..0a7b788 100644
--- a/fml/Makefile
+++ b/fml/Makefile
@@ -1,6 +1,6 @@
 # FML interpreter. Europagate, 1995
 #
-# $Id: Makefile,v 1.1 1995/02/06 13:48:09 adam Exp $
+# $Id: Makefile,v 1.1.1.1 1995/02/06 13:48:10 adam Exp $
 
 SHELL=/bin/sh
 INCLUDE=-I../include
diff --git a/fml/fml.c b/fml/fml.c
index 445e8ce..7004816 100644
--- a/fml/fml.c
+++ b/fml/fml.c
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fml.c,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 #include <assert.h>
diff --git a/fml/fml.h b/fml/fml.h
index c65e428..25d6606 100644
--- a/fml/fml.h
+++ b/fml/fml.h
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fml.h,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 
diff --git a/fml/fmlmem.c b/fml/fmlmem.c
index 4bc4c56..b43532a 100644
--- a/fml/fmlmem.c
+++ b/fml/fmlmem.c
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fmlmem.c,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 #include <stdio.h>
diff --git a/fml/fmlp.h b/fml/fmlp.h
index 5b0aa34..f48660d 100644
--- a/fml/fmlp.h
+++ b/fml/fmlp.h
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fmlp.h,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 
diff --git a/fml/fmlsym.c b/fml/fmlsym.c
index b9a8390..8593376 100644
--- a/fml/fmlsym.c
+++ b/fml/fmlsym.c
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fmlsym.c,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 #include <stdio.h>
diff --git a/fml/fmltest.c b/fml/fmltest.c
index 24158d3..dfaea01 100644
--- a/fml/fmltest.c
+++ b/fml/fmltest.c
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fmltest.c,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 
diff --git a/fml/fmltoken.c b/fml/fmltoken.c
index 3e7793a..a6e2325 100644
--- a/fml/fmltoken.c
+++ b/fml/fmltoken.c
@@ -2,8 +2,9 @@
  * FML interpreter. Europagate, 1995
  *
  * $Log: fmltoken.c,v $
- * Revision 1.1  1995/02/06 13:48:09  adam
- * Initial revision
+ * Revision 1.1.1.1  1995/02/06 13:48:10  adam
+ * First version of the FML interpreter. It's slow and memory isn't
+ * freed properly. In particular, the FML nodes aren't released yet.
  *
  */
 #include <string.h>
diff --git a/fml/power.fml b/fml/power.fml
index 2ed92d1..ef38aee 100644
--- a/fml/power.fml
+++ b/fml/power.fml
@@ -1,6 +1,6 @@
 # FML power and multiplication.
 #
-# $Id: power.fml,v 1.1 1995/02/06 13:48:09 adam Exp $
+# $Id: power.fml,v 1.1.1.1 1995/02/06 13:48:10 adam Exp $
 
 \bin Mult a b {
 	\set val 0
diff --git a/fml/tempo.fml b/fml/tempo.fml
index a323912..7e71977 100644
--- a/fml/tempo.fml
+++ b/fml/tempo.fml
@@ -1,6 +1,6 @@
 # FML tempo test
 #
-# $Id: tempo.fml,v 1.1 1995/02/06 13:48:09 adam Exp $
+# $Id: tempo.fml,v 1.1.1.1 1995/02/06 13:48:10 adam Exp $
 \set x 1 
 \set max 10000 
 \while {\x \lt 10000} {\set x {\x \plus 1}}