runtests: allow passing a pattern when no module is passed

Author: rfourquet

src/InlineTest.jl

@@ -212,10 +212,11 @@ function wrap_ts(partial, regex, ts::TestsetExpr, loopvals=nothing)
     end
 end
 
-function runtests(; wrap::Bool=true)
+function runtests(pattern::Union{AbstractString,Regex} = r""; wrap::Bool=true)
     foreach(values(Base.loaded_modules)) do m
-        if isdefined(m, INLINE_TEST[]) # will automatically skip InlineTest and InlineTest.InlineTestTest
-            ts = runtests(m, wrap=wrap)
+        if isdefined(m, INLINE_TEST[])
+            # will automatically skip InlineTest and InlineTest.InlineTestTest
+            runtests(m, pattern, wrap=wrap)
         end
     end
 end

test/runtests.jl

@@ -152,3 +152,6 @@ end
 import .P # test InlineTest's wrapping of non-regex patterns
 P.check("b", ["a", "b", "b|c"]) # an implicit prefix r".*" is added
 P.check("b|c", ["a", "b|c"]) # "b" is not matched
+
+runtests()
+runtests(r"/a") # just test that a regex can be passed