ghc/compiler/ghci/CmStaticInfo.lhs

   1 %
   2 % (c) The University of Glasgow, 2000
   3 %
   4 \section[CmStaticInfo]{Session-static info for the Compilation Manager}
   5
   6 \begin{code}
   7 module CmStaticInfo ( FLAGS, Package(..), PCI,
   8                       mkSI, SI(..)
   9                     )
  10 where
  11
  12 #include "HsVersions.h"
  13
  14 \end{code}
  15
  16 \begin{code}
  17 type FLAGS = [String]       -- or some such fiction
  18 type PCI = [Package]
  19
  20 -- copied from the driver
  21 data Package
  22    = Package {
  23         name            :: String,
  24         import_dirs     :: [String],
  25         library_dirs    :: [String],
  26         hs_libraries    :: [String],
  27         extra_libraries :: [String],
  28         include_dirs    :: [String],
  29         c_includes      :: [String],
  30         package_deps    :: [String],
  31         extra_ghc_opts  :: [String],
  32         extra_cc_opts   :: [String],
  33         extra_ld_opts   :: [String]
  34      }
  35   deriving (Read, Show)
  36
  37
  38 data SI = SI { flags :: FLAGS, pci :: PCI }
  39
  40 mkSI :: FLAGS -> PCI -> SI
  41 mkSI flags pci = SI { flags = flags, pci = pci }
  42
  43
  44 \end{code}