Skip to content
Snippets Groups Projects
Commit e267aa7f authored by Ben Gamari's avatar Ben Gamari
Browse files

hadrian-ghci-multi: Pass -this-package-name in unit response files

As noted in #25509, the `-this-package-name` must be passed for each
package to ensure that GHC can response references to the packages'
exposed modules via package-qualified imports. Fix this.

Closes #25509.
parent 88d2ee34
No related branches found
No related tags found
No related merge requests found
...@@ -86,9 +86,10 @@ multiSetup pkg_s = do ...@@ -86,9 +86,10 @@ multiSetup pkg_s = do
let rexp m = ["-reexported-module", m] let rexp m = ["-reexported-module", m]
let hidir = root </> "interfaces" </> pkgPath p let hidir = root </> "interfaces" </> pkgPath p
writeFile' (resp_file root p) (intercalate "\n" (th_hack arg_list writeFile' (resp_file root p) (intercalate "\n" (th_hack arg_list
++ modules cd ++ modules cd
++ concatMap rexp (reexportModules cd) ++ concatMap rexp (reexportModules cd)
++ ["-outputdir", hidir])) ++ ["-outputdir", hidir,
"-this-package-name", pkgName p]))
return (resp_file root p) return (resp_file root p)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment