diff options
-rw-r--r-- | lib/asn1/test/asn1_SUITE.erl | 8 | ||||
-rw-r--r-- | lib/asn1/test/testX420.erl | 2 |
2 files changed, 4 insertions, 6 deletions
diff --git a/lib/asn1/test/asn1_SUITE.erl b/lib/asn1/test/asn1_SUITE.erl index 8a17620531..a558a2941f 100644 --- a/lib/asn1/test/asn1_SUITE.erl +++ b/lib/asn1/test/asn1_SUITE.erl @@ -993,12 +993,10 @@ testX420(Config) -> "sparc-sun-solaris2.10" -> {skip,"Too slow for an old Sparc"}; _ -> - test(Config, fun testX420/3, [ber]) + Rule = ber, + testX420:compile(Rule, [der], Config), + ok = testX420:ticket7759(Rule, Config) end. -testX420(Config, Rule, Opts) -> - testX420:compile(Rule, [der|Opts], Config), - ok = testX420:ticket7759(Rule, Config), - testX420:compile(Rule, Opts, Config). test_x691(Config) -> test(Config, fun test_x691/3, [per, uper]). diff --git a/lib/asn1/test/testX420.erl b/lib/asn1/test/testX420.erl index 00c9221e9d..4ddc55dc16 100644 --- a/lib/asn1/test/testX420.erl +++ b/lib/asn1/test/testX420.erl @@ -26,7 +26,7 @@ -include_lib("test_server/include/test_server.hrl"). -compile(Erule, Options, Config) when Erule =:= ber; Erule =:= per -> +compile(Erule, Options, Config) -> Specs0 = specs(), 99 = length(Specs0), CaseDir = ?config(case_dir, Config), |