aboutsummaryrefslogtreecommitdiff
path: root/engines/director/director.cpp
diff options
context:
space:
mode:
authorEugene Sandulenko2016-06-21 18:46:22 +0200
committerEugene Sandulenko2016-08-03 23:40:36 +0200
commitad9e2fd0e5aa02f5d2ff08034a40f220c604c3cf (patch)
tree561cbe159558cdedbd3a04d4fd8371f48dcf258a /engines/director/director.cpp
parentdb8e68c6b68373a0e8de4c5641485814d8777e82 (diff)
downloadscummvm-rg350-ad9e2fd0e5aa02f5d2ff08034a40f220c604c3cf.tar.gz
scummvm-rg350-ad9e2fd0e5aa02f5d2ff08034a40f220c604c3cf.tar.bz2
scummvm-rg350-ad9e2fd0e5aa02f5d2ff08034a40f220c604c3cf.zip
DIRECTOR: Lingo: Fix subexpressions
Diffstat (limited to 'engines/director/director.cpp')
-rw-r--r--engines/director/director.cpp8
1 files changed, 7 insertions, 1 deletions
diff --git a/engines/director/director.cpp b/engines/director/director.cpp
index dd1433b95e..9a5fbabd3e 100644
--- a/engines/director/director.cpp
+++ b/engines/director/director.cpp
@@ -91,7 +91,13 @@ if (x = 5) then\n\
else\n\
set x = 8\n\
end if\n\
-put x", kMovieScript, 3);
+put x\n\
+set y = 1\n\
+repeat while (y < 5)\n\
+ set y = y + 1\n\
+ put y\n\
+end repeat\n\
+", kMovieScript, 3);
_lingo->executeScript(kMovieScript, 3);