From 74d7b1b942c6f1d984e263f6675a9423197a3215 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Tue, 19 Jan 2010 11:34:56 +0000
Subject: Add test suite for the tools application

---
 lib/tools/test/xref_SUITE_data/lib_test/cp.erl   |  6 ++++++
 lib/tools/test/xref_SUITE_data/lib_test/lib1.erl |  6 ++++++
 lib/tools/test/xref_SUITE_data/lib_test/lib2.erl | 14 ++++++++++++++
 lib/tools/test/xref_SUITE_data/lib_test/lib3.erl | 11 +++++++++++
 lib/tools/test/xref_SUITE_data/lib_test/t.erl    | 14 ++++++++++++++
 5 files changed, 51 insertions(+)
 create mode 100644 lib/tools/test/xref_SUITE_data/lib_test/cp.erl
 create mode 100644 lib/tools/test/xref_SUITE_data/lib_test/lib1.erl
 create mode 100644 lib/tools/test/xref_SUITE_data/lib_test/lib2.erl
 create mode 100644 lib/tools/test/xref_SUITE_data/lib_test/lib3.erl
 create mode 100644 lib/tools/test/xref_SUITE_data/lib_test/t.erl

(limited to 'lib/tools/test/xref_SUITE_data/lib_test')

diff --git a/lib/tools/test/xref_SUITE_data/lib_test/cp.erl b/lib/tools/test/xref_SUITE_data/lib_test/cp.erl
new file mode 100644
index 0000000000..efe5d77854
--- /dev/null
+++ b/lib/tools/test/xref_SUITE_data/lib_test/cp.erl
@@ -0,0 +1,6 @@
+-module(cp).
+
+-export([t/0]).
+
+t() ->
+    lists:sort(a).
diff --git a/lib/tools/test/xref_SUITE_data/lib_test/lib1.erl b/lib/tools/test/xref_SUITE_data/lib_test/lib1.erl
new file mode 100644
index 0000000000..7d50fcb1af
--- /dev/null
+++ b/lib/tools/test/xref_SUITE_data/lib_test/lib1.erl
@@ -0,0 +1,6 @@
+-module(lib1).
+
+-export([f/0]).
+
+f() ->
+    true.
diff --git a/lib/tools/test/xref_SUITE_data/lib_test/lib2.erl b/lib/tools/test/xref_SUITE_data/lib_test/lib2.erl
new file mode 100644
index 0000000000..ca505dfd4f
--- /dev/null
+++ b/lib/tools/test/xref_SUITE_data/lib_test/lib2.erl
@@ -0,0 +1,14 @@
+-module(lib2).
+
+-export([f/0, g/0]).
+
+-deprecated({f,0,next_major_release}).
+
+f() ->
+    local().
+
+g() ->
+    true.
+
+local() ->
+    true.
diff --git a/lib/tools/test/xref_SUITE_data/lib_test/lib3.erl b/lib/tools/test/xref_SUITE_data/lib_test/lib3.erl
new file mode 100644
index 0000000000..8a900f8040
--- /dev/null
+++ b/lib/tools/test/xref_SUITE_data/lib_test/lib3.erl
@@ -0,0 +1,11 @@
+-module(lib3).
+
+-export([f/0, g/0]).
+
+-deprecated(module).
+
+f() ->
+    true.
+
+g() ->
+    true.
diff --git a/lib/tools/test/xref_SUITE_data/lib_test/t.erl b/lib/tools/test/xref_SUITE_data/lib_test/t.erl
new file mode 100644
index 0000000000..d2bd81110e
--- /dev/null
+++ b/lib/tools/test/xref_SUITE_data/lib_test/t.erl
@@ -0,0 +1,14 @@
+-module(t).
+
+-export([t/0]).
+
+t() ->
+    %% lib1: only unknown functions used
+    %% lib2: one known used, one unknown function used, one local used
+    %% lib3: one known function used
+    lib1:unknown(),
+    lib2:f(), %% known, g/0 not used
+    lib2:unknown(),
+    lib2:local(),
+    lib3:f(),
+    unknown:unknown().
-- 
cgit v1.2.3