diff options
-rw-r--r-- | engines/director/lingo/lingo-builtins.cpp | 4 | ||||
-rw-r--r-- | engines/director/lingo/lingo-code.cpp | 3 | ||||
-rw-r--r-- | engines/director/lingo/lingo.h | 2 |
3 files changed, 6 insertions, 3 deletions
diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp index 9a741edfef..f554f43cd8 100644 --- a/engines/director/lingo/lingo-builtins.cpp +++ b/engines/director/lingo/lingo-builtins.cpp @@ -362,7 +362,7 @@ void Lingo::initBuiltIns() { } } -void Lingo::printSTUBWithArglist(const char *funcname, int nargs) { +void Lingo::printSTUBWithArglist(const char *funcname, int nargs, const char *prefix) { Common::String s(funcname); s += '('; @@ -379,7 +379,7 @@ void Lingo::printSTUBWithArglist(const char *funcname, int nargs) { s += ")"; - warning("STUB: %s", s.c_str()); + warning("%s: %s", prefix, s.c_str()); } void Lingo::convertVOIDtoString(int arg, int nargs) { diff --git a/engines/director/lingo/lingo-code.cpp b/engines/director/lingo/lingo-code.cpp index 96f2b72158..7bc82eddcf 100644 --- a/engines/director/lingo/lingo-code.cpp +++ b/engines/director/lingo/lingo-code.cpp @@ -1023,6 +1023,9 @@ void Lingo::c_call() { void Lingo::call(Common::String name, int nargs) { bool dropArgs = false; + if (debugChannelSet(3, kDebugLingoExec)) + printSTUBWithArglist(name.c_str(), nargs, "call:"); + Symbol *sym = g_lingo->getHandler(name); if (!g_lingo->_eventHandlerTypeIds.contains(name)) { diff --git a/engines/director/lingo/lingo.h b/engines/director/lingo/lingo.h index 1e84344cdb..8475905690 100644 --- a/engines/director/lingo/lingo.h +++ b/engines/director/lingo/lingo.h @@ -314,7 +314,7 @@ public: static void c_open(); - void printSTUBWithArglist(const char *funcname, int nargs); + void printSTUBWithArglist(const char *funcname, int nargs, const char *prefix = "STUB:"); void convertVOIDtoString(int arg, int nargs); void dropStack(int nargs); void drop(uint num); |