From 3b8a1581d80e619bb83af327c6fc997fc4926dff Mon Sep 17 00:00:00 2001
From: Tomas Hajny <hajny@freepascal.org>
Date: Sun, 3 Mar 2002 13:27:28 +0000
Subject: [PATCH]   + added support for OS/2 units (.ppo)

---
 tests/utils/dotest.pp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/tests/utils/dotest.pp b/tests/utils/dotest.pp
index 323bb6662e..d327408c0a 100644
--- a/tests/utils/dotest.pp
+++ b/tests/utils/dotest.pp
@@ -664,6 +664,7 @@ begin
         if (not Config.ShouldFail) and DoExecute then
          begin
            if FileExists(ForceExtension(PPFile,'ppu')) or
+              FileExists(ForceExtension(PPFile,'ppo')) or
               FileExists(ForceExtension(PPFile,'ppw')) then
              begin
                AddLog(ForceExtension(PPFile,'elg'),'Skipping test run because it is a unit '+PPFileInfo);
@@ -684,7 +685,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.12  2002-01-29 13:24:16  pierre
+  Revision 1.13  2002-03-03 13:27:28  hajny
+    + added support for OS/2 units (.ppo)
+
+  Revision 1.12  2002/01/29 13:24:16  pierre
    + also generate .elg file for units
 
   Revision 1.11  2002/01/29 12:51:08  pierre