diff options
author | Yexo <yexo@openttd.org> | 2009-01-23 10:30:50 +0000 |
---|---|---|
committer | Yexo <yexo@openttd.org> | 2009-01-23 10:30:50 +0000 |
commit | decd0c51e45f0cddfd03e83db5a3b9d460694546 (patch) | |
tree | cb8cf362cfd5fc6a3d8063a143f7e7e6fdca8de3 | |
parent | 8382b76b0fe9a2b51fd63a831cfbe36117ac4429 (diff) | |
download | openttd-decd0c51e45f0cddfd03e83db5a3b9d460694546.tar.xz |
(svn r15222) -Fix: The squirrel stack was corrupted if an AI called any C++ function during Save().
-rw-r--r-- | src/script/squirrel.cpp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/script/squirrel.cpp b/src/script/squirrel.cpp index aa3344ea2..26196292c 100644 --- a/src/script/squirrel.cpp +++ b/src/script/squirrel.cpp @@ -177,6 +177,10 @@ bool Squirrel::Resume(int suspend) bool Squirrel::CallMethod(HSQOBJECT instance, const char *method_name, HSQOBJECT *ret, int suspend) { + /* Store the stack-location for the return value. We need to + * restore this after saving or the stack will be corrupted + * if we're in the middle of a DoCommand. */ + SQInteger last_target = this->vm->_suspended_target; /* Store the current top */ int top = sq_gettop(this->vm); /* Go to the instance-root */ @@ -195,6 +199,8 @@ bool Squirrel::CallMethod(HSQOBJECT instance, const char *method_name, HSQOBJECT /* Reset the top, but don't do so for the AI main function, as we need * a correct stack when resuming. */ if (suspend == -1) sq_settop(this->vm, top); + /* Restore the return-value location. */ + this->vm->_suspended_target = last_target; return this->vm->_suspended != 0; } |