ozmake --install mogul:/duchier/xml/parser
declare [Parser] = {Link ['x-ozlib://duchier/xml/Parser.ozf']} CTX = {Parser.newContext} STRIP = {NewDictionary} for X in ["info" "entry"] do STRIP.({CTX.intern X}.xname) := true end fun {XMLFromFile F} {Parser.parse o(file:F context:CTX strip:STRIP)}.children.1 end