diff options
author | Björn Gustavsson <[email protected]> | 2015-10-29 16:03:36 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2015-10-29 16:03:36 +0100 |
commit | a657f1f5e4d1d520865497fc0421ebd5f43ca70d (patch) | |
tree | 825efa4f67cdceab9aa7b4798f4252c387ab6ee1 /lib | |
parent | 30a4adb7d4b534a512a717244ebaeb29c78cddc1 (diff) | |
download | otp-a657f1f5e4d1d520865497fc0421ebd5f43ca70d.tar.gz otp-a657f1f5e4d1d520865497fc0421ebd5f43ca70d.tar.bz2 otp-a657f1f5e4d1d520865497fc0421ebd5f43ca70d.zip |
epp_SUITE: Avoid hard-coding list of macros more than once
Diffstat (limited to 'lib')
-rw-r--r-- | lib/stdlib/test/epp_SUITE.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/stdlib/test/epp_SUITE.erl b/lib/stdlib/test/epp_SUITE.erl index 2ac2316ce9..199d2f193d 100644 --- a/lib/stdlib/test/epp_SUITE.erl +++ b/lib/stdlib/test/epp_SUITE.erl @@ -826,14 +826,14 @@ otp_8130(Config) when is_list(Config) -> "-define(a, 3.14).\n" "t() -> ?a.\n"), ?line {ok,Epp} = epp:open(File, []), - ?line ['BASE_MODULE','BASE_MODULE_STRING','BEAM','FILE','LINE', - 'MACHINE','MODULE','MODULE_STRING'] = macs(Epp), + PreDefMacs = macs(Epp), + ['BASE_MODULE','BASE_MODULE_STRING','BEAM','FILE','LINE', + 'MACHINE','MODULE','MODULE_STRING'] = PreDefMacs, ?line {ok,[{'-',_},{atom,_,file}|_]} = epp:scan_erl_form(Epp), ?line {ok,[{'-',_},{atom,_,module}|_]} = epp:scan_erl_form(Epp), ?line {ok,[{atom,_,t}|_]} = epp:scan_erl_form(Epp), ?line {eof,_} = epp:scan_erl_form(Epp), - ?line ['BASE_MODULE','BASE_MODULE_STRING','BEAM','FILE','LINE', - 'MACHINE','MODULE','MODULE_STRING',a] = macs(Epp), + [a] = macs(Epp) -- PreDefMacs, ?line epp:close(Epp), %% escript |