new macros to distinguish different types of object moves (for future GC

evolution).

ltests.c

@@ -1,5 +1,5 @@
 /*
-** $Id: ltests.c,v 1.138 2002/10/25 20:05:28 roberto Exp roberto $
+** $Id: ltests.c,v 1.139 2002/10/25 21:29:20 roberto Exp roberto $
 ** Internal Module for Debugging of the Lua Implementation
 ** See Copyright Notice in lua.h
 */
@@ -326,7 +326,7 @@ static int string_query (lua_State *L) {
     GCObject *ts;
     int n = 0;
     for (ts = tb->hash[s]; ts; ts = ts->gch.next) {
-      setsvalue(L->top, &ts->ts);
+      setsvalue2s(L->top, &ts->ts);
       incr_top(L);
       n++;
     }