DIRECTOR: Add c_constpush

1 files changed, 9 insertions, 0 deletions

diff --git a/engines/director/lingo/lingo-code.cpp b/engines/director/lingo/lingo-code.cpp
index 5bab70c543..ff9ae2428a 100644
--- a/engines/director/lingo/lingo-code.cpp
+++ b/engines/director/lingo/lingo-code.cpp
@@ -65,6 +65,7 @@ static struct FuncDescr {
 	{ Lingo::c_floatpush,	"c_floatpush",	"f" },
 	{ Lingo::c_stringpush,	"c_stringpush",	"s" },
 	{ Lingo::c_symbolpush,	"c_symbolpush",	"s" },	// D3
+	{ Lingo::c_constpush,	"c_constpush",	"i" },
 	{ Lingo::c_varpush,		"c_varpush",	"s" },
 	{ Lingo::c_setImmediate,"c_setImmediate","i" },
 	{ Lingo::c_assign,		"c_assign",		"" },
@@ -249,6 +250,14 @@ void Lingo::c_symbolpush() {
 	g_lingo->push(Datum(new Common::String(s)));
 }
 
+void Lingo::c_constpush() {
+	Datum d;
+	inst in = (*g_lingo->_currentScript)[g_lingo->_pc++];
+	int i = READ_UINT32(&in);
+	d = g_lingo->_currentScriptContext->constants[i];
+	g_lingo->push(d);
+}
+
 void Lingo::c_argspush() {
 	Datum d;
 	inst v = (*g_lingo->_currentScript)[g_lingo->_pc++];