diff --git a/TestSuite/usesunits/UsesInUnits/2/u2.pas b/TestSuite/usesunits/UsesInUnits/2/u2.pas
index e8f55c863..1487a1530 100644
--- a/TestSuite/usesunits/UsesInUnits/2/u2.pas
+++ b/TestSuite/usesunits/UsesInUnits/2/u2.pas
@@ -1,3 +1,5 @@
 unit u2;
 
+{$savepcu false}
+
 end.
\ No newline at end of file
diff --git a/TestSuite/usesunits/UsesInUnits/u1.pas b/TestSuite/usesunits/UsesInUnits/u1.pas
index 15b7b4479..c1d13cc2f 100644
--- a/TestSuite/usesunits/UsesInUnits/u1.pas
+++ b/TestSuite/usesunits/UsesInUnits/u1.pas
@@ -1,5 +1,7 @@
 unit u1;
 
+{$savepcu false}
+
 uses u2 in '2\u2.pas';
 uses u3;
 uses u4;
diff --git a/TestSuite/usesunits/UsesInUnits/u3.pas b/TestSuite/usesunits/UsesInUnits/u3.pas
index d387f9d4b..7d877f394 100644
--- a/TestSuite/usesunits/UsesInUnits/u3.pas
+++ b/TestSuite/usesunits/UsesInUnits/u3.pas
@@ -1,3 +1,5 @@
 unit u3;
 
+{$savepcu false}
+
 end.
\ No newline at end of file
diff --git a/TestSuite/usesunits/UsesInUnits/u4.pas b/TestSuite/usesunits/UsesInUnits/u4.pas
index cb2311002..7ff769506 100644
--- a/TestSuite/usesunits/UsesInUnits/u4.pas
+++ b/TestSuite/usesunits/UsesInUnits/u4.pas
@@ -1,5 +1,7 @@
 unit u4;
 
+{$savepcu false}
+
 {$include test.h}
 
 begin
diff --git a/TestSuite/usesunits/UsesInUnits2/u0.pas b/TestSuite/usesunits/UsesInUnits2/u0.pas
index 4374c4442..3d2b76bc9 100644
--- a/TestSuite/usesunits/UsesInUnits2/u0.pas
+++ b/TestSuite/usesunits/UsesInUnits2/u0.pas
@@ -1,5 +1,7 @@
 unit u0;
 
+{$savepcu false}
+
 uses u1;
 uses u2 in '..\UsesInUnits2_F2\u2.pas';
 
diff --git a/TestSuite/usesunits/UsesInUnits2/u1.pas b/TestSuite/usesunits/UsesInUnits2/u1.pas
index 91c7e1fa5..5c83f42c7 100644
--- a/TestSuite/usesunits/UsesInUnits2/u1.pas
+++ b/TestSuite/usesunits/UsesInUnits2/u1.pas
@@ -1,3 +1,5 @@
 unit u1;
 
+{$savepcu false}
+
 end.
\ No newline at end of file
diff --git a/TestSuite/usesunits/UsesInUnits2_F2/u2.pas b/TestSuite/usesunits/UsesInUnits2_F2/u2.pas
index e8f55c863..1487a1530 100644
--- a/TestSuite/usesunits/UsesInUnits2_F2/u2.pas
+++ b/TestSuite/usesunits/UsesInUnits2_F2/u2.pas
@@ -1,3 +1,5 @@
 unit u2;
 
+{$savepcu false}
+
 end.
\ No newline at end of file
diff --git a/TestSuite/usesunits/UsesInUnits3/u.pas b/TestSuite/usesunits/UsesInUnits3/u.pas
index 1acb4397c..be8da2841 100644
--- a/TestSuite/usesunits/UsesInUnits3/u.pas
+++ b/TestSuite/usesunits/UsesInUnits3/u.pas
@@ -1,5 +1,7 @@
 unit u;
 
+{$savepcu false}
+
 {$resource '1.txt'}
 {$reference 'uui3_lib.dll'}