DIRECTOR: Lingo: Added printing func

scummvm · Aug 3, 2016 · 76282dc · 76282dc
1 parent a5b69ca
commit 76282dc
Show file tree

Hide file tree

Showing 5 changed files with 167 additions and 112 deletions.
diff --git a/engines/director/lingo/lingo-funcs.cpp b/engines/director/lingo/lingo-funcs.cpp
@@ -179,6 +179,16 @@ Datum Lingo::pop(void) {
 	return ret;
 }
 
+void Lingo::func_xpop() {
+	g_lingo->pop();
+}
+
+void Lingo::func_printtop(void) {
+	Datum d = g_lingo->pop();
+
+	warning("%d\n", d.val);
+}
+
 void Lingo::func_constpush() {
 	Datum d;
 	d.val = ((Symbol *)*g_lingo->_pc++)->u.val;