Commit 45249cb5 authored by simonmar's avatar simonmar
Browse files

[project @ 2002-07-16 15:07:15 by simonmar]

Silly me, the version number in the interface isn't correct until
after mkFinalIface, so don't grab it until then.
parent 9a972425
......@@ -240,9 +240,6 @@ hscRecomp ghci_mode dflags have_object
-- force this out now, so we don't keep a hold of rdr_module or pcs_tc
; seqList imported_modules (return ())
-- this module's version
; version <- return $! vers_module (mi_version new_iface)
-------------------
-- FLATTENING
-------------------
......@@ -279,7 +276,6 @@ hscRecomp ghci_mode dflags have_object
-- flat_details
-- imported_modules (seq'd)
-- new_iface
-- version
-------------------
-- SIMPLIFY
......@@ -391,6 +387,10 @@ hscRecomp ghci_mode dflags have_object
final_iface <- _scc_ "MkFinalIface"
mkFinalIface ghci_mode dflags location
maybe_checked_iface new_iface tidy_details
-- get this module's version
version <- return $! vers_module (mi_version final_iface)
if toNothing
then do
return (False, False, Nothing, final_iface)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment