Mercurial > lcfOS
diff python/ide/testproject/test.mod @ 62:fd7d5069734e
Rename application to python
author | windel |
---|---|
date | Sun, 07 Oct 2012 16:56:50 +0200 |
parents | applications/ide/testproject/test.mod@600f48b74799 |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/python/ide/testproject/test.mod Sun Oct 07 16:56:50 2012 +0200 @@ -0,0 +1,25 @@ +module test; +var + a,b,c : integer; + +procedure test(x:integer); + var y,z:integer; +begin + y := x * 3 + 2; + z := x + y + a; +end test; + +procedure add(a:integer; b:integer):integer; + var + tmp : integer; + begin + tmp := a + b; + return tmp + end add; + +begin + a := 12; + b := a * 12 + 33; + c := a div b + a * b * 99; +end test. +