let journalized_rm_unused_globals  =
  Journal.register
    "!Db.Sparecode.rm_unused_globals"
    (Datatype.func2
       ~label1:("new_proj_name"NoneDatatype.string
       ~label2:("project"Some Project.current) Project.ty
       Project.ty)
    unjournalized_rm_unused_globals