diff options
| author | Björn Gustavsson <[email protected]> | 2013-01-08 10:56:27 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2013-01-23 15:22:56 +0100 |
| commit | 74cee7dc1cc5b0332cd851da4953ebbb98224b5f (patch) | |
| tree | ff539fdce7055f51fb437bc906358f073d77a620 /lib/asn1/src/asn1ct_gen_ber_bin_v2.erl | |
| parent | 625d2b01dcaa0b15cc9ff7f98438bcd81a5bddc8 (diff) | |
| download | otp-74cee7dc1cc5b0332cd851da4953ebbb98224b5f.tar.gz otp-74cee7dc1cc5b0332cd851da4953ebbb98224b5f.tar.bz2 otp-74cee7dc1cc5b0332cd851da4953ebbb98224b5f.zip | |
By default, encode BIT STRING to bitstrings
Add the option 'legacy_bit_string' to decode to the old list format.
Diffstat (limited to 'lib/asn1/src/asn1ct_gen_ber_bin_v2.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct_gen_ber_bin_v2.erl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl b/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl index fe5b5031b6..121f452da8 100644 --- a/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl +++ b/lib/asn1/src/asn1ct_gen_ber_bin_v2.erl @@ -628,12 +628,15 @@ gen_dec_bit_string(BytesVar, _Constraint, [_|_]=NNL, TagStr) -> call(decode_named_bit_string, [BytesVar,{asis,NNL},TagStr]); gen_dec_bit_string(BytesVar, Constraint, [], TagStr) -> - case get(compact_bit_string) of - true -> + case asn1ct:get_bit_string_format() of + compact -> call(decode_compact_bit_string, [BytesVar,{asis,Constraint},TagStr]); - _ -> + legacy -> call(decode_legacy_bit_string, + [BytesVar,{asis,Constraint},TagStr]); + bitstring -> + call(decode_native_bit_string, [BytesVar,{asis,Constraint},TagStr]) end. |