From 8b93dec6b28b7b7af8b251092edac7d050d664f9 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 6 Nov 2011 08:14:53 -0500 Subject: Remove dummy entity --- xml/parse.sml | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'xml') diff --git a/xml/parse.sml b/xml/parse.sml index 86ff3682..ad63c851 100644 --- a/xml/parse.sml +++ b/xml/parse.sml @@ -55,7 +55,7 @@ fun main () = else raise Fail "Bad entity expansion [2]" in - print ("\t\t(\"" ^ ent ^ "\", " ^ exp ^ "),\n"); + print ("\t\t(\"" ^ ent ^ "\", " ^ exp ^ ") ::\n"); loop () end | _ => raise Fail "Bad ENTITY line" @@ -66,11 +66,11 @@ fun main () = end in print "structure Entities = struct\n"; - print "\tval all = [\n"; + print "\tval all =\n"; doFile "xml/xhtml-lat1.ent"; doFile "xml/xhtml-special.ent"; doFile "xml/xhtml-symbol.ent"; - print "\t(\"\", 0)]\n"; + print "\t[]\n"; print "end\n" end -- cgit v1.2.3