[Scummvm-git-logs] scummvm master -> 86d249ffedca8a8c2a5397ce4d6eae1720c0676a

[sev-]

This automated email contains information about 1 new commit which have been
pushed to the 'scummvm' repo located at https://github.com/scummvm/scummvm .

Summary:
86d249ffed DIRECTOR: LINGO: Implement `the purgePriority`. We're not going to use it, though


Commit: 86d249ffedca8a8c2a5397ce4d6eae1720c0676a
    https://github.com/scummvm/scummvm/commit/86d249ffedca8a8c2a5397ce4d6eae1720c0676a
Author: Eugene Sandulenko (sev at scummvm.org)
Date: 2020-07-20T15:34:04+02:00

Commit Message:
DIRECTOR: LINGO: Implement `the purgePriority`. We're not going to use it, though

Changed paths:
    engines/director/castmember.cpp
    engines/director/castmember.h
    engines/director/lingo/lingo-the.cpp


diff --git a/engines/director/castmember.cpp b/engines/director/castmember.cpp
index 5bc7540936..aec256c04f 100644
--- a/engines/director/castmember.cpp
+++ b/engines/director/castmember.cpp
@@ -38,6 +38,7 @@ CastMember::CastMember(Cast* cast, uint16 castId) {
 	_widget = nullptr;
 	_hilite = false;
 	_autoHilite = false;
+	_purgePriority = 3;
 
 	_modified = true;
 }
diff --git a/engines/director/castmember.h b/engines/director/castmember.h
index 4af317fe84..61032c69d3 100644
--- a/engines/director/castmember.h
+++ b/engines/director/castmember.h
@@ -77,6 +77,7 @@ public:
 	bool _modified;
 	bool _hilite;
 	bool _autoHilite;
+	int _purgePriority;
 
 	Graphics::MacWidget *_widget;
 
diff --git a/engines/director/lingo/lingo-the.cpp b/engines/director/lingo/lingo-the.cpp
index dbf0867aa5..d907d62bbc 100644
--- a/engines/director/lingo/lingo-the.cpp
+++ b/engines/director/lingo/lingo-the.cpp
@@ -1501,7 +1501,7 @@ Datum Lingo::getTheCast(Datum &id1, int field) {
 		warning("STUB: Lingo::getTheCast(): Unprocessed getting field \"%s\" of cast %d", field2str(field), id);
 		break;
 	case kThePurgePriority:
-		warning("STUB: Lingo::getTheCast(): Unprocessed getting field \"%s\" of cast %d", field2str(field), id);
+		d.u.i = member->_purgePriority;
 		break;
 	case kTheScriptText:
 		if (castInfo)
@@ -1696,7 +1696,7 @@ void Lingo::setTheCast(Datum &id1, int field, Datum &d) {
 		warning("STUB: Lingo::setTheCast(): Unprocessed setting field \"%s\" of cast %d", field2str(field), id);
 		break;
 	case kThePurgePriority:
-		warning("STUB: Lingo::setTheCast(): Unprocessed setting field \"%s\" of cast %d", field2str(field), id);
+		member->_purgePriority = CLIP<int>(d.asInt(), 0, 3);
 		break;
 	case kTheScriptText:
 		if (!castInfo) {