GitHub/haskell-wasm
1
0
Fork 1
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix copysign instruction

Browse Source
This commit is contained in:
Ilya Rezvov
2018-04-10 16:56:42 -07:00
parent f6cae32148
commit fd7ce7e450
5 changed files with 22 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Language/Wasm/Lexer.x
+4 -4
View File
@@ -52,9 +52,9 @@ $doublequote = \"
tokens :-
<0> $space ;
<0> "nan" { constToken $ TFloatLit nan }
<0> "+nan" { constToken $ TFloatLit nan }
<0> "-nan" { constToken $ TFloatLit minusNaN }
<0> "nan" { constToken $ TFloatLit (abs nan) }
<0> "+nan" { constToken $ TFloatLit (abs nan) }
<0> "-nan" { constToken $ TFloatLit nan }
<0> $sign? @nanhex { parseNanSigned }
<0> "inf" { constToken $ TFloatLit inf }
<0> "+inf" { constToken $ TFloatLit inf }
@@ -99,7 +99,7 @@ isAllowedStringChar _userState (_pos, _rest, inp, _) _len _nextInp =
code >= 0x20 && code /= 0x7f && char /= '"' && char /= '\\'
minusNaN, inf, minusInf :: Double
minusNaN = -nan
minusNaN = negate nan
inf = infinity
minusInf = -infinity