Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
a7f3cb42
Commit
a7f3cb42
authored
Apr 12, 2008
by
Ian Lynagh
Browse files
(F)SLIT -> (f)sLit in Coercion
parent
5a0f9984
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/types/Coercion.lhs
View file @
a7f3cb42
...
...
@@ -444,12 +444,12 @@ mkCoConName occ key coCon = mkWiredInName gHC_PRIM (mkOccNameFS tcName occ)
transCoercionTyConName, symCoercionTyConName, leftCoercionTyConName, rightCoercionTyConName, instCoercionTyConName, unsafeCoercionTyConName :: Name
transCoercionTyConName = mkCoConName
FSLIT(
"trans") transCoercionTyConKey transCoercionTyCon
symCoercionTyConName = mkCoConName
FSLIT(
"sym") symCoercionTyConKey symCoercionTyCon
leftCoercionTyConName = mkCoConName
FSLIT(
"left") leftCoercionTyConKey leftCoercionTyCon
rightCoercionTyConName = mkCoConName
FSLIT(
"right") rightCoercionTyConKey rightCoercionTyCon
instCoercionTyConName = mkCoConName
FSLIT(
"inst") instCoercionTyConKey instCoercionTyCon
unsafeCoercionTyConName = mkCoConName
FSLIT(
"CoUnsafe") unsafeCoercionTyConKey unsafeCoercionTyCon
transCoercionTyConName = mkCoConName
(fsLit
"trans") transCoercionTyConKey transCoercionTyCon
symCoercionTyConName = mkCoConName
(fsLit
"sym") symCoercionTyConKey symCoercionTyCon
leftCoercionTyConName = mkCoConName
(fsLit
"left") leftCoercionTyConKey leftCoercionTyCon
rightCoercionTyConName = mkCoConName
(fsLit
"right") rightCoercionTyConKey rightCoercionTyCon
instCoercionTyConName = mkCoConName
(fsLit
"inst") instCoercionTyConKey instCoercionTyCon
unsafeCoercionTyConName = mkCoConName
(fsLit
"CoUnsafe") unsafeCoercionTyConKey unsafeCoercionTyCon
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment