From fd0e093463831cc20b0bda7c8ed24bfd31edccee Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= Date: Fri, 24 Oct 2014 19:53:23 +0200 Subject: syntax_tools: Strengthen igor tests Simple test of igor:merge/3 --- .../test/syntax_tools_SUITE_data/m2.erl | 26 ++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100644 lib/syntax_tools/test/syntax_tools_SUITE_data/m2.erl (limited to 'lib/syntax_tools/test/syntax_tools_SUITE_data/m2.erl') diff --git a/lib/syntax_tools/test/syntax_tools_SUITE_data/m2.erl b/lib/syntax_tools/test/syntax_tools_SUITE_data/m2.erl new file mode 100644 index 0000000000..781139317d --- /dev/null +++ b/lib/syntax_tools/test/syntax_tools_SUITE_data/m2.erl @@ -0,0 +1,26 @@ +%% +%% File: m2.erl +%% Author: Björn-Egil Dahlberg +%% Created: 2014-10-24 +%% + +-module(m2). + + +-export([foo/0,foo/1,foo/2, + bar/0,bar/1,bar/2, + record_update/2, record/0]). + +foo() -> ok. +foo(A) -> [item,A]. +foo(A,B) -> A + B. + +bar() -> true. +bar(A) -> {element,A}. +bar(A,B) -> A*B. + +-record(rec, {a,b}). + +record() -> #rec{a=3,b=0}. +record_update(V,#rec{a=V0}=R) -> + R#rec{a=V0+V,b=V0}. -- cgit v1.2.3