aboutsummaryrefslogtreecommitdiff
path: root/engines/director/lingo/lingo-codegen.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'engines/director/lingo/lingo-codegen.cpp')
-rw-r--r--engines/director/lingo/lingo-codegen.cpp10
1 files changed, 10 insertions, 0 deletions
diff --git a/engines/director/lingo/lingo-codegen.cpp b/engines/director/lingo/lingo-codegen.cpp
index 16c8a1848f..84557650fd 100644
--- a/engines/director/lingo/lingo-codegen.cpp
+++ b/engines/director/lingo/lingo-codegen.cpp
@@ -58,6 +58,11 @@ void Lingo::execute(uint pc) {
if (debugChannelSet(5, kDebugLingoExec))
printStack("Stack before: ", current);
+ if (debugChannelSet(9, kDebugLingoExec)) {
+ debug("Vars after");
+ printAllVars();
+ }
+
debugC(1, kDebugLingoExec, "[%3d]: %s", current, instr.c_str());
_pc++;
@@ -66,6 +71,11 @@ void Lingo::execute(uint pc) {
if (debugChannelSet(5, kDebugLingoExec))
printStack("Stack after: ", current);
+ if (debugChannelSet(9, kDebugLingoExec)) {
+ debug("Vars after");
+ printAllVars();
+ }
+
if (_pc >= (*_currentScript).size()) {
warning("Lingo::execute(): Bad PC (%d)", _pc);
break;