diff options
| author | Micael Karlberg <[email protected]> | 2013-02-05 13:06:56 +0100 |
|---|---|---|
| committer | Micael Karlberg <[email protected]> | 2013-02-05 13:06:56 +0100 |
| commit | c4425da5b7cf880b8ca76158e0bfecbf5202a333 (patch) | |
| tree | 9c02dfdf06b5a4dc55a7dcb4cd9d8f56d418b40a /lib/snmp/test/snmp_compiler_test.erl | |
| parent | 01307e9ca4dec7e06645962562de476905749a84 (diff) | |
| download | otp-c4425da5b7cf880b8ca76158e0bfecbf5202a333.tar.gz otp-c4425da5b7cf880b8ca76158e0bfecbf5202a333.tar.bz2 otp-c4425da5b7cf880b8ca76158e0bfecbf5202a333.zip | |
[snmp/compiler] Added test case for BITS import
Diffstat (limited to 'lib/snmp/test/snmp_compiler_test.erl')
| -rw-r--r-- | lib/snmp/test/snmp_compiler_test.erl | 31 |
1 files changed, 25 insertions, 6 deletions
diff --git a/lib/snmp/test/snmp_compiler_test.erl b/lib/snmp/test/snmp_compiler_test.erl index 257fc47952..4c5a945984 100644 --- a/lib/snmp/test/snmp_compiler_test.erl +++ b/lib/snmp/test/snmp_compiler_test.erl @@ -53,7 +53,8 @@ otp_6150/1, otp_8574/1, - otp_8595/1 + otp_8595/1, + otp_10799/1 ]). @@ -132,7 +133,7 @@ all() -> ]. groups() -> - [{tickets, [], [otp_6150, otp_8574, otp_8595]}]. + [{tickets, [], [otp_6150, otp_8574, otp_8595, otp_10799]}]. init_per_group(_GroupName, Config) -> Config. @@ -326,13 +327,14 @@ warnings_as_errors(Config) when is_list(Config) -> otp_6150(suite) -> []; otp_6150(Config) when is_list(Config) -> - put(tname,otp_6150), + put(tname, otp6150), p("starting with Config: ~p~n", [Config]), Dir = ?config(case_top_dir, Config), MibDir = ?config(mib_dir, Config), MibFile = join(MibDir, "ERICSSON-TOP-MIB.mib"), - ?line {ok, Mib} = snmpc:compile(MibFile, [{outdir, Dir}, {verbosity, trace}]), + ?line {ok, Mib} = + snmpc:compile(MibFile, [{outdir, Dir}, {verbosity, trace}]), io:format("otp_6150 -> Mib: ~n~p~n", [Mib]), ok. @@ -342,7 +344,7 @@ otp_6150(Config) when is_list(Config) -> otp_8574(suite) -> []; otp_8574(Config) when is_list(Config) -> - put(tname,otp_8574), + put(tname, otp8574), p("starting with Config: ~p~n", [Config]), Dir = ?config(case_top_dir, Config), @@ -375,7 +377,7 @@ otp_8574(Config) when is_list(Config) -> otp_8595(suite) -> []; otp_8595(Config) when is_list(Config) -> - put(tname,otp_8595), + put(tname, otp8595), p("starting with Config: ~p~n", [Config]), Dir = ?config(case_top_dir, Config), @@ -391,6 +393,23 @@ otp_8595(Config) when is_list(Config) -> %%====================================================================== +otp_10799(suite) -> + []; +otp_10799(Config) when is_list(Config) -> + put(tname, otp10799), + p("starting with Config: ~p~n", [Config]), + + Dir = ?config(case_top_dir, Config), + MibDir = ?config(mib_dir, Config), + MibFile = join(MibDir, "OTP10799-MIB.mib"), + ?line {ok, Mib} = + snmpc:compile(MibFile, [{outdir, Dir}, {verbosity, trace}]), + p("Mib: ~n~p~n", [Mib]), + ok. + + +%%====================================================================== + augments_extra_info(suite) -> []; augments_extra_info(Config) when is_list(Config) -> |