aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/erl_eval_SUITE.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2013-02-10 09:07:49 +0100
committerBjörn Gustavsson <[email protected]>2013-02-10 09:20:17 +0100
commit6b456e94d11ffe8a9f2e361fe8143902a2b99baf (patch)
treeb9079aae089a12015c9d753a3b085905cc8ce81d /lib/stdlib/test/erl_eval_SUITE.erl
parentf1e98d7c70457f85be52cefda73ec4f4d98f5822 (diff)
downloadotp-6b456e94d11ffe8a9f2e361fe8143902a2b99baf.tar.gz
otp-6b456e94d11ffe8a9f2e361fe8143902a2b99baf.tar.bz2
otp-6b456e94d11ffe8a9f2e361fe8143902a2b99baf.zip
erl_eval: Don't allow evaluation of {M,F} in the shell
Tuples funs were removed in de7e01c958ff7c9e6da4034a53567a30a4ae5792, but it was still possible to evaluate tuple funs in the shell.
Diffstat (limited to 'lib/stdlib/test/erl_eval_SUITE.erl')
-rw-r--r--lib/stdlib/test/erl_eval_SUITE.erl4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/stdlib/test/erl_eval_SUITE.erl b/lib/stdlib/test/erl_eval_SUITE.erl
index d3c91c7326..7ff4c81ea6 100644
--- a/lib/stdlib/test/erl_eval_SUITE.erl
+++ b/lib/stdlib/test/erl_eval_SUITE.erl
@@ -1086,6 +1086,10 @@ funs(Config) when is_list(Config) ->
"begin M = lists, F = fun M:reverse/1,"
" [1,2] = F([2,1]), ok end.",
ok),
+
+ %% Test that {M,F} is not accepted as a fun.
+ error_check("{" ?MODULE_STRING ",module_info}().",
+ {badfun,{?MODULE,module_info}}),
ok.
run_many_args({S, As}) ->