aboutsummaryrefslogtreecommitdiff
path: root/lobject.c
diff options
context:
space:
mode:
Diffstat (limited to 'lobject.c')
-rw-r--r--lobject.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/lobject.c b/lobject.c
index be3236f5..e866c25c 100644
--- a/lobject.c
+++ b/lobject.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lobject.c,v 2.18 2005/08/01 04:22:23 roberto Exp roberto $ 2** $Id: lobject.c,v 2.19 2005/10/24 17:37:52 roberto Exp roberto $
3** Some generic functions over Lua objects 3** Some generic functions over Lua objects
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -39,7 +39,7 @@ int luaO_int2fb (unsigned int x) {
39 e++; 39 e++;
40 } 40 }
41 if (x < 8) return x; 41 if (x < 8) return x;
42 else return ((e+1) << 3) | (cast(int, x) - 8); 42 else return ((e+1) << 3) | (cast_int(x) - 8);
43} 43}
44 44
45 45
@@ -129,12 +129,12 @@ const char *luaO_pushvfstring (lua_State *L, const char *fmt, va_list argp) {
129 break; 129 break;
130 } 130 }
131 case 'd': { 131 case 'd': {
132 setnvalue(L->top, cast(lua_Number, va_arg(argp, int))); 132 setnvalue(L->top, cast_num(va_arg(argp, int)));
133 incr_top(L); 133 incr_top(L);
134 break; 134 break;
135 } 135 }
136 case 'f': { 136 case 'f': {
137 setnvalue(L->top, cast(lua_Number, va_arg(argp, l_uacNumber))); 137 setnvalue(L->top, cast_num(va_arg(argp, l_uacNumber)));
138 incr_top(L); 138 incr_top(L);
139 break; 139 break;
140 } 140 }
@@ -161,7 +161,7 @@ const char *luaO_pushvfstring (lua_State *L, const char *fmt, va_list argp) {
161 fmt = e+2; 161 fmt = e+2;
162 } 162 }
163 pushstr(L, fmt); 163 pushstr(L, fmt);
164 luaV_concat(L, n+1, cast(int, L->top - L->base) - 1); 164 luaV_concat(L, n+1, cast_int(L->top - L->base) - 1);
165 L->top -= n; 165 L->top -= n;
166 return svalue(L->top - 1); 166 return svalue(L->top - 1);
167} 167}