module A = struct end
module Alias = A
exception Alias
let alias = Alias