소스 검색

* removed function to make focus on main prog parms

mazen 22 년 전
부모
커밋
22a60095c9
1개의 변경된 파일0개의 추가작업 그리고 11개의 파일을 삭제
  1. 0 11
      tests/sparc/test0001.pas

+ 0 - 11
tests/sparc/test0001.pas

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