diff --git a/src/run_unitary_tests.m b/src/run_unitary_tests.m
index caf044dfebf1fa1c0c6fbeaa11cef11cbfd4aa0b..e61c7d6a356ed8fee137e505360e60729a3b7829 100644
--- a/src/run_unitary_tests.m
+++ b/src/run_unitary_tests.m
@@ -35,6 +35,10 @@ report = {};
 
 testcoverage = zeros(2,1);
 
+if nargout>2
+    list_of_routines_without_unit_tests = {};
+end
+
 skipline()
 
 for f=1:length(listoffiles)
@@ -52,6 +56,7 @@ for f=1:length(listoffiles)
             report = [report; info];
         else
             testcoverage(2) = testcoverage(2) + 1;
+            list_of_routines_without_unit_tests(testcoverage(2)) = { listoffiles{f} };
         end
     end
 end