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