diff options
| author | Björn Gustavsson <[email protected]> | 2012-11-15 08:17:27 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2012-11-22 17:23:12 +0100 |
| commit | 0481bd15d660853076036c09d7adcce1de523a23 (patch) | |
| tree | abb8340dd5cafa1b01fc3a073a9324ebf4f24f92 /lib/asn1/src/asn1rt_per_bin_rt2ct.erl | |
| parent | d2989f33c435e1ec2b788772c5e4a77835ec5e10 (diff) | |
| download | otp-0481bd15d660853076036c09d7adcce1de523a23.tar.gz otp-0481bd15d660853076036c09d7adcce1de523a23.tar.bz2 otp-0481bd15d660853076036c09d7adcce1de523a23.zip | |
Remove support for the obsolete {Typename,Value} tuple notation
Of the back-ends that we are going to keep, only the UPER back-end
support the obsolete {Typename,Value} notation. For consistency
with the PER and BER encodings, remove the support for UPER
encoding too. Also remove vestiges of the support for the
notation in the other back-ends.
Diffstat (limited to 'lib/asn1/src/asn1rt_per_bin_rt2ct.erl')
| -rw-r--r-- | lib/asn1/src/asn1rt_per_bin_rt2ct.erl | 14 |
1 files changed, 1 insertions, 13 deletions
diff --git a/lib/asn1/src/asn1rt_per_bin_rt2ct.erl b/lib/asn1/src/asn1rt_per_bin_rt2ct.erl index 1df757a47f..290054b4dc 100644 --- a/lib/asn1/src/asn1rt_per_bin_rt2ct.erl +++ b/lib/asn1/src/asn1rt_per_bin_rt2ct.erl @@ -22,7 +22,7 @@ -include("asn1_records.hrl"). --export([dec_fixup/3, cindex/3, list_to_record/2]). +-export([dec_fixup/3]). -export([setchoiceext/1, setext/1, fixoptionals/3, fixextensions/2, getext/1, getextension/2, skipextensions/3, getbit/1, getchoice/3 ]). -export([getoptionals/2, getoptionals2/2, @@ -87,18 +87,6 @@ dec_fixup([H|T],[Hc|Tc],RemBytes,Acc) -> dec_fixup([],_Cnames,RemBytes,Acc) -> {lists:reverse(Acc),RemBytes}. -cindex(Ix,Val,Cname) -> - case element(Ix,Val) of - {Cname,Val2} -> Val2; - X -> X - end. - -%% converts a list to a record if necessary -list_to_record(_,Tuple) when is_tuple(Tuple) -> - Tuple; -list_to_record(Name,List) when is_list(List) -> - list_to_tuple([Name|List]). - %%-------------------------------------------------------- %% setchoiceext(InRootSet) -> [{bit,X}] %% X is set to 1 when InRootSet==false |