diff options
| author | Fredrik Gustafsson <[email protected]> | 2013-01-22 10:28:53 +0100 |
|---|---|---|
| committer | Fredrik Gustafsson <[email protected]> | 2013-01-22 10:28:53 +0100 |
| commit | 2db94d0e84729a8f2a474a7cf02e9c94853a1bbe (patch) | |
| tree | cbf84d3a25f47ff351d77073744504a8fecd6a81 /lib/stdlib/test/erl_pp_SUITE.erl | |
| parent | 4bc96ac57616e089d8508e64973e49b6f8db97ea (diff) | |
| parent | 13d4a8d4e69a8965ab66685e751d11cda5f29567 (diff) | |
| download | otp-2db94d0e84729a8f2a474a7cf02e9c94853a1bbe.tar.gz otp-2db94d0e84729a8f2a474a7cf02e9c94853a1bbe.tar.bz2 otp-2db94d0e84729a8f2a474a7cf02e9c94853a1bbe.zip | |
Merge branch 'lh/forget-mnemosyne/OTP-10729'
* lh/forget-mnemosyne/OTP-10729:
Remove what remains of the Mnemosyne code
Remove support for the query keyword and query expressions
Diffstat (limited to 'lib/stdlib/test/erl_pp_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/erl_pp_SUITE.erl | 22 |
1 files changed, 1 insertions, 21 deletions
diff --git a/lib/stdlib/test/erl_pp_SUITE.erl b/lib/stdlib/test/erl_pp_SUITE.erl index db416b03b0..37be61d665 100644 --- a/lib/stdlib/test/erl_pp_SUITE.erl +++ b/lib/stdlib/test/erl_pp_SUITE.erl @@ -537,29 +537,9 @@ messages(Config) when is_list(Config) -> ?line true = "\n" =:= lists:flatten(erl_pp:form({eof,0})), ok. -old_mnemosyne_syntax(suite) -> - []; old_mnemosyne_syntax(Config) when is_list(Config) -> - %% Since we have kept the 'query' syntax and ':-' token, + %% Since we have kept the ':-' token, %% better test that we can pretty print it. - Q = {'query',6, - {lc,6, - {var,6,'X'}, - [{generate,6, - {var,6,'X'}, - {call,6,{atom,6,table},[{atom,6,tab}]}}, - {match,7, - {record_field,7,{var,7,'X'},{atom,7,foo}}, - {atom,7,bar}}]}}, - ?line "query\n" - " [ \n" % extra space... - " X ||\n" - " X <- table(tab),\n" - " X.foo = bar\n" - " ]\n" - "end" = - lists:flatten(erl_pp:expr(Q)), - R = {rule,12,sales,2, [{clause,12, [{var,12,'E'},{atom,12,employee}], |