diff options
| author | simonmar <unknown> | 2000-04-14 09:37:03 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2000-04-14 09:37:03 +0000 |
| commit | ae860efadc3f6b01749f9e45aa8164f68a773803 (patch) | |
| tree | eb3cb8edf206b20f604da87ca9237f32d8d2b2eb | |
| parent | c66f5f3ecbbaf2480e3aab3addf2764a877d9bc2 (diff) | |
| download | haskell-ae860efadc3f6b01749f9e45aa8164f68a773803.tar.gz | |
[project @ 2000-04-14 09:37:03 by simonmar]
Don't bother printing the HiVersion in the __interface line (it's
added by ghc-iface later on anyway).
| -rw-r--r-- | ghc/compiler/main/MkIface.lhs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ghc/compiler/main/MkIface.lhs b/ghc/compiler/main/MkIface.lhs index b540092190..1e2897b216 100644 --- a/ghc/compiler/main/MkIface.lhs +++ b/ghc/compiler/main/MkIface.lhs @@ -104,7 +104,6 @@ startIface mod (InterfaceDetails has_orphans import_usages (ExportEnv avails fix Just fn -> do if_hdl <- openFile fn WriteMode hPutStr if_hdl ("__interface \"" ++ show opt_InPackage ++ "\" " ++ moduleString mod) - hPutStr if_hdl (' ' : show (opt_HiVersion :: Int)) hPutStr if_hdl (' ' : orphan_indicator) hPutStrLn if_hdl " where" ifaceExports if_hdl avails |