diff options
| author | Björn Gustavsson <[email protected]> | 2015-05-08 12:09:37 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-05-08 12:09:37 +0200 |
| commit | 0bdb747b4b0572bfe30bf7d974e32d05c0e2df66 (patch) | |
| tree | 8d846fec1a4b0a910fd2099a89b9e15b1a10191b /lib/compiler/test/error_SUITE.erl | |
| parent | 40980940e866a9fe8f7055d7499df8bf604f11d4 (diff) | |
| parent | d8fa79149a1339b2359ecc981f992bd53e5a9d18 (diff) | |
| download | otp-0bdb747b4b0572bfe30bf7d974e32d05c0e2df66.tar.gz otp-0bdb747b4b0572bfe30bf7d974e32d05c0e2df66.tar.bz2 otp-0bdb747b4b0572bfe30bf7d974e32d05c0e2df66.zip | |
Merge branch 'nox/compiler/parse_transform-undef/OTP-12723'
* nox/compiler/parse_transform-undef/OTP-12723:
Properly report unknown parse transforms
Diffstat (limited to 'lib/compiler/test/error_SUITE.erl')
| -rw-r--r-- | lib/compiler/test/error_SUITE.erl | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lib/compiler/test/error_SUITE.erl b/lib/compiler/test/error_SUITE.erl index 0d23f12fb5..acd785cc5a 100644 --- a/lib/compiler/test/error_SUITE.erl +++ b/lib/compiler/test/error_SUITE.erl @@ -235,10 +235,18 @@ transforms(Config) -> ">>, {error,[{none,compile,{parse_transform,?MODULE,{too_bad,_}}}],[]} = run_test(Ts2, test_filename(Config), [], dont_write_beam), + Ts3 = <<" + -compile({parse_transform,",?MODULE_STRING,"}). + ">>, + {error,[{none,compile,{parse_transform,?MODULE,{undef,_}}}],[]} = + run_test(Ts3, test_filename(Config), [call_undef], dont_write_beam), ok. -parse_transform(_, _) -> - error(too_bad). +parse_transform(_, Opts) -> + case lists:member(call_undef, Opts) of + false -> error(too_bad); + true -> camembert:délicieux() + end. maps_warnings(Config) when is_list(Config) -> |