diff options
author | Björn Gustavsson <[email protected]> | 2010-03-10 07:32:19 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2010-03-11 10:26:48 +0100 |
commit | 44cc5dfcbea91ef419c55a70c67c87b3a44e7a79 (patch) | |
tree | 17d04199de37685bfc686cdf7152b93591f4e2b9 /lib/asn1/test/testContextSwitchingTypes.erl | |
parent | c5dff500f4ae51fc2182b1646538e54129e63c37 (diff) | |
download | otp-44cc5dfcbea91ef419c55a70c67c87b3a44e7a79.tar.gz otp-44cc5dfcbea91ef419c55a70c67c87b3a44e7a79.tar.bz2 otp-44cc5dfcbea91ef419c55a70c67c87b3a44e7a79.zip |
asn1 tests: Modernize guard tests
Diffstat (limited to 'lib/asn1/test/testContextSwitchingTypes.erl')
-rw-r--r-- | lib/asn1/test/testContextSwitchingTypes.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/asn1/test/testContextSwitchingTypes.erl b/lib/asn1/test/testContextSwitchingTypes.erl index 2160122dfe..615f98c9b2 100644 --- a/lib/asn1/test/testContextSwitchingTypes.erl +++ b/lib/asn1/test/testContextSwitchingTypes.erl @@ -71,13 +71,13 @@ check_EXTERNAL_Idef({Alt,_}) when Alt=='context-negotiation'; ok; check_EXTERNAL_Idef(I) -> {error,"failed on identification alternative",I}. -check_EXTERNAL_DVD(DVD) when list(DVD) -> +check_EXTERNAL_DVD(DVD) when is_list(DVD) -> ok; check_EXTERNAL_DVD(asn1_NOVALUE) -> ok; check_EXTERNAL_DVD(DVD) -> {error,"failed on data-value-descriptor alternative",DVD}. -check_EXTERNAL_DV(DV) when list(DV) -> +check_EXTERNAL_DV(DV) when is_list(DV) -> ok; check_EXTERNAL_DV(DV) -> {error,"failed on data-value alternative",DV}. |