libretro/scummvm
1
0
Fork 0
mirror of https://github.com/libretro/scummvm.git synced 2025-02-13 23:43:34 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

DIRECTOR: LINGO: Support nested chunks in readChunkRef

Browse Source
This commit is contained in:
djsrv 2021-06-25 01:16:41 -04:00
parent a3537bd5df
commit b4a7d4bdff
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
engines/director/lingo/lingo-code.cpp
View File

@ -1012,16 +1012,17 @@ Datum LC::readChunkRef(const Datum &src) {
Datum lastChar = g_lingo->pop();
Datum firstChar = g_lingo->pop();
if (firstChar.asInt() != 0)
return LC::chunkRef(kChunkChar, firstChar.asInt(), lastChar.asInt(), src);
if (firstWord.asInt() != 0)
return LC::chunkRef(kChunkWord, firstWord.asInt(), lastWord.asInt(), src);
if (firstItem.asInt() != 0)
return LC::chunkRef(kChunkItem, firstItem.asInt(), lastItem.asInt(), src);
Datum ref = src;
if (firstLine.asInt() != 0)
return LC::chunkRef(kChunkLine, firstLine.asInt(), lastLine.asInt(), src);
ref = LC::chunkRef(kChunkLine, firstLine.asInt(), lastLine.asInt(), ref);
if (firstItem.asInt() != 0)
ref = LC::chunkRef(kChunkItem, firstItem.asInt(), lastItem.asInt(), ref);
if (firstWord.asInt() != 0)
ref = LC::chunkRef(kChunkWord, firstWord.asInt(), lastWord.asInt(), ref);
if (firstChar.asInt() != 0)
ref = LC::chunkRef(kChunkChar, firstChar.asInt(), lastChar.asInt(), ref);
return src;
return ref;
}
void LC::c_of() {