add elem.drop and extend call_indirect to accept table index

2022-06-04 21:58:34 -06:00
parent 6eb3acde17
commit 82defff076
7 changed files with 74 additions and 29 deletions
@@ -16,8 +16,10 @@ import qualified Data.List as List

 main :: IO ()
 main = do
-  files <- filter (List.isSuffixOf ".wast") <$> Directory.listDirectory "tests/spec"
-  let files = ["ref_is_null.wast"]
+  files <-
+    filter (not . List.isPrefixOf "simd") . filter (List.isSuffixOf ".wast")
+      <$> Directory.listDirectory "tests/spec"
+  let files = ["table_init.wast"]
  scriptTestCases <- (`mapM` files) $ \file -> do
    test <- LBS.readFile ("tests/spec/" ++ file)
    return $ testCase file $ do