update text and binary parsers to new elem formats

2022-02-01 21:18:12 -07:00
parent 960acac955
commit 8af7b45681
4 changed files with 126 additions and 26 deletions
@@ -17,7 +17,8 @@ import qualified Data.List as List
 main :: IO ()
 main = do
  files <- filter (List.isSuffixOf ".wast") <$> Directory.listDirectory "tests/spec"
-  let files = ["ref_null.wast", "ref_is_null.wast"]
+  -- let files = ["ref_null.wast", "ref_is_null.wast"]
+  let files = ["elem.wast"]
  scriptTestCases <- (`mapM` files) $ \file -> do
    test <- LBS.readFile ("tests/spec/" ++ file)
    return $ testCase file $ do