git.haskell.org
/
ghc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2627e62
)
Fix comments on isValArg
author
Simon Peyton Jones
<simonpj@microsoft.com>
Mon, 28 Jan 2013 18:21:04 +0000
(18:21 +0000)
committer
Simon Peyton Jones
<simonpj@microsoft.com>
Mon, 28 Jan 2013 18:21:04 +0000
(18:21 +0000)
compiler/coreSyn/CoreSyn.lhs
patch
|
blob
|
history
diff --git
a/compiler/coreSyn/CoreSyn.lhs
b/compiler/coreSyn/CoreSyn.lhs
index
685975f
..
6423c7e
100644
(file)
--- a/
compiler/coreSyn/CoreSyn.lhs
+++ b/
compiler/coreSyn/CoreSyn.lhs
@@
-1324,8
+1324,9
@@
isRuntimeVar = isId
isRuntimeArg :: CoreExpr -> Bool
isRuntimeArg = isValArg
--- | Returns @False@ iff the expression is a 'Type' or 'Coercion'
--- expression at its top level
+-- | Returns @True@ for value arguments, false for type args
+-- NB: coercions are value arguments (zero width, to be sure,
+-- like State#, but still value args).
isValArg :: Expr b -> Bool
isValArg e = not (isTypeArg e)