Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/24644bb756950b486f988e0b2d5d55b79d8e1490 >--------------------------------------------------------------- commit 24644bb756950b486f988e0b2d5d55b79d8e1490 Author: Simon Peyton Jones <simo...@microsoft.com> Date: Mon Jan 28 18:21:04 2013 +0000 Fix comments on isValArg >--------------------------------------------------------------- compiler/coreSyn/CoreSyn.lhs | 5 +++-- 1 files changed, 3 insertions(+), 2 deletions(-) diff --git a/compiler/coreSyn/CoreSyn.lhs b/compiler/coreSyn/CoreSyn.lhs index 685975f..6423c7e 100644 --- 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) _______________________________________________ ghc-commits mailing list ghc-commits@haskell.org http://www.haskell.org/mailman/listinfo/ghc-commits
