*** empty log message ***

This commit is contained in:
janna
2004-10-28 11:46:37 +00:00
parent b99bcb1ab6
commit 855fc1e1f8
3 changed files with 79 additions and 10 deletions

View File

@@ -0,0 +1,16 @@
-- use this path to read the grammar from the same directory
--# -path=.:../abstract:../../prelude
concrete TestHTMLrus of TestHTML = StructuralRus ** open SyntaxRus in {
flags
coding=utf8 ;
startcat=HTMLdoc ; lexer=text ; parser=chart ; unlexer=text ;
-- a random sample from the lexicon
lin
body = {s= "<body> " ++"Это тело" ++ " </body>"};
head = {s= "<head> " ++ "Это голова \" ++ " </head>"};
htmlText x y = {s= " <html> "++ x.s ++ " " ++ y.s ++ " </html>"};
};