aboutsummaryrefslogblamecommitdiffstats
path: root/lib/asn1/test/testSeqOfChoExt.erl
blob: 1e72c6084168eda4b1e7e9e44d7157310dd6a653 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15














                                                             
-module(testSeqOfChoExt).

-export([main/1]).

%-record('Seq2', { octstr = asn1_NOVALUE }).
%-record('Seq1', { int, soc }).

main(_Rules) ->
    roundtrip('SeqOfChoExt':seq1()).

roundtrip(Value) ->
    roundtrip(Value, Value).
roundtrip(Value, Exp) ->
    Type = element(1,Value),
    asn1_test_lib:roundtrip('SeqOfChoExt', Type, Value, Exp).