File tree Expand file tree Collapse file tree 1 file changed +9
-2
lines changed Expand file tree Collapse file tree 1 file changed +9
-2
lines changed Original file line number Diff line number Diff line change 58
58
Program's output and error streams are ignored.
59
59
-}
60
60
61
+ {-# LANGUAGE CPP #-}
61
62
{-# LANGUAGE DeriveFunctor #-}
62
63
{-# LANGUAGE QuasiQuotes #-}
63
64
{-# OPTIONS_GHC -fno-warn-unused-top-binds #-}
@@ -77,7 +78,9 @@ import qualified Clash.Util.Interpolate as I
77
78
import qualified Data.List as List
78
79
79
80
import Control.Applicative ( Alternative (.. ) )
81
+ #if __GLASGOW_HASKELL__ <= 910
80
82
import Data.Typeable ( Typeable )
83
+ #endif
81
84
import Data.Maybe ( fromMaybe , isNothing , listToMaybe )
82
85
import System.FilePath.Glob ( globDir1 , compile )
83
86
import System.FilePath.Posix ( getSearchPath )
@@ -136,7 +139,9 @@ data TestProgram =
136
139
-- ^ Work directory
137
140
[(String , String )]
138
141
-- ^ Additional environment variables
139
- deriving (Typeable )
142
+ #if __GLASGOW_HASKELL__ <= 910
143
+ deriving Typeable
144
+ #endif
140
145
141
146
data TestFailingProgram =
142
147
TestFailingProgram
@@ -160,7 +165,9 @@ data TestFailingProgram =
160
165
-- ^ Work directory
161
166
[(String , String )]
162
167
-- ^ Additional environment variables
163
- deriving (Typeable )
168
+ #if __GLASGOW_HASKELL__ <= 910
169
+ deriving Typeable
170
+ #endif
164
171
165
172
testOutput
166
173
:: PrintOutput
You can’t perform that action at this time.
0 commit comments