diff options
Diffstat (limited to 'lobject.c')
| -rw-r--r-- | lobject.c | 8 |
1 files changed, 3 insertions, 5 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lobject.c,v 1.34 2000/03/27 20:10:21 roberto Exp roberto $ | 2 | ** $Id: lobject.c,v 1.35 2000/03/29 20:19: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 | */ |
| @@ -42,11 +42,9 @@ int luaO_equalval (const TObject *t1, const TObject *t2) { | |||
| 42 | return avalue(t1) == avalue(t2); | 42 | return avalue(t1) == avalue(t2); |
| 43 | case TAG_CCLOSURE: case TAG_LCLOSURE: | 43 | case TAG_CCLOSURE: case TAG_LCLOSURE: |
| 44 | return clvalue(t1) == clvalue(t2); | 44 | return clvalue(t1) == clvalue(t2); |
| 45 | case TAG_NIL: | ||
| 46 | return 1; | ||
| 47 | default: | 45 | default: |
| 48 | LUA_INTERNALERROR(L, "invalid type"); | 46 | LUA_ASSERT(L, ttype(t1) == TAG_NIL, "invalid type"); |
| 49 | return 0; /* UNREACHABLE */ | 47 | return 1; /* TAG_NIL */ |
| 50 | } | 48 | } |
| 51 | } | 49 | } |
| 52 | 50 | ||