paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 03:29:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

* disable test on avr as it works only with table driven init/final code

Browse Source 
git-svn-id: trunk@37605 -
This commit is contained in:
florian 2017-11-19 18:05:16 +00:00
parent ad01f059e8
commit 3352311124
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
tests/test/tunit1.pp
View File

@ -1,3 +1,9 @@
{$ifdef CPUAVR}
{ avr uses instruction based init/finalization of units: this does not work if an error happens during finalization,
it results in an endless loop, so skip this test for avr }
begin
end.
{$else CPUAVR}
uses uses
erroru,uunit1; erroru,uunit1;
@ -5,3 +11,4 @@ begin
if testvar<>1234567 then if testvar<>1234567 then
do_error(1000); do_error(1000);
end. end.
{$endif CPUAVR}