equal
deleted
inserted
replaced
58 | Token.AltString => Markup.altstring |
58 | Token.AltString => Markup.altstring |
59 | Token.Verbatim => Markup.verbatim |
59 | Token.Verbatim => Markup.verbatim |
60 | Token.Space => Markup.empty |
60 | Token.Space => Markup.empty |
61 | Token.Comment => Markup.comment |
61 | Token.Comment => Markup.comment |
62 | Token.InternalValue => Markup.empty |
62 | Token.InternalValue => Markup.empty |
63 | Token.Malformed => Markup.malformed |
|
64 | Token.Error _ => Markup.malformed |
63 | Token.Error _ => Markup.malformed |
65 | Token.Sync => Markup.control |
64 | Token.Sync => Markup.control |
66 | Token.EOF => Markup.control; |
65 | Token.EOF => Markup.control; |
67 |
66 |
68 fun token_markup tok = |
67 fun token_markup tok = |