diff --git a/TestSuite/explicitinterface7.pas b/TestSuite/explicitinterface7.pas
index 9d68cfcbe..a088c9e5b 100644
--- a/TestSuite/explicitinterface7.pas
+++ b/TestSuite/explicitinterface7.pas
@@ -1,4 +1,5 @@
-var i: integer;
+//winonly
+var i: integer;
 
 type
   I1<T>=interface