summaryrefslogtreecommitdiff
path: root/grammars/video/Shared/generalProlog.gf
diff options
context:
space:
mode:
authorbjorn <bjorn@bringert.net>2008-08-14 07:58:04 +0000
committerbjorn <bjorn@bringert.net>2008-08-14 07:58:04 +0000
commit77270a010a0b453e9a84c3e62db7cfd22e49d55d (patch)
treed17682a545d6ac1e68ff49b8c20964182794baf7 /grammars/video/Shared/generalProlog.gf
parent0bbb906141711767678f82b15a7b43e65e0b5bd6 (diff)
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.
Diffstat (limited to 'grammars/video/Shared/generalProlog.gf')
-rw-r--r--grammars/video/Shared/generalProlog.gf43
1 files changed, 0 insertions, 43 deletions
diff --git a/grammars/video/Shared/generalProlog.gf b/grammars/video/Shared/generalProlog.gf
deleted file mode 100644
index 907a6b787..000000000
--- a/grammars/video/Shared/generalProlog.gf
+++ /dev/null
@@ -1,43 +0,0 @@
--- File name Shared/general.Prolog.gf
-
-concrete generalProlog of general = open prologResource in {
-
-flags lexer=codelit ; unlexer=codelit ; startcat=DMoveList ;
-
-
-
-lin
-dmoves dm = {s = appHakeOne dm.s };
-dmoves1 dm = {s = dm.s };
-dmoves2 dm dms = {s = dm.s ++ "," ++ dms.s };
-
-lin
-answer p = {s = app "answer" p.s};
---request a = {s = app "request" a.s };
-
---- Answers
-propans a = {s = a.s} ;
-negpropans a = {s = app "not" a.s} ;
-shortans a = {s = a.s} ;
-negShortAns a = {s = a.s} ;
-
-negprop n p = {s = n.s ++ p.s} ;
-
-pattern
-neg = [] ;
-
-pattern
-----Short answers
-yes = "yes" ;
-no = "no";
-english = "english" ; ----???
-swedish = "swedish" ; ----???
-
-lin
-indShortAns a = {s = a.s} ;
-not n = {s = n.s} ;
-
---avsluta??
---börja om
-top = { s = "top"} ;
-} \ No newline at end of file