@@ -3,18 +3,7 @@
PROGRAM SparcTest;
VAR
x,y:Cardinal;
- z:0..255;
-FUNCTION CopyMe(x:Cardinal):Cardinal;
- BEGIN
- CopyMe:=x;
- END;
-FUNCTION Add(a,b:Cardinal):Cardinal;
- Add:=a+b;
BEGIN
y:=0;
z:=0;
- x:=1+y;
- x:=Add(x,y);
END.