blob: 1e72c6084168eda4b1e7e9e44d7157310dd6a653 (
plain) (
blame)
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).
|
