aboutsummaryrefslogtreecommitdiff
path: root/engines/director/lingo/lingo-the.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'engines/director/lingo/lingo-the.cpp')
-rw-r--r--engines/director/lingo/lingo-the.cpp4
1 files changed, 4 insertions, 0 deletions
diff --git a/engines/director/lingo/lingo-the.cpp b/engines/director/lingo/lingo-the.cpp
index 13471fde6a..a8633f1765 100644
--- a/engines/director/lingo/lingo-the.cpp
+++ b/engines/director/lingo/lingo-the.cpp
@@ -427,6 +427,10 @@ Datum Lingo::getTheEntity(int entity, Datum &id, int field) {
d.type = INT;
d.u.i = _vm->_machineType;
break;
+ case kTheFrame:
+ d.type = INT;
+ d.u.i = _vm->getCurrentScore()->getCurrentFrame();
+ break;
default:
warning("Unprocessed getting field %d of entity %d", field, entity);
d.type = VOID;