1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-08 10:04:21 +03:00

Fix and test case for Mantis bug 2084

This commit is contained in:
Graham Nelson 2022-04-07 10:56:26 +01:00
parent 45b53fca22
commit 6a6aa005ce

View file

@ -586,6 +586,15 @@ void Understand::property_block(property *pr, int level, inference_subject *subj
(Str::len(RTKindConstructors::get_recognition_only_GPR(ValueProperties::kind(pr))) == 0) && (Str::len(RTKindConstructors::get_recognition_only_GPR(ValueProperties::kind(pr))) == 0) &&
((Kinds::Behaviour::is_object(ValueProperties::kind(pr))) || ((Kinds::Behaviour::is_object(ValueProperties::kind(pr))) ||
(RTKindConstructors::request_I6_GPR(ValueProperties::kind(pr)) == FALSE))) { (RTKindConstructors::request_I6_GPR(ValueProperties::kind(pr)) == FALSE))) {
if (Kinds::Behaviour::is_object(ValueProperties::kind(pr)))
StandardProblems::sentence_problem(Task::syntax_tree(),
_p_(PM_ThingReferringProperty),
"the value of that property is itself a kind of object",
"so that it cannot be understand as describing or referring to "
"something. I can understand either/or properties, properties "
"with a limited list of named possible values, numbers, times "
"of day, or units.");
else
StandardProblems::sentence_problem(Task::syntax_tree(), StandardProblems::sentence_problem(Task::syntax_tree(),
_p_(PM_BadReferringProperty), _p_(PM_BadReferringProperty),
"that property is of a kind which I can't recognise in " "that property is of a kind which I can't recognise in "