Skip to content

Instantly share code, notes, and snippets.

@chrisdone chrisdone/output.hs Secret
Created Nov 27, 2018

Embed
What would you like to do?
Output
( Id {idStableName = "main::Main:main", idUnique = Unique 3458764513820541029}
, AppE
(AppE
(VarE
(Id
{ idStableName = "base:GHC.TopHandler:runMainIO"
, idUnique = Unique 3458764513820541030
}))
(TypE (Typ "()")))
(VarE
(Id
{ idStableName = "main:Main:main"
, idUnique = Unique 8214565720323784709
})))
( Id {idStableName = "main:Main:$cfoo", idUnique = Unique 6989586621679010917}
, LamE
(Id {idStableName = "main:Main:x", idUnique = Unique 6989586621679010615})
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:I#"
, idUnique = Unique 3891110078048108563
}))
(LitE (Int 99))))
( Id {idStableName = "main:Main:$cfoo", idUnique = Unique 6989586621679010923}
, LamE
(Id {idStableName = "main:Main:x", idUnique = Unique 6989586621679010616})
(AppE
(AppE
(AppE
(AppE
(VarE
(Id
{ idStableName = "base:GHC.Num:*"
, idUnique = Unique 8214565720323784716
}))
(TypE (Typ "Int")))
(VarE
(Id
{ idStableName = "base:GHC.Num:$fNumInt"
, idUnique = Unique 8214565720323784712
})))
(VarE
(Id
{ idStableName = "main:Main:x"
, idUnique = Unique 6989586621679010616
})))
(VarE
(Id
{ idStableName = "main:Main:x"
, idUnique = Unique 6989586621679010616
}))))
( Id
{ idStableName = "main:Main:$fFooChar"
, idUnique = Unique 8214565720323784706
}
, CastE
(VarE
(Id
{ idStableName = "main:Main:$cfoo"
, idUnique = Unique 6989586621679010917
})))
( Id
{idStableName = "main:Main:$fFooInt", idUnique = Unique 8214565720323784705}
, CastE
(VarE
(Id
{ idStableName = "main:Main:$cfoo"
, idUnique = Unique 6989586621679010923
})))
( Id
{ idStableName = "main:Main:$tc'C:Foo"
, idUnique = Unique 8214565720323785228
}
, AppE
(AppE
(AppE
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:TyCon"
, idUnique = Unique 8214565720323785226
}))
(LitE (Word 3069963581332373491)))
(LitE (Word 7994028749206096306)))
(VarE
(Id
{ idStableName = "main:Main:$trModule"
, idUnique = Unique 8214565720323785235
})))
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:TrNameS"
, idUnique = Unique 8214565720323785223
}))
(LitE (Str "'C:Foo"))))
( Id {idStableName = "main:Main:$tcFoo", idUnique = Unique 8214565720323785233}
, AppE
(AppE
(AppE
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:TyCon"
, idUnique = Unique 8214565720323785226
}))
(LitE (Word 15969239573580716305)))
(LitE (Word 9960885319002089495)))
(VarE
(Id
{ idStableName = "main:Main:$trModule"
, idUnique = Unique 8214565720323785235
})))
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:TrNameS"
, idUnique = Unique 8214565720323785223
}))
(LitE (Str "Foo"))))
( Id
{ idStableName = "main:Main:$trModule"
, idUnique = Unique 8214565720323785235
}
, AppE
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:Module"
, idUnique = Unique 8214565720323785214
}))
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:TrNameS"
, idUnique = Unique 8214565720323785223
}))
(LitE (Str "main"))))
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:TrNameS"
, idUnique = Unique 8214565720323785223
}))
(LitE (Str "Main"))))
( Id {idStableName = "main:Main:main", idUnique = Unique 8214565720323784709}
, AppE
(AppE
(AppE
(VarE
(Id
{ idStableName = "base:System.IO:print"
, idUnique = Unique 3458764513820540965
}))
(TypE (Typ "Int")))
(VarE
(Id
{ idStableName = "base:GHC.Show:$fShowInt"
, idUnique = Unique 8214565720323785695
})))
(AppE
(AppE
(AppE
(VarE
(Id
{ idStableName = "main:Main:foo"
, idUnique = Unique 8214565720323784707
}))
(TypE (Typ "Int")))
(VarE
(Id
{ idStableName = "main:Main:$fFooInt"
, idUnique = Unique 8214565720323784705
})))
(AppE
(VarE
(Id
{ idStableName = "ghc-prim:GHC.Types:I#"
, idUnique = Unique 3891110078048108563
}))
(LitE (Int 123)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.