瀏覽代碼

* 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