DIRECTOR: LINGO: implement put ... after chunkexpr

The D4 lingo `put ... after chunkexpr` uses opcode 34 (0x22) for
cb_v4assign.
We convert the SYMBOL to a VAR due to cb_objectpush pushing
variables as SYMBOLS to the stack.
This commit is contained in:
Roland van Laar 2020-08-18 16:06:17 +02:00
parent 97262c9d9d
commit f071de48a3

View File

@ -412,6 +412,17 @@ void LC::cb_v4assign() {
LC::c_assign();
}
break;
case 0x22:
// put value after chunkExpression
{
Datum chunkExpr = g_lingo->pop();
if (chunkExpr.type == SYMBOL) {
chunkExpr.type = VAR;
}
g_lingo->push(chunkExpr);
LC::c_putafter();
}
break;
case 0x26:
// put value after field textVar
{