==================== FINAL INTERFACE ==================== 2018-07-21 20:15:37.346251 UTC interface main:Main 8043 interface hash: f4aad249a572aaccc0d5b792c5365a09 ABI hash: b48a2cd7ccebb4d45a72b25b7907fc5d export-list hash: c1f98a35e15b213b50e77cd700ab146f orphan hash: 693e9af84d3dfcc71e640e005bdc5e2e flag hash: 385167d368051acb2ee8457dfc7d7d4d opt_hash: 14e536840aca4e889cad654e6f9b79c1 hpc_hash: 93b885adfe0da089cdf634904fd59f71 sig of: Nothing used TH splices: False where exports: Main.main module dependencies: package dependencies: base-4.11.1.0* ghc-prim-0.5.2.0 integer-gmp-1.0.2.0 orphans: base-4.11.1.0:GHC.Float base-4.11.1.0:GHC.Base family instance modules: base-4.11.1.0:Control.Applicative base-4.11.1.0:Data.Functor.Const base-4.11.1.0:Data.Functor.Identity base-4.11.1.0:Data.Monoid base-4.11.1.0:Data.Semigroup.Internal base-4.11.1.0:GHC.Generics base-4.11.1.0:GHC.IO.Exception import -/ base-4.11.1.0:GHC.Base 604111500e81281298777e721c75643b import -/ base-4.11.1.0:Prelude 0750c25585e2b797cd78291d423d39dd import -/ base-4.11.1.0:System.IO ce09fff7d191d14067bddc2efd9b53a4 import -/ ghc-prim-0.5.2.0:GHC.Types d9b3023de7feae4a5308d643da5543f7 be86c9d078d3acbf19ba91fe74a24273 $trModule :: GHC.Types.Module {- HasNoCafRefs, Strictness: m, Unfolding: (GHC.Types.Module Main.$trModule3 Main.$trModule1) -} b09d86f2c49dd5176b544d8d13ddb6c5 $trModule1 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS Main.$trModule2) -} e5875966b74dad2d29772660b8a75e33 $trModule2 :: GHC.Prim.Addr# {- HasNoCafRefs, Unfolding: ("Main"#) -} 23b03bd7d075a00f5ad1ee10e6add7b8 $trModule3 :: GHC.Types.TrName {- HasNoCafRefs, Strictness: m1, Unfolding: (GHC.Types.TrNameS Main.$trModule4) -} d026be77cb9ced20e35a61514e0458aa $trModule4 :: GHC.Prim.Addr# {- HasNoCafRefs, Unfolding: ("main"#) -} 5ef53ceef132a1ea0eb4ea5bc4d6af6d main :: GHC.Types.IO () {- Arity: 1, Strictness: , Unfolding: InlineRule (0, True, True) Main.main1 `cast` (Sym (GHC.Types.N:IO[0] <()>_R)) -} b146918497a1499ea4e5bfec397b02b1 main1 :: GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, () #) {- Arity: 1, Strictness: , Unfolding: (\ (s :: GHC.Prim.State# GHC.Prim.RealWorld) -> case GHC.IO.Handle.Internals.wantReadableHandle_1 @ GHC.Base.String GHC.IO.Handle.Text.hGetLine4 GHC.IO.Handle.FD.stdin GHC.IO.Handle.Text.hGetLine2 `cast` (_R ->_R Sym (GHC.Types.N:IO[0] _R)) s of ds1 { (#,#) ipv ipv1 -> case GHC.IO.Handle.Text.hPutStr2 GHC.IO.Handle.FD.stdout ipv1 GHC.Types.True ipv of ds2 { (#,#) ipv2 ipv3 -> (# ipv2, GHC.Tuple.() #) } }) -} 42aeb51cb86bb6d725ead93931e7aeea main2 :: GHC.Prim.State# GHC.Prim.RealWorld -> (# GHC.Prim.State# GHC.Prim.RealWorld, () #) {- Arity: 1, Unfolding: (GHC.TopHandler.runMainIO1 @ () Main.main1 `cast` (Sym (GHC.Types.N:IO[0] <()>_R))) -} vectorised variables: vectorised tycons: vectorised reused tycons: parallel variables: parallel tycons: trusted: safe require own pkg trusted: False