1 files changed, 19 insertions, 0 deletions
diff --git a/tiger-compiler/src/testsuite/tests-collector.cc b/tiger-compiler/src/testsuite/tests-collector.cc
new file mode 100644
index 0000000..b3365b2
--- /dev/null
+++ b/tiger-compiler/src/testsuite/tests-collector.cc
@@ -0,0 +1,19 @@
+/**
+ ** \file testsuite/tests-collector.cc
+ ** \brief Implementation of testsuite::TestsCollector.
+ */
+
+#include <testsuite/tests-collector.hh>
+
+namespace testsuite
+  {
+
+    void TestsCollector::operator()(const ast::FunctionDec& e)
+     {
+       if (is_a_test_function(e))
+         {
+           tests_.push_back(&e);
+         }
+     }
+
+  } // namespace testsuite