ghc/compiler/basicTypes/PragmaInfo.lhs

   1 %
   2 % (c) The AQUA Project, Glasgow University, 1996
   3 %
   4 \section[PragmaInfo]{@PragmaInfos@: The user's pragma requests}
   5
   6 \begin{code}
   7 module PragmaInfo where
   8
   9 #include "HsVersions.h"
  10
  11 \end{code}
  12
  13 \begin{code}
  14 data PragmaInfo
  15   = NoPragmaInfo
  16
  17   | IWantToBeINLINEd
  18
  19   | IMustNotBeINLINEd   -- Used by the simplifier to prevent looping
  20                         -- on recursive definitions
  21
  22   | IMustBeINLINEd      -- Absolutely must inline; used for PrimOps only
  23 \end{code}