mirror of
https://github.com/vishapoberon/oberonbyexample.git
synced 2026-04-06 05:12:25 +00:00
No need for these ob2 files anymore
This commit is contained in:
parent
fed6fad453
commit
e60f8acb9f
21 changed files with 0 additions and 601 deletions
|
|
@ -1,24 +0,0 @@
|
|||
MODULE varparam;
|
||||
|
||||
|
||||
IMPORT Out;
|
||||
|
||||
|
||||
VAR a, b : INTEGER;
|
||||
|
||||
|
||||
PROCEDURE swapVals(VAR x, y : INTEGER);
|
||||
VAR tmp : INTEGER;
|
||||
BEGIN
|
||||
tmp := x; x := y; y := tmp;
|
||||
END swapVals;
|
||||
|
||||
|
||||
BEGIN
|
||||
a := 6; b := 9;
|
||||
Out.String("initial "); Out.Ln;
|
||||
Out.String("a : "); Out.Int(a, 0); Out.String("; b : "); Out.Int(b, 0); Out.Ln;
|
||||
swapVals(a, b);
|
||||
Out.String("after swap"); Out.Ln;
|
||||
Out.String("a : "); Out.Int(a, 0); Out.String("; b : "); Out.Int(b, 0); Out.Ln;
|
||||
END varparam.
|
||||
Loading…
Add table
Add a link
Reference in a new issue