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