From 9096522efd263f719ab9bc56670406a73ac1d818 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= Date: Wed, 28 Aug 2013 07:51:09 +0200 Subject: Test OPTIONAL and DEFAULT for open types --- lib/asn1/test/testInfObj.erl | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to 'lib/asn1/test/testInfObj.erl') diff --git a/lib/asn1/test/testInfObj.erl b/lib/asn1/test/testInfObj.erl index 2b751f7fb7..7241f7b380 100644 --- a/lib/asn1/test/testInfObj.erl +++ b/lib/asn1/test/testInfObj.erl @@ -99,7 +99,15 @@ main(_Erule) -> roundtrip('InfObj', 'Seq2', {'Seq2',42,[true,false,false,true], - [false,true,false]}). + [false,true,false]}), + + roundtrip('InfObj', 'OptionalInSeq', {'OptionalInSeq',3,true}), + roundtrip('InfObj', 'OptionalInSeq', {'OptionalInSeq',3,asn1_NOVALUE}), + + roundtrip('InfObj', 'DefaultInSeq', {'DefaultInSeq',3,false}), + roundtrip('InfObj', 'DefaultInSeq', {'DefaultInSeq',3,true}), + {'DefaultInSeq',3,true} = + enc_dec('InfObj', 'DefaultInSeq', {'DefaultInSeq',3,asn1_DEFAULT}). roundtrip(M, T, V) -> -- cgit v1.2.3