浏览代码

* fixed test

peter 21 年之前
父节点
当前提交
4bf5d00746
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      tests/webtbs/tw3109.pp

+ 1 - 1
tests/webtbs/tw3109.pp

@@ -4,7 +4,7 @@ var
   q : cardinal;
 begin
   l:=1;
-{$if sizeof(l)=3}
+{$if sizeof(l)=2}
   l:=2;
 {$endif}
   if l<>2 then