From 246bff92d2c595840ff748a2996a25ce8aa46fb7 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 15 Aug 2021 11:51:42 +0200
Subject: [PATCH]   + include fcl-passrc in regression tests

---
 .../tests/{tcgenerics.pp => tcgenerics.pas}   |  0
 packages/fcl-passrc/tests/testpassrc.pp       | 32 +++++++++++++++++++
 tests/Makefile                                |  2 +-
 tests/Makefile.fpc                            |  2 +-
 4 files changed, 34 insertions(+), 2 deletions(-)
 rename packages/fcl-passrc/tests/{tcgenerics.pp => tcgenerics.pas} (100%)
 create mode 100644 packages/fcl-passrc/tests/testpassrc.pp

diff --git a/packages/fcl-passrc/tests/tcgenerics.pp b/packages/fcl-passrc/tests/tcgenerics.pas
similarity index 100%
rename from packages/fcl-passrc/tests/tcgenerics.pp
rename to packages/fcl-passrc/tests/tcgenerics.pas
diff --git a/packages/fcl-passrc/tests/testpassrc.pp b/packages/fcl-passrc/tests/testpassrc.pp
new file mode 100644
index 0000000000..9a688a68ab
--- /dev/null
+++ b/packages/fcl-passrc/tests/testpassrc.pp
@@ -0,0 +1,32 @@
+{ %OPT=-Sc }
+program testpassrc;
+
+{$mode objfpc}{$H+}
+
+uses
+  //MemCheck,
+  Classes, consoletestrunner, tcscanner,  tctypeparser, tcstatements,
+  tcbaseparser, tcmoduleparser, tconstparser, tcvarparser, tcclasstype,
+  tcexprparser, tcprocfunc, tcpassrcutil, tcresolver, tcgenerics,
+  tcuseanalyzer, pasresolveeval, tcresolvegenerics;
+
+type
+
+  { TLazTestRunner }
+
+  TMyTestRunner = class(TTestRunner)
+  protected
+  // override the protected methods of TTestRunner to customize its behavior
+  end;
+
+var
+  Application: TMyTestRunner;
+
+begin
+  Application := TMyTestRunner.Create(nil);
+  DefaultFormat:=fplain;
+  DefaultRunAllTests:=True;
+  Application.Initialize;
+  Application.Run;
+  Application.Free;
+end.
diff --git a/tests/Makefile b/tests/Makefile
index 3bb4f11fc0..1f9f996d49 100644
--- a/tests/Makefile
+++ b/tests/Makefile
@@ -2461,7 +2461,7 @@ TESTDIRECTDIRS=
 TESTSUBDIRS=cg cg/variants cg/cdecl cpu16 cpu16/i8086 library opt $(addprefix units/,$(TESTUNITDIRS))
 TESTPACKAGESDIRS=win-base webtbs hash fcl-registry fcl-process zlib fcl-db fcl-xml cocoaint bzip2 fcl-net
 TESTPACKAGESUBDIRS=$(addprefix packages/,$(TESTPACKAGESDIRS))
-TESTPACKAGESDIRECTDIRS=rtl-objpas rtl-generics hash regexpr fcl-registry
+TESTPACKAGESDIRECTDIRS=rtl-objpas rtl-generics hash regexpr fcl-registry fcl-passrc
 TESTPACKAGESDIRECTSUBDIRS=$(addprefix ../packages/,$(addsuffix /tests,$(TESTPACKAGESDIRECTDIRS)))
 ifdef QUICKTEST
 export QUICKTEST
diff --git a/tests/Makefile.fpc b/tests/Makefile.fpc
index ec0ee95ba4..90fecab4da 100644
--- a/tests/Makefile.fpc
+++ b/tests/Makefile.fpc
@@ -164,7 +164,7 @@ TESTDIRECTDIRS=
 TESTSUBDIRS=cg cg/variants cg/cdecl cpu16 cpu16/i8086 library opt $(addprefix units/,$(TESTUNITDIRS))
 TESTPACKAGESDIRS=win-base webtbs hash fcl-registry fcl-process zlib fcl-db fcl-xml cocoaint bzip2 fcl-net
 TESTPACKAGESUBDIRS=$(addprefix packages/,$(TESTPACKAGESDIRS))
-TESTPACKAGESDIRECTDIRS=rtl-objpas rtl-generics hash regexpr fcl-registry
+TESTPACKAGESDIRECTDIRS=rtl-objpas rtl-generics hash regexpr fcl-registry fcl-passrc
 TESTPACKAGESDIRECTSUBDIRS=$(addprefix ../packages/,$(addsuffix /tests,$(TESTPACKAGESDIRECTDIRS)))
 
 ifdef QUICKTEST