Skip to content
GitLab
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
d31b5e62
Commit
d31b5e62
authored
Nov 20, 2002
by
chak
Browse files
[project @ 2002-11-20 23:27:37 by chak]
wibble
parent
f2e26fc5
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/deSugar/DsMeta.hs
View file @
d31b5e62
...
...
@@ -303,16 +303,9 @@ rep_proto nm ty = do { nm1 <- lookupBinder nm ;
-- Types
-------------------------------------------------------
-- represent a list of type variables in a usage position that does not need
-- gensym'ing
--
repTvs
::
[
HsTyVarBndr
Name
]
->
DsM
(
Core
[
String
])
repTvs
tvs
=
do
{
tvs1
<-
mapM
(
localVar
.
hsTyVarName
)
tvs
;
return
(
coreList'
stringTy
tvs1
)
}
-- gensym a list of type variables and enter them into the meta environment;
-- the computations passed as the second argument is executed in that extended
-- meta environment and gets the *
original* names
as an argument
-- meta environment and gets the *
new* names on Core-level
as an argument
--
addTyVarBinds
::
[
HsTyVarBndr
Name
]
-- the binders to be added
->
([
Core
String
]
->
DsM
(
Core
(
M
.
Q
a
)))
-- action in the ext env
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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