diff options
author | Mark Bucciarelli <[email protected]> | 2016-05-26 21:58:18 -0400 |
---|---|---|
committer | Hans Bolinder <[email protected]> | 2016-07-06 10:13:36 +0200 |
commit | 0969ecad9e2978bacb7b27f663cd16aa5ea6c460 (patch) | |
tree | 7f6996011c04e6687602a3b7adb1203e6673e630 /lib/syntax_tools/test/syntax_tools_SUITE.erl | |
parent | 3b409021a70427bb2fe3834707edf822b6afce2d (diff) | |
download | otp-0969ecad9e2978bacb7b27f663cd16aa5ea6c460.tar.gz otp-0969ecad9e2978bacb7b27f663cd16aa5ea6c460.tar.bz2 otp-0969ecad9e2978bacb7b27f663cd16aa5ea6c460.zip |
syntax_tools: Make erl_tidy work on input file with tilde
See also http://bugs.erlang.org/browse/ERL-151.
Diffstat (limited to 'lib/syntax_tools/test/syntax_tools_SUITE.erl')
-rw-r--r-- | lib/syntax_tools/test/syntax_tools_SUITE.erl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/syntax_tools/test/syntax_tools_SUITE.erl b/lib/syntax_tools/test/syntax_tools_SUITE.erl index b935d42bb7..43c17e9f1f 100644 --- a/lib/syntax_tools/test/syntax_tools_SUITE.erl +++ b/lib/syntax_tools/test/syntax_tools_SUITE.erl @@ -27,14 +27,14 @@ %% Test cases -export([app_test/1,appup_test/1,smoke_test/1,revert/1,revert_map/1, t_abstract_type/1,t_erl_parse_type/1,t_epp_dodger/1, - t_comment_scan/1,t_igor/1]). + t_comment_scan/1,t_igor/1,t_erl_tidy/1]). suite() -> [{ct_hooks,[ts_install_cth]}]. all() -> [app_test,appup_test,smoke_test,revert,revert_map, t_abstract_type,t_erl_parse_type,t_epp_dodger, - t_comment_scan,t_igor]. + t_comment_scan,t_igor,t_erl_tidy]. groups() -> []. @@ -237,6 +237,12 @@ t_igor(Config) when is_list(Config) -> ok. +t_erl_tidy(Config) when is_list(Config) -> + DataDir = ?config(data_dir, Config), + File = filename:join(DataDir,"erl_tidy_tilde.erl"), + ok = erl_tidy:file(File, [{stdout, true}]), + ok. + test_comment_scan([],_) -> ok; test_comment_scan([File|Files],DataDir) -> Filename = filename:join(DataDir,File), |