diff options
Diffstat (limited to 'lvm.c')
-rw-r--r-- | lvm.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lvm.c,v 1.14 1997/11/19 17:29:23 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.15 1997/11/21 19:00:46 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 | */ |
@@ -213,7 +213,7 @@ static void call_binTM (IMS event, char *msg) | |||
213 | 213 | ||
214 | static void call_arith (IMS event) | 214 | static void call_arith (IMS event) |
215 | { | 215 | { |
216 | call_binTM(event, "unexpected type at arithmetic operation"); | 216 | call_binTM(event, "unexpected type in arithmetic operation"); |
217 | } | 217 | } |
218 | 218 | ||
219 | 219 | ||
@@ -229,7 +229,7 @@ static void comparison (lua_Type ttype_less, lua_Type ttype_equal, | |||
229 | else if (ttype(l) == LUA_T_STRING && ttype(r) == LUA_T_STRING) | 229 | else if (ttype(l) == LUA_T_STRING && ttype(r) == LUA_T_STRING) |
230 | result = strcoll(svalue(l), svalue(r)); | 230 | result = strcoll(svalue(l), svalue(r)); |
231 | else { | 231 | else { |
232 | call_binTM(op, "unexpected type at comparison"); | 232 | call_binTM(op, "unexpected type in comparison"); |
233 | return; | 233 | return; |
234 | } | 234 | } |
235 | S->top--; | 235 | S->top--; |