11 lines
235 B
Haskell
11 lines
235 B
Haskell
{-# LANGUAGE TemplateHaskell #-}
|
|
module Main where
|
|
|
|
import Control.Monad (unless)
|
|
import Lib (value)
|
|
import Language.Haskell.TH
|
|
|
|
val = $(value)
|
|
|
|
main = unless (val == 42)
|
|
$ error $ "Incorrect lib value. Got " <> show val
|