13 lines
302 B
Text
13 lines
302 B
Text
global gvar # a global
|
|
|
|
procedure main(arglist) # arglist is a parameter of main
|
|
local a,b,i,x # a, b, i, x are locals withing main
|
|
static y # a static (silly in main)
|
|
|
|
x := arglist[1]
|
|
a := 1.0
|
|
i := 10
|
|
b := [x,a,i,b]
|
|
|
|
# ... rest of program
|
|
end
|