forbid special nan values for non-script contexts

2023-08-21 21:11:39 -06:00
parent d321bf6a9c
commit d0403ad554
2 changed files with 60 additions and 42 deletions
@@ -5,6 +5,8 @@ module Language.Wasm.Lexer (
    Lexeme(..),
    Token(..),
    AlexPosn(..),
+    FloatRep(..),
+    NaN(..),
    scanner,
    asFloat,
    asDouble,
@@ -22,6 +24,8 @@ import Data.List (isPrefixOf)
 import Text.Read (readEither)
 import Data.Bits
 import Numeric (showHex)
+import Control.DeepSeq (NFData)
+import GHC.Generics (Generic)

 }