fix build and tests for ghc >8.6

This commit is contained in:
Ilya Rezvov
2020-01-13 21:56:06 -08:00
parent adeabf7e30
commit d7e1b803f5
6 changed files with 21 additions and 10 deletions
+1 -1
View File
@@ -154,7 +154,7 @@ getName = do
putResultType :: ResultType -> Put
putResultType [] = putWord8 0x40
putResultType [valType] = put valType
putResultType _ = fail "Current WebAssembly spec does not support returning more then one value"
putResultType _ = error "Current WebAssembly spec does not support returning more then one value"
getResultType :: Get ResultType
getResultType = do