mirror of
https://github.com/GaloisInc/macaw.git
synced 2024-11-23 16:35:02 +03:00
1fa9b86b26
This is more descriptive, especially since we will eventually have macaw-aarch32 (also derived from the ASL specs)
19 lines
466 B
Haskell
19 lines
466 B
Haskell
module Main where
|
|
|
|
|
|
import ARMTests
|
|
import MismatchTests
|
|
import System.FilePath.Glob (namesMatching)
|
|
import Test.Tasty (defaultMain, testGroup)
|
|
|
|
|
|
main :: IO ()
|
|
main = do
|
|
testFiles <- namesMatching "tests/arm/*.mcw.expected"
|
|
bins <- namesMatching "tests/arm/bin/*"
|
|
badbins <- namesMatching "tests/arm/*.exe=bad"
|
|
defaultMain $ testGroup "ARMMacawTests"
|
|
[ armAsmTests testFiles
|
|
, armMismatchTests badbins
|
|
]
|