diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-01-04 11:37:07 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-01-04 11:37:07 -0200 |
commit | 63a752f961dc8b6ced4f398c7d4cafdfc2a6b9f0 (patch) | |
tree | 9f9a2b645c51a41a1cd8dc4f31d09e45bc8012fa /lobject.c | |
parent | 03d38b66fd60209f9e5219fac2429d762417723d (diff) | |
download | lua-63a752f961dc8b6ced4f398c7d4cafdfc2a6b9f0.tar.gz lua-63a752f961dc8b6ced4f398c7d4cafdfc2a6b9f0.tar.bz2 lua-63a752f961dc8b6ced4f398c7d4cafdfc2a6b9f0.zip |
small improvements.
Diffstat (limited to 'lobject.c')
-rw-r--r-- | lobject.c | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lobject.c,v 1.13 1998/06/19 16:14:09 roberto Exp $ | 2 | ** $Id: lobject.c,v 1.14 1998/12/27 20:25:20 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 | */ |
@@ -40,9 +40,7 @@ int luaO_redimension (int oldsize) | |||
40 | } | 40 | } |
41 | 41 | ||
42 | 42 | ||
43 | int luaO_equalObj (TObject *t1, TObject *t2) | 43 | int luaO_equalval (TObject *t1, TObject *t2) { |
44 | { | ||
45 | if (ttype(t1) != ttype(t2)) return 0; | ||
46 | switch (ttype(t1)) { | 44 | switch (ttype(t1)) { |
47 | case LUA_T_NIL: return 1; | 45 | case LUA_T_NIL: return 1; |
48 | case LUA_T_NUMBER: return nvalue(t1) == nvalue(t2); | 46 | case LUA_T_NUMBER: return nvalue(t1) == nvalue(t2); |