fay-0.9.1.0: src/Test/Api.hs

{-# LANGUAGE TemplateHaskell #-}

module Test.Api (tests) where

import           Data.Default
import           Language.Fay.Compiler
import           Language.Fay.Types
import           Test.HUnit (Assertion, assertBool)
import           Test.Util
import           Test.Framework
import           Test.Framework.Providers.HUnit
import           Test.Framework.TH

tests :: Test
tests = $testGroupGenerator

case_imports :: Assertion
case_imports = do
  res <- compileFile def { configDirectoryIncludes = ["tests"] } "tests/RecordImport_Import.hs"
  assertBool "Could not compile file with imports" (isRight res)