Mercurial > lcfOS
view python/tests/testproject/main.mod @ 71:5351594349b0
Moved error to core
author | windel |
---|---|
date | Fri, 02 Nov 2012 14:05:00 +0100 |
parents | 32078200cdd6 |
children |
line wrap: on
line source
module main; 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 main.