From 77270a010a0b453e9a84c3e62db7cfd22e49d55d Mon Sep 17 00:00:00 2001
From: bjorn <bjorn@bringert.net>
Date: Thu, 14 Aug 2008 07:58:04 +0000
Subject: Remove the grammars directory. It was full of old grammars that don't
 compile these days. See the old source distributions if you want them.

---
 grammars/timetable/TimetableHTML.gf | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 grammars/timetable/TimetableHTML.gf

(limited to 'grammars/timetable/TimetableHTML.gf')

diff --git a/grammars/timetable/TimetableHTML.gf b/grammars/timetable/TimetableHTML.gf
deleted file mode 100644
index 0fec2a1ab..000000000
--- a/grammars/timetable/TimetableHTML.gf
+++ /dev/null
@@ -1,24 +0,0 @@
---# -path=.:../prelude
-
-concrete TimetableHTML of Timetable = open Prelude, HTML in {
-
-  lin
-    MkTable cs ts = 
-      ss (intagAttr "table" 
-            "border=ON" (intag "tr" (intag "td" [] ++ cs.s) ++ ts.s)) ;
-    NilTrain _ = ss [] ;
-    ConsTrain cs n t ts = ss (intag "tr" (intag "td" n.s ++ t.s) ++ ts.s) ;
-    OneCity c = ss (intag "td" c.s) ;
-    ConsCity c cs = ss (intag "td" c.s ++ cs.s) ;
-
-    StopTime t = ss (intag "td" t.s) ;
-    NoStop = ss (intag "td" "-") ;
-
-    LocTrain c s = s ;
-    CityTrain c s cs t = ss (s.s ++ t.s) ;
-
-    T i = i ;
-    N n = ss (intag "b" n.s) ;
-    C s = ss (intag "b" s.s) ;
-
-}
-- 
cgit v1.2.3