The \ character is no longer INCLUDED when terminating a token.

[egate.git] / fml / lists.fml

diff --git a/fml/lists.fml b/fml/lists.fml
new file mode 100644 (file)
index 0000000..346628a
--- /dev/null
+++ b/fml/lists.fml
@@ -0,0 +1,17 @@
+# FML list inspection
+#
+# $Id: lists.fml,v 1.1 1995/02/07 16:09:24 adam Exp $
+\set months {Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec}
+\set days   {31  28  31  30  31  30  31  31  30  31  30  31}
+\foreach m \months
+  {Month: \m\n}
+\set i 1
+Number of days in every month:\n
+\while {\i \le 12}
+{      
+       \months \index \i : \ \days \index \i
+       \if {\i \eq 6} {\n} \else {,\ }
+        \incr \i 
+}
+\n
+\foreach ost { {feta ost} brie danbo } { \ost\ }