diff options
| author | Björn Gustavsson <[email protected]> | 2015-11-17 07:44:17 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-11-17 09:14:07 +0100 |
| commit | a1a45183b4c88dd2f68a010cbe537d387d364aa1 (patch) | |
| tree | b14d7b540327e2deb071c8de35c22448d526d770 /lib/stdlib/test/epp_SUITE.erl | |
| parent | 7bfba5dfb5ec581880290b3fea8645504064dd5b (diff) | |
| download | otp-a1a45183b4c88dd2f68a010cbe537d387d364aa1.tar.gz otp-a1a45183b4c88dd2f68a010cbe537d387d364aa1.tar.bz2 otp-a1a45183b4c88dd2f68a010cbe537d387d364aa1.zip | |
epp_SUITE: Improve coverage of epp
Diffstat (limited to 'lib/stdlib/test/epp_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/epp_SUITE.erl | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/lib/stdlib/test/epp_SUITE.erl b/lib/stdlib/test/epp_SUITE.erl index abd2501ce7..90642b2dca 100644 --- a/lib/stdlib/test/epp_SUITE.erl +++ b/lib/stdlib/test/epp_SUITE.erl @@ -621,6 +621,10 @@ otp_8130(Config) when is_list(Config) -> " 2 end,\n" " 7),\n" " {2,7} =\n" + " ?M1(begin 1 = fun _Name () -> 1 end(),\n" + " 2 end,\n" + " 7),\n" + " {2,7} =\n" " ?M1(begin 1 = fun t0/0(),\n" " 2 end,\n" " 7),\n" @@ -645,6 +649,9 @@ otp_8130(Config) when is_list(Config) -> " ?M1(begin yes = try 1 of 1 -> yes after foo end,\n" " 2 end,\n" " 7),\n" + " {[42],7} =\n" + " ?M1([42],\n" + " 7),\n" "ok.\n">>, ok}, @@ -728,11 +735,16 @@ otp_8130(Config) when is_list(Config) -> {errors,[{{2,2},epp,{include,lib,"$apa/foo.hrl"}}],[]}}, - {otp_8130_c9, + {otp_8130_c9a, <<"-define(S, ?S).\n" "t() -> ?S.\n">>, {errors,[{{2,9},epp,{circular,'S', none}}],[]}}, + {otp_8130_c9b, + <<"-define(S(), ?S()).\n" + "t() -> ?S().\n">>, + {errors,[{{2,9},epp,{circular,'S', 0}}],[]}}, + {otp_8130_c10, <<"\n-file.">>, {errors,[{{2,2},epp,{bad,file}}],[]}}, |