scaffolder/src/Text/Edifact/Scaffolder.hs

   1 module Text.Edifact.Scaffolder
   2   ( scaffold
   3   , ScaffoldingEnv(..)
   4   ) where
   5
   6 import           Text.Edifact.Scaffolder.Commons
   7
   8 import           Text.Edifact.Scaffolder.Composites
   9 import           Text.Edifact.Scaffolder.Messages
  10 import           Text.Edifact.Scaffolder.Root
  11 import           Text.Edifact.Scaffolder.Segments
  12 import           Text.Edifact.Scaffolder.Simples
  13
  14 scaffold :: ScaffoldingEnv -> IO ()
  15 scaffold = runScaffolding $ do
  16   messages
  17   segments
  18   composites
  19   simples
  20   rootModule