From cd247236ba93f7fe1505e11b6988d662ae701718 Mon Sep 17 00:00:00 2001
From: Mattias Gaertner <nc-gaertnma@netcologne.de>
Date: Tue, 26 Feb 2019 17:39:42 +0000
Subject: [PATCH] fcl-passrc: useanalyzer: clean up

git-svn-id: trunk@41482 -
---
 packages/fcl-passrc/tests/tcuseanalyzer.pas | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/packages/fcl-passrc/tests/tcuseanalyzer.pas b/packages/fcl-passrc/tests/tcuseanalyzer.pas
index 83cc65c23c..9b2bc40e4c 100644
--- a/packages/fcl-passrc/tests/tcuseanalyzer.pas
+++ b/packages/fcl-passrc/tests/tcuseanalyzer.pas
@@ -2265,6 +2265,13 @@ end;
 
 procedure TTestUseAnalyzer.TestWP_UnitInitialization;
 begin
+  AddModuleWithIntfImplSrc('unit2.pp',
+    LinesToStr([
+    'var i: longint;',
+    '']),
+    LinesToStr([
+    '']));
+
   AddModuleWithIntfImplSrc('unit1.pp',
     LinesToStr([
     'uses unit2;',
@@ -2273,13 +2280,6 @@ begin
     'initialization',
     'i:=2;']));
 
-  AddModuleWithIntfImplSrc('unit2.pp',
-    LinesToStr([
-    'var i: longint;',
-    '']),
-    LinesToStr([
-    '']));
-
   StartProgram(true);
   Add('uses unit1;');
   Add('begin');