check-error ( game n error -- game n ? )


Vocabulary
hamurabi.private

Inputs
gamean object
nan object
erroran object


Outputs
gamean object
nan object
?an object


Definition


: check-error ( game n error -- game n ? )
{
{ "acres" [ over bad-acres t ] }
{ "stores" [ over bad-stores t ] }
{ "population" [ over bad-population t ] }
[ drop f ]
} case ;