diff options
author | Dan Gudmundsson <[email protected]> | 2014-10-07 17:08:09 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2015-01-12 11:40:25 +0100 |
commit | e43a382e7207a3c01baba2ef202b49766b60fdae (patch) | |
tree | d36624f0be563a5dbbcd25e7bd7ac88d48cfef2e /lib/asn1/test/testInfObj.erl | |
parent | 86a2bbe5c88c1be6450b53a2b5cb30a099683762 (diff) | |
download | otp-e43a382e7207a3c01baba2ef202b49766b60fdae.tar.gz otp-e43a382e7207a3c01baba2ef202b49766b60fdae.tar.bz2 otp-e43a382e7207a3c01baba2ef202b49766b60fdae.zip |
Clean up and correct validation of OBJECT IDENTIFIER/RELATIVE-OID
Besides simplifying the code and doing better error checking
and error reporting, fix the following bugs:
Support retrieving an OBJECT IDENTIFIER/RELATIVE-OID from an
object. Example:
oid OBJECT IDENTIFIER ::= some-object.&some-field
Allow an integer constant first in an OBJECT IDENTIFIER:
integer INTEGER ::= 0
oid OBJECT IDENTIFIER ::= {integer 1}
Diffstat (limited to 'lib/asn1/test/testInfObj.erl')
-rw-r--r-- | lib/asn1/test/testInfObj.erl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/asn1/test/testInfObj.erl b/lib/asn1/test/testInfObj.erl index 268bdcf60f..aa617b632f 100644 --- a/lib/asn1/test/testInfObj.erl +++ b/lib/asn1/test/testInfObj.erl @@ -146,6 +146,11 @@ main(_Erule) -> roundtrip('InfObj', 'ExtClassSeq', {'ExtClassSeq', 4}), + {1,2,42} = 'InfObj':'value-1'(), + {1,2,42,25} = 'InfObj':'value-2'(), + {100,101} = 'InfObj':'value-3'(), + {1,2,100,101} = 'InfObj':'value-4'(), + ok. test_objset(Type, Keys) -> |