module Zifter.Script
( preprocessor
, prechecker
, checker
, module Zifter.Script.Types
) where
import Zifter.Script.Types
import Zifter.Setup
import Zifter.Zift
preprocessor :: Zift () -> ZiftScript ()
preprocessor prep =
ZiftScript {renderZiftScript = pure ((), mempty {ziftPreprocessor = prep})}
prechecker :: Zift () -> ZiftScript ()
prechecker func =
ZiftScript {renderZiftScript = pure ((), mempty {ziftPreChecker = func})}
checker :: Zift () -> ZiftScript ()
checker ch =
ZiftScript {renderZiftScript = pure ((), mempty {ziftChecker = ch})}