The R13B03 release.OTP_R13B03

4 files changed, 122 insertions, 0 deletions

diff --git a/lib/eunit/test/Makefile b/lib/eunit/test/Makefile
new file mode 100644
index 0000000000..83fca0ade4
--- /dev/null
+++ b/lib/eunit/test/Makefile
@@ -0,0 +1,82 @@
+#
+# %CopyrightBegin%
+# 
+# Copyright Ericsson AB 2009. All Rights Reserved.
+# 
+# The contents of this file are subject to the Erlang Public License,
+# Version 1.1, (the "License"); you may not use this file except in
+# compliance with the License. You should have received a copy of the
+# Erlang Public License along with this software. If not, it can be
+# retrieved online at http://www.erlang.org/.
+# 
+# Software distributed under the License is distributed on an "AS IS"
+# basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
+# the License for the specific language governing rights and limitations
+# under the License.
+# 
+# %CopyrightEnd%
+#
+include $(ERL_TOP)/make/target.mk
+include $(ERL_TOP)/make/$(TARGET)/otp.mk
+
+MODULES =  \
+	eunit_SUITE
+
+ERL_FILES= $(MODULES:%=%.erl)
+
+TARGET_FILES= $(MODULES:%=$(EBIN)/%.$(EMULATOR))
+INSTALL_PROGS= $(TARGET_FILES)
+
+EMAKEFILE=Emakefile
+COVERFILE=eunit.cover
+
+# ----------------------------------------------------
+# Release directory specification
+# ----------------------------------------------------
+RELSYSDIR = $(RELEASE_PATH)/eunit_test
+
+# ----------------------------------------------------
+# FLAGS
+# ----------------------------------------------------
+ERL_MAKE_FLAGS += -pa $(ERL_TOP)/lib/test_server/ebin
+ERL_COMPILE_FLAGS += -I$(ERL_TOP)/lib/test_server/include
+
+EBIN = .
+
+# ----------------------------------------------------
+# Targets
+# ----------------------------------------------------
+.PHONY: make_emakefile
+
+make_emakefile:
+	$(ERL_TOP)/make/make_emakefile $(ERL_COMPILE_FLAGS) -o$(EBIN) \
+		$(MODULES) >> $(EMAKEFILE)
+
+tests debug opt: make_emakefile
+	erl $(ERL_MAKE_FLAGS) -make
+
+clean:
+	rm -f $(EMAKEFILE)
+	rm -f $(TARGET_FILES)
+	rm -f core
+
+docs:
+
+# ----------------------------------------------------
+# Special targets
+# ----------------------------------------------------
+
+# ----------------------------------------------------
+# Release Target
+# ---------------------------------------------------- 
+include $(ERL_TOP)/make/otp_release_targets.mk
+
+release_spec: opt
+
+release_tests_spec: make_emakefile
+	$(INSTALL_DIR) $(RELSYSDIR)
+	$(INSTALL_DATA) eunit.dynspec $(EMAKEFILE) \
+		$(COVERFILE) $(ERL_FILES) \
+		$(RELSYSDIR)
+
+release_docs_spec:
diff --git a/lib/eunit/test/eunit.cover b/lib/eunit/test/eunit.cover
new file mode 100644
index 0000000000..d1eaf770b6
--- /dev/null
+++ b/lib/eunit/test/eunit.cover
@@ -0,0 +1,3 @@
+%% -*- erlang -*-
+{exclude,[eunit_test]}.
+
diff --git a/lib/eunit/test/eunit.dynspec b/lib/eunit/test/eunit.dynspec
new file mode 100644
index 0000000000..c1d345ac14
--- /dev/null
+++ b/lib/eunit/test/eunit.dynspec
@@ -0,0 +1,6 @@
+%% -*- erlang -*-
+%% You can test this file using this command.
+%%    file:script("eunit.dynspec", [{'Os',"Unix"}]).
+
+[].
+
diff --git a/lib/eunit/test/eunit_SUITE.erl b/lib/eunit/test/eunit_SUITE.erl
new file mode 100644
index 0000000000..4ebcec6f5d
--- /dev/null
+++ b/lib/eunit/test/eunit_SUITE.erl
@@ -0,0 +1,31 @@
+%%
+%% %CopyrightBegin%
+%% 
+%% Copyright Ericsson AB 2009. All Rights Reserved.
+%% 
+%% The contents of this file are subject to the Erlang Public License,
+%% Version 1.1, (the "License"); you may not use this file except in
+%% compliance with the License. You should have received a copy of the
+%% Erlang Public License along with this software. If not, it can be
+%% retrieved online at http://www.erlang.org/.
+%% 
+%% Software distributed under the License is distributed on an "AS IS"
+%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
+%% the License for the specific language governing rights and limitations
+%% under the License.
+%% 
+%% %CopyrightEnd%
+%%
+-module(eunit_SUITE).
+
+-export([all/1,eunit_test/1]).
+	 
+-include("test_server.hrl").
+
+all(suite) ->
+    [eunit_test].
+
+eunit_test(Config) when is_list(Config) ->
+    ok = file:set_cwd(code:lib_dir(eunit)),
+    ok = eunit:test(eunit).
+