[Scummvm-cvs-logs] CVS: residual lua.cpp,1.8,1.9
Daniel Schepler
dschepler at users.sourceforge.net
Tue Aug 19 20:47:27 CEST 2003
Update of /cvsroot/scummvm/residual
In directory sc8-pr-cvs1:/tmp/cvs-serv13531
Modified Files:
lua.cpp
Log Message:
Improve stub debugging info for userdata.
Index: lua.cpp
===================================================================
RCS file: /cvsroot/scummvm/residual/lua.cpp,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- lua.cpp 19 Aug 2003 12:27:17 -0000 1.8
+++ lua.cpp 19 Aug 2003 23:46:16 -0000 1.9
@@ -651,8 +651,23 @@
fprintf(stderr, "nil");
else if (lua_istable(lua_getparam(i)))
fprintf(stderr, "{...}");
- else if (lua_isuserdata(lua_getparam(i)))
- fprintf(stderr, "<userdata %p>", lua_getuserdata(lua_getparam(i)));
+ else if (lua_isuserdata(lua_getparam(i))) {
+ if (lua_tag(lua_getparam(i)) == actor_tag) {
+ Actor *a = check_actor(i);
+ fprintf(stderr, "<actor \"%s\">", a->name());
+ }
+ else if (lua_tag(lua_getparam(i)) == color_tag) {
+ Color *c = check_color(i);
+ fprintf(stderr, "<color #%02x%02x%02x>",
+ c->red(), c->green(), c->blue());
+ }
+ else if (lua_tag(lua_getparam(i)) == sound_tag) {
+ Sound *s = check_sound(i);
+ fprintf(stderr, "<sound %s>", s->filename());
+ }
+ else
+ fprintf(stderr, "<userdata %p>", lua_getuserdata(lua_getparam(i)));
+ }
else if (lua_isfunction(lua_getparam(i)))
fprintf(stderr, "<function>");
else if (lua_isnumber(lua_getparam(i)))
More information about the Scummvm-git-logs
mailing list