From f96b571e389b8b5366017c35fc0bb9de69f8291d Mon Sep 17 00:00:00 2001
From: yury <jura@cp-lab.com>
Date: Thu, 6 Jul 2006 19:08:23 +0000
Subject: [PATCH] * skip some tests for wince.

git-svn-id: trunk@4110 -
---
 tests/tbs/tb0013.pp              | 2 ++
 tests/tbs/tb0107.pp              | 2 ++
 tests/tbs/tb0227.pp              | 2 ++
 tests/tbs/tb0301.pp              | 2 ++
 tests/test/units/dos/tfexpand.pp | 2 ++
 tests/webtbs/tu2002.pp           | 2 ++
 tests/webtbs/tw1152.pp           | 1 +
 tests/webtbs/tw1398.pp           | 2 +-
 tests/webtbs/tw1414.pp           | 1 +
 tests/webtbs/tw4043.pp           | 2 +-
 10 files changed, 16 insertions(+), 2 deletions(-)

diff --git a/tests/tbs/tb0013.pp b/tests/tbs/tb0013.pp
index 0bd3e8d3a0..15bbe6c7c9 100644
--- a/tests/tbs/tb0013.pp
+++ b/tests/tbs/tb0013.pp
@@ -1,6 +1,8 @@
 { Old file: tbs0016.pp }
 {  }
 
+{ %skiptarget=wince }
+
   uses
      crt;
 
diff --git a/tests/tbs/tb0107.pp b/tests/tbs/tb0107.pp
index 896c8b9ee3..d9ada1cba7 100644
--- a/tests/tbs/tb0107.pp
+++ b/tests/tbs/tb0107.pp
@@ -1,6 +1,8 @@
 { Old file: tbs0125.pp }
 { wrong colors with DOS CRT unit                        OK 0.99.6 (PFV) }
 
+{ %skiptarget=wince }
+
 uses
 crt;
 var
diff --git a/tests/tbs/tb0227.pp b/tests/tbs/tb0227.pp
index 30b1cca9ba..9df4c8a1cf 100644
--- a/tests/tbs/tb0227.pp
+++ b/tests/tbs/tb0227.pp
@@ -1,6 +1,8 @@
 { Old file: tbs0266.pp }
 { linux crt write cuts 256 char                        OK 0.99.13 (PFV) }
 
+{ %skiptarget=wince }
+
 PROGRAM t10;
 
 USES CRT;
diff --git a/tests/tbs/tb0301.pp b/tests/tbs/tb0301.pp
index 48c05b5e4c..35e2f7c2f2 100644
--- a/tests/tbs/tb0301.pp
+++ b/tests/tbs/tb0301.pp
@@ -1,3 +1,5 @@
+{ %skiptarget=wince }
+
 uses
    crt;
 
diff --git a/tests/test/units/dos/tfexpand.pp b/tests/test/units/dos/tfexpand.pp
index 829eea784a..583e1316b7 100644
--- a/tests/test/units/dos/tfexpand.pp
+++ b/tests/test/units/dos/tfexpand.pp
@@ -1,3 +1,5 @@
+{ %skiptarget=wince }
+
 {
     This file is part of the Free Pascal test suite.
     Copyright (c) 1999-2004 by the Free Pascal development team.
diff --git a/tests/webtbs/tu2002.pp b/tests/webtbs/tu2002.pp
index bbdaf103cf..3614045f1f 100644
--- a/tests/webtbs/tu2002.pp
+++ b/tests/webtbs/tu2002.pp
@@ -1,3 +1,5 @@
+{ %skiptarget=wince }
+
 unit {vidutil}tu2002;
  Interface
  uses
diff --git a/tests/webtbs/tw1152.pp b/tests/webtbs/tw1152.pp
index e76bc44033..be5cb19b96 100644
--- a/tests/webtbs/tw1152.pp
+++ b/tests/webtbs/tw1152.pp
@@ -1,4 +1,5 @@
 { %SKIPEMU=qemu-arm }
+{ %SKIPTARGET=wince }
 
 { Source provided for Free Pascal Bug Report 1152 }
 { Submitted by "Dirk Verwiebe" on  2000-09-30 }
diff --git a/tests/webtbs/tw1398.pp b/tests/webtbs/tw1398.pp
index 033ad69cb4..cdc16574fb 100644
--- a/tests/webtbs/tw1398.pp
+++ b/tests/webtbs/tw1398.pp
@@ -1,4 +1,4 @@
-{ %target=win32,wince }
+{ %target=win32 }
 
 uses Windows;
 
diff --git a/tests/webtbs/tw1414.pp b/tests/webtbs/tw1414.pp
index f198e6b534..7d4b107b41 100644
--- a/tests/webtbs/tw1414.pp
+++ b/tests/webtbs/tw1414.pp
@@ -1,3 +1,4 @@
+{ %skiptarget=wince }
 uses
   dos;
  var
diff --git a/tests/webtbs/tw4043.pp b/tests/webtbs/tw4043.pp
index 3acf053c12..52ad137b26 100644
--- a/tests/webtbs/tw4043.pp
+++ b/tests/webtbs/tw4043.pp
@@ -1,4 +1,4 @@
-{ %target=win32,wince }
+{ %target=win32 }
 { %OPT=-Sew }
 
 uses