From 335231112419f1fbdcb2007b2d5fa7121cf4c162 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 19 Nov 2017 18:05:16 +0000
Subject: [PATCH] * disable test on avr as it works only with table driven
 init/final code

git-svn-id: trunk@37605 -
---
 tests/test/tunit1.pp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/tests/test/tunit1.pp b/tests/test/tunit1.pp
index 709a24f643..b8b5145a9a 100644
--- a/tests/test/tunit1.pp
+++ b/tests/test/tunit1.pp
@@ -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
    erroru,uunit1;
 
@@ -5,3 +11,4 @@ begin
    if testvar<>1234567 then
      do_error(1000);
 end.
+{$endif CPUAVR}
\ No newline at end of file