fix //
This commit is contained in:
parent
86c2c4632c
commit
09d6f275e5
|
@ -230,7 +230,7 @@ let applyOp op left right =
|
||||||
| Star, Number x, Number y -> Number (x * y)
|
| Star, Number x, Number y -> Number (x * y)
|
||||||
| Slash, Number x, Number y -> Number (x / y)
|
| Slash, Number x, Number y -> Number (x / y)
|
||||||
| Percent, Number x, Number y -> Number (x % y)
|
| Percent, Number x, Number y -> Number (x % y)
|
||||||
| SlashSlash, Number x, Number y -> Number (floor x / y)
|
| SlashSlash, Number x, Number y -> Number (floor (x / y))
|
||||||
| Caret, Number x, Number y -> Number (x ** y)
|
| Caret, Number x, Number y -> Number (x ** y)
|
||||||
| _, Fail _, _ -> left
|
| _, Fail _, _ -> left
|
||||||
| _, _, Fail _ -> right
|
| _, _, Fail _ -> right
|
||||||
|
|
Loading…
Reference in New Issue