From 635b7c707d146ab56127260601b6fb84c0c140f3 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 27 Jan 2003 11:00:43 -0200
Subject: details

---
 lobject.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lobject.c b/lobject.c
index 7eb68b7d..ebe2728f 100644
--- a/lobject.c
+++ b/lobject.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lobject.c,v 1.93 2002/11/21 15:16:04 roberto Exp roberto $
+** $Id: lobject.c,v 1.94 2002/12/04 17:38:31 roberto Exp roberto $
 ** Some generic functions over Lua objects
 ** See Copyright Notice in lua.h
 */
@@ -59,19 +59,19 @@ int luaO_log2 (unsigned int x) {
 
 int luaO_rawequalObj (const TObject *t1, const TObject *t2) {
   if (ttype(t1) != ttype(t2)) return 0;
-  if (iscollectable(t1)) return gcvalue(t1) == gcvalue(t2);
   else switch (ttype(t1)) {
     case LUA_TNIL:
       return 1;
+    case LUA_TNUMBER:
+      return nvalue(t1) == nvalue(t2);
     case LUA_TBOOLEAN:
       return bvalue(t1) == bvalue(t2);  /* boolean true must be 1 !! */
     case LUA_TLIGHTUSERDATA:
       return pvalue(t1) == pvalue(t2);
-    case LUA_TNUMBER:
-      return nvalue(t1) == nvalue(t2);
+    default:
+      lua_assert(iscollectable(t1));
+      return gcvalue(t1) == gcvalue(t2);
   }
-  lua_assert(0);
-  return 0;  /* to avoid warnings */
 }
 
 
-- 
cgit v1.2.3-55-g6feb