Jelajahi Sumber

* fixed test

peter 21 tahun lalu
induk
melakukan
4bf5d00746
1 mengubah file dengan 1 tambahan dan 1 penghapusan
  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