Functor
Html ("/home/afranke/import/mathweb/html/Html.oz")
Import
- Type(ask)
- Buffered(file socket pipe) at "x-ozlib://mathweb/html/Buffered.ozf"
Export
Define
class Xml
- startTag(T attribs:Attribs)
- endTag(T)
- emptyTag(T attribs:Attribs)
- tagBody(N Tag)
- tagTuple(Tag)
- tagRecord(Tag)
- tagProcedure(P)
- tag(Tag)
end
class Html from Xml
- tagRecord(Tag)
- tagTuple(Tag)
- tag(Tag)
end
class HtmlDoc from Html
- writeDoc(content:Content heading:Heading margin:Margin style:Style title:Title)
- Head(Title Style)
- Body(Margin Heading Content)
end
fun{EscapeHtml S}
fun{EscapeVS VS}
fun{EscapeJS S}
End