← Back to branch summary

~ubuntu-branches/debian/squeeze/openttd/squeeze

« back to all changes in this revision

Viewing changes to src/3rdparty/squirrel/samples/coroutines.nut

  • Committer: Bazaar Package Importer
  • Author(s): Jordi Mallach, Matthijs Kooijman, Jordi Mallach
  • Date: 2009-04-15 18:22:10 UTC
  • mfrom: (1.1.6 upstream) (2.1.3 squeeze)
  • Revision ID: james.westby@ubuntu.com-20090415182210-22ktb8kdbp2tf3bm
[ Matthijs Kooijman ]
* New upstream release.
* Remove Debian specific desktop file, upstream provides one now. 
* Add debian/watch file.

[ Jordi Mallach ]
* Bump Standards-Version to 3.8.1, with no changes required.
* Move to debhelper compat 7. Bump Build-Depends accordingly.
* Use dh_prep.
* Add "set -e" to config script.
* Remove a few extra doc files that get installed by upstream Makefile.
* Add more complete copyright information.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/3rdparty/squirrel/samples/coroutines.nut
 
1
function coroutine_test(a,b)
 
2
{
 
3
        ::print(a+" "+b+"\n");
 
4
        local ret = ::suspend("suspend 1");
 
5
        ::print("the coroutine says "+ret+"\n");
 
6
        ret = ::suspend("suspend 2");
 
7
        ::print("the coroutine says "+ret+"\n");
 
8
        ret = ::suspend("suspend 3");
 
9
        ::print("the coroutine says "+ret+"\n");
 
10
        return "I'm done"
 
11
}
 
12
 
 
13
local coro = ::newthread(coroutine_test);
 
14
 
 
15
local susparam = coro.call("test","coroutine"); //starts the coroutine
 
16
 
 
17
local i = 1;
 
18
do
 
19
{
 
20
        ::print("suspend passed ["+susparam+"]\n")
 
21
        susparam = coro.wakeup("ciao "+i);
 
22
        ++i;
 
23
}while(coro.getstatus()=="suspended")
 
24
 
 
25
::print("return passed ["+susparam+"]\n")