Explorar el Código

* fixed test.

git-svn-id: trunk@7748 -
yury hace 18 años
padre
commit
be65e77702
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      tests/test/cg/tcalext.pp

+ 1 - 1
tests/test/cg/tcalext.pp

@@ -512,12 +512,12 @@ begin
     failed := true;
   if global_u8bit <> RESULT_U8BIT then
     failed := true;
+{$endif FPC_HAS_TYPE_EXTENDED}
 
   If failed then
    fail
   else
     WriteLn('Passed!');
-{$endif FPC_HAS_TYPE_EXTENDED}
 
   Write('External struct parameter testing...');