peter 21 лет назад
Родитель
Сommit
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