aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lvm.c11
1 files changed, 7 insertions, 4 deletions
diff --git a/lvm.c b/lvm.c
index 64664689..49cbdd92 100644
--- a/lvm.c
+++ b/lvm.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lvm.c,v 2.192 2014/03/31 19:18:24 roberto Exp roberto $ 2** $Id: lvm.c,v 2.193 2014/04/02 16:54:20 roberto Exp roberto $
3** Lua virtual machine 3** Lua virtual machine
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -38,12 +38,15 @@
38 38
39 39
40/* 40/*
41** Similar to 'tonumber', but does not attempt to convert strings. 41** Similar to 'tonumber', but does not attempt to convert strings and
42** Used in comparisons. 42** ensure correct precision (no extra bits). Used in comparisons.
43*/ 43*/
44static int tofloat (const TValue *obj, lua_Number *n) { 44static int tofloat (const TValue *obj, lua_Number *n) {
45 if (ttisfloat(obj)) *n = fltvalue(obj); 45 if (ttisfloat(obj)) *n = fltvalue(obj);
46 else if (ttisinteger(obj)) *n = cast_num(ivalue(obj)); 46 else if (ttisinteger(obj)) {
47 volatile lua_Number x = cast_num(ivalue(obj)); /* avoid extra precision */
48 *n = x;
49 }
47 else { 50 else {
48 *n = 0; /* to avoid warnings */ 51 *n = 0; /* to avoid warnings */
49 return 0; 52 return 0;