Skip to content
Permalink
Browse files

DIRECTOR: LINGO: Implemented passing 'me' as an object reference

  • Loading branch information
sev- committed Dec 2, 2019
1 parent 07e615c commit 823e7c856960faf5dd3ed409a179aea0ec22f2d2
@@ -1241,6 +1241,18 @@ void Lingo::c_instance() {
warning("STUB: c_instance(%s)", name.c_str());
}

void Lingo::c_factory() {
Common::String name(g_lingo->readString());
Datum d;

warning("STUB: c_factory(%s)", name.c_str());

d.type = OBJECT;
d.u.s = new Common::String(name);

g_lingo->push(d);
}

void Lingo::c_open() {
Datum d2 = g_lingo->pop();
Datum d1 = g_lingo->pop();
@@ -358,6 +358,14 @@ int Lingo::codeFunc(Common::String *s, int numpar) {
}

int Lingo::codeMe(Common::String *method, int numpar) {
// Check if need to encode reference to the factory
if (method == nullptr) {
int ret = g_lingo->code1(g_lingo->c_factory);
g_lingo->codeString(g_lingo->_currentFactory.c_str());

return ret;
}

int ret = g_lingo->code1(g_lingo->c_call);

Common::String m(g_lingo->_currentFactory);

0 comments on commit 823e7c8

Please sign in to comment.
You can’t perform that action at this time.