This commit is contained in:
Art 2023-01-13 21:29:54 +01:00
parent 86c2c4632c
commit 09d6f275e5
Signed by: prod2
GPG Key ID: F3BB5A97A70A8DDE
1 changed files with 1 additions and 1 deletions

View File

@ -230,7 +230,7 @@ let applyOp op left right =
| Star, Number x, Number y -> Number (x * y)
| Slash, 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)
| _, Fail _, _ -> left
| _, _, Fail _ -> right