feat(cth-suite): use cheaper heuristic for schema modules

2024-01-30 21:07:40 +01:00 · 2024-01-30 21:07:40 +01:00 · 24dfa41722
parent 8f2a4f7b19
commit 24dfa41722
1 changed files with 6 additions and 3 deletions
--- a/apps/emqx/test/emqx_cth_suite.erl
+++ b/apps/emqx/test/emqx_cth_suite.erl
@ -470,9 +470,12 @@ clean_suite_state() ->

 app_schema(App) ->
    Mod = list_to_atom(atom_to_list(App) ++ "_schema"),
-    try is_list(Mod:roots()) of
-        true -> {ok, Mod};
-        false -> {error, schema_no_roots}
+    try
+        Exports = Mod:module_info(exports),
+        case lists:member({roots, 0}, Exports) of
+            true -> {ok, Mod};
+            false -> {error, schema_no_roots}
+        end
    catch
        error:undef ->
            {error, schema_not_found}