From 9b8af6c7a2ac22e776b209bc5a991d295586dc40 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=D0=91=D0=BE=D0=BD=D0=B4=D0=B0=D1=80=D0=B5=D0=B2=20=D0=98?=
 =?UTF-8?q?=D0=B2=D0=B0=D0=BD?= <ibond84@googlemail.com>
Date: Tue, 29 Dec 2015 19:24:37 +0100
Subject: [PATCH] fixing unit tests for mono

---
 TestSuite/units/u_assemblies1.pas       | 1 +
 TestSuite/usesunits/use_assemblies1.pas | 1 +
 2 files changed, 2 insertions(+)

diff --git a/TestSuite/units/u_assemblies1.pas b/TestSuite/units/u_assemblies1.pas
index 01a678358..335e6d371 100644
--- a/TestSuite/units/u_assemblies1.pas
+++ b/TestSuite/units/u_assemblies1.pas
@@ -1,3 +1,4 @@
+//winonly
 unit u_assemblies1;
 {$reference 'System.Windows.Forms.dll'}
 {$reference 'System.Drawing.dll'}
diff --git a/TestSuite/usesunits/use_assemblies1.pas b/TestSuite/usesunits/use_assemblies1.pas
index 4d3f80d71..8e214bfac 100644
--- a/TestSuite/usesunits/use_assemblies1.pas
+++ b/TestSuite/usesunits/use_assemblies1.pas
@@ -1 +1,2 @@
+//winonly
 uses u_assemblies1; begin end.
\ No newline at end of file