mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-06 18:40:23 +00:00
Fix to IDE blowing up from last fix
This commit is contained in:
parent
1a7e9dd959
commit
669e20fdea
|
@ -24634,20 +24634,17 @@ FUNCTION EvaluateNumbers$ (p, num() AS STRING)
|
|||
EXIT FUNCTION
|
||||
END IF
|
||||
CASE "\"
|
||||
IF VAL(num(2)) = 0 THEN
|
||||
IF _ROUND(VAL(num(2))) = 0 THEN
|
||||
EvaluateNumbers$ = "ERROR - Division By Zero"
|
||||
EXIT FUNCTION
|
||||
END IF
|
||||
|
||||
n1 = VAL(num(1)) \ VAL(num(2))
|
||||
n1 = VAL(num(1)) \ _ROUND(VAL(num(2)))
|
||||
CASE "MOD"
|
||||
IF VAL(num(2)) = 0 THEN
|
||||
IF _ROUND(VAL(num(2))) = 0 THEN
|
||||
EvaluateNumbers$ = "ERROR - Division By Zero"
|
||||
EXIT FUNCTION
|
||||
END IF
|
||||
|
||||
n1 = VAL(num(1)) MOD VAL(num(2))
|
||||
|
||||
n1 = VAL(num(1)) MOD _ROUND(VAL(num(2)))
|
||||
CASE "+": n1 = VAL(num(1)) + VAL(num(2))
|
||||
CASE "-":
|
||||
n1 = VAL(num(1)) - VAL(num(2))
|
||||
|
|
Loading…
Reference in a new issue