浏览代码

* break tgeneric10 again :)

git-svn-id: trunk@5341 -
micha 19 年之前
父节点
当前提交
951eddfd85
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      tests/test/tgeneric10.pp

+ 1 - 1
tests/test/tgeneric10.pp

@@ -17,7 +17,7 @@ begin
     halt(1);
     halt(1);
 end;
 end;
 
 
-function CompareInt(const Item1, Item2: Integer): Integer;
+function CompareInt(Item1, Item2: Integer): Integer;
 begin
 begin
   Result := Item2 - Item1;
   Result := Item2 - Item1;
 end;
 end;