From e48dd540cc85823f8e33ad2195eef691f6515903 Mon Sep 17 00:00:00 2001
From: Eugene Sandulenko
Date: Fri, 17 Feb 2017 18:39:39 +0100
Subject: DIRECTOR: Added Events debug channel, more debug output in Lingo

---
 engines/director/director.cpp    | 1 +
 engines/director/director.h      | 3 ++-
 engines/director/lingo/lingo.cpp | 2 ++
 3 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/engines/director/director.cpp b/engines/director/director.cpp
index f26d873eff..89c8aefa44 100644
--- a/engines/director/director.cpp
+++ b/engines/director/director.cpp
@@ -45,6 +45,7 @@ DirectorEngine::DirectorEngine(OSystem *syst, const DirectorGameDescription *gam
 	DebugMan.addDebugChannel(kDebugLoading, "loading", "Loading");
 	DebugMan.addDebugChannel(kDebugImages, "images", "Image drawing");
 	DebugMan.addDebugChannel(kDebugText, "text", "Text rendering");
+	DebugMan.addDebugChannel(kDebugEvents, "events", "Event processing");
 
 	g_director = this;
 
diff --git a/engines/director/director.h b/engines/director/director.h
index eeb9c6b8d5..805a51c610 100644
--- a/engines/director/director.h
+++ b/engines/director/director.h
@@ -57,7 +57,8 @@ enum {
 	kDebugLingoCompile	= 1 << 1,
 	kDebugLoading		= 1 << 2,
 	kDebugImages		= 1 << 3,
-	kDebugText			= 1 << 4
+	kDebugText			= 1 << 4,
+	kDebugEvents		= 1 << 5
 };
 
 extern byte defaultPalette[768];
diff --git a/engines/director/lingo/lingo.cpp b/engines/director/lingo/lingo.cpp
index d3132f93e5..7639e6a607 100644
--- a/engines/director/lingo/lingo.cpp
+++ b/engines/director/lingo/lingo.cpp
@@ -294,6 +294,8 @@ void Lingo::processEvent(LEvent event, ScriptType st, int entityId) {
 	if (entityId <= 0)
 		return;
 
+	debugC(1, kDebugEvents, "Lingo::processEvent(%s, %d, %d)", _eventHandlerTypes[event], st, entityId);
+
 	_currentEntityId = entityId;
 
 	if (!_eventHandlerTypes.contains(event))
-- 
cgit v1.2.3