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 #include "HsVersions.h"
   8
   9 module PragmaInfo where
  10
  11 IMP_Ubiq()
  12 \end{code}
  13
  14 \begin{code}
  15 data PragmaInfo
  16   = NoPragmaInfo
  17
  18   | IWantToBeINLINEd
  19
  20   | IMustNotBeINLINEd   -- Used by the simplifier to prevent looping
  21                         -- on recursive definitions
  22
  23   | IMustBeINLINEd      -- Absolutely must inline; used for PrimOps only
  24 \end{code}