toInterface :: Package.Name -> Optimized -> Interface
toInterface pkgName modul =
    let body' = body modul in
    Interface
    { iVersion  = Compiler.version
    , iPackage  = pkgName
    , iExports  = exports modul
    , iTypes    = types body'
    , iImports  = imports modul
    , iAdts     = datatypes body'
    , iAliases  = aliases body'
    , iFixities = fixities body'
    , iPorts    = ports body'
    }
toInterface :: Package.Name -> Optimized -> Interface
toInterface pkgName modul =
    let body' = body modul in
    Interface
    { iVersion  = Compiler.version
    , iPackage  = pkgName
    , iExports  = exports modul
    , iTypes    = types body'
    , iImports  = imports modul
    , iAdts     = datatypes body'
    , iAliases  = aliases body'
    , iFixities = fixities body'
    , iPorts    = ports body'
    }
toInterface pkgName modul =
    let body' = body modul in
    Interface
    { iVersion  = Compiler.version
    , iPackage  = pkgName
    , iExports  = exports modul
    , iTypes    = types body'
    , iImports  = imports modul
    , iAdts     = datatypes body'
    , iAliases  = aliases body'
    , iFixities = fixities body'
    , iPorts    = ports body'
    }