val _ = Domain.registerBefore
(fn _ => (aliases := openInAll "aliases";
aliasesD := openInAll "aliases.default"))
val _ = Domain.registerAfter
val _ = Domain.registerBefore
(fn _ => (aliases := openInAll "aliases";
aliasesD := openInAll "aliases.default"))
val _ = Domain.registerAfter