diff options
author | Hans Bolinder <[email protected]> | 2010-03-03 09:44:34 +0000 |
---|---|---|
committer | Erlang/OTP <[email protected]> | 2010-03-03 09:44:34 +0000 |
commit | f94ff4fb58b9db3926ce0fea2c0fb4b18b1823ca (patch) | |
tree | 10f69dc132d379d9c36a9697801ab83f709af5c7 /lib/tools/test/xref_SUITE.erl | |
parent | 4ce2c1bd3ed90e6f1c208b4749ee33ae4ee9d723 (diff) | |
download | otp-f94ff4fb58b9db3926ce0fea2c0fb4b18b1823ca.tar.gz otp-f94ff4fb58b9db3926ce0fea2c0fb4b18b1823ca.tar.bz2 otp-f94ff4fb58b9db3926ce0fea2c0fb4b18b1823ca.zip |
OTP-8472 tools: xref: re/regexp
Xref has been updated to use the re module instead of the deprecated regexp
module.
Diffstat (limited to 'lib/tools/test/xref_SUITE.erl')
-rw-r--r-- | lib/tools/test/xref_SUITE.erl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/tools/test/xref_SUITE.erl b/lib/tools/test/xref_SUITE.erl index b4684140ca..a7855b0bb9 100644 --- a/lib/tools/test/xref_SUITE.erl +++ b/lib/tools/test/xref_SUITE.erl @@ -2306,8 +2306,8 @@ format_error(Conf) when is_list(Conf) -> ?line ok = xref:set_default(s, [{verbose,false}, {warnings, false}]), %% Parse error messages. - ?line 'Invalid regular expression "add(": unterminated \`(\'\n' - = fatom(xref:q(s,'"add("')), + ?line "Invalid regular expression \"add(\"" ++ _ = + fstring(xref:q(s,'"add("')), ?line 'Invalid operator foo\n' = fatom(xref:q(s,'foo E')), ?line 'Invalid wildcard variable \'_Var\' (only \'_\' is allowed)\n' @@ -2705,7 +2705,10 @@ f(S, A) -> flatten(io_lib:format(S, A)). fatom(R) -> - list_to_atom(flatten(xref:format_error(R))). + list_to_atom(fstring(R)). + +fstring(R) -> + flatten(xref:format_error(R)). start(Server) -> ?line case xref:start(Server) of |