aboutsummaryrefslogtreecommitdiffstats
path: root/lib/dialyzer/test/small_tests_SUITE_data/src/invalid_specs/invalid_spec1.erl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/dialyzer/test/small_tests_SUITE_data/src/invalid_specs/invalid_spec1.erl')
-rw-r--r--lib/dialyzer/test/small_tests_SUITE_data/src/invalid_specs/invalid_spec1.erl28
1 files changed, 0 insertions, 28 deletions
diff --git a/lib/dialyzer/test/small_tests_SUITE_data/src/invalid_specs/invalid_spec1.erl b/lib/dialyzer/test/small_tests_SUITE_data/src/invalid_specs/invalid_spec1.erl
deleted file mode 100644
index 06ab2f9a22..0000000000
--- a/lib/dialyzer/test/small_tests_SUITE_data/src/invalid_specs/invalid_spec1.erl
+++ /dev/null
@@ -1,28 +0,0 @@
--module(invalid_spec1).
-
--export([get_plan_dirty/1]).
-
--spec get_plan_dirty([string()]) -> {{atom(), any()}, [atom()]}.
-
-get_plan_dirty(ClassL) ->
- get_plan_dirty(ClassL, [], []).
-
-get_plan_dirty([], Res, FoundClassList) ->
- {Res,FoundClassList};
-get_plan_dirty([Class|ClassL], Res, FoundClassList) ->
- ClassPlan = list_to_atom(Class ++ "_plan"),
- case catch mnesia:dirty_all_keys(ClassPlan) of
- {'EXIT',_} ->
- get_plan_dirty(ClassL, Res, FoundClassList);
- [] ->
- get_plan_dirty(ClassL, Res, FoundClassList);
- KeyL ->
- ClassAtom = list_to_atom(Class),
- Res2 =
- lists:foldl(fun(Key, Acc) ->
- [{ClassAtom,Key}|Acc]
- end,
- Res,
- KeyL),
- get_plan_dirty(ClassL, Res2, [ClassAtom|FoundClassList])
- end.