浏览代码

* fixed test.

git-svn-id: trunk@7748 -
yury 18 年之前
父节点
当前提交
be65e77702
共有 1 个文件被更改,包括 1 次插入1 次删除
  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...');