[commit: ghc] master: comments only (f6db0b2)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/f6db0b202be1ba780544cb34b527ee2955c56f9b/ghc

>---------------------------------------------------------------

commit f6db0b202be1ba780544cb34b527ee2955c56f9b
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Fri Apr 20 13:58:38 2018 +0100

    comments only


>---------------------------------------------------------------

f6db0b202be1ba780544cb34b527ee2955c56f9b
 compiler/basicTypes/BasicTypes.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/basicTypes/BasicTypes.hs b/compiler/basicTypes/BasicTypes.hs
index 9b8208e..dfb7ab4 100644
--- a/compiler/basicTypes/BasicTypes.hs
+++ b/compiler/basicTypes/BasicTypes.hs
@@ -1220,10 +1220,10 @@ data InlinePragma            -- Note [InlinePragma]
 
 -- | Inline Specification
 data InlineSpec   -- What the user's INLINE pragma looked like
-  = Inline
-  | Inlinable
-  | NoInline
-  | NoUserInline -- Used when the pragma did not come from the user,
+  = Inline       -- User wrote INLINE
+  | Inlinable    -- User wrote INLINABLE
+  | NoInline     -- User wrote NOINLINE
+  | NoUserInline -- User did not write any of INLINE/INLINABLE/NOINLINE
                  -- e.g. in `defaultInlinePragma` or when created by CSE
   deriving( Eq, Data, Show )
         -- Show needed for Lexer.x