aboutsummaryrefslogtreecommitdiffstats
path: root/lib/asn1/src/asn1ct_constructed_per.erl
diff options
context:
space:
mode:
authorKostis Sagonas <[email protected]>2010-11-18 17:30:26 +0200
committerKostis Sagonas <[email protected]>2010-11-18 17:30:26 +0200
commit508a6d2a69e5d3395816fa353d813adb61aa835f (patch)
tree0219df1d02407905a16dd63128f55ff31fd6cb92 /lib/asn1/src/asn1ct_constructed_per.erl
parentf26528bbea0a24674e797a58b97117c1f8cf163f (diff)
downloadotp-508a6d2a69e5d3395816fa353d813adb61aa835f.tar.gz
otp-508a6d2a69e5d3395816fa353d813adb61aa835f.tar.bz2
otp-508a6d2a69e5d3395816fa353d813adb61aa835f.zip
Shut off some dialyzer warnings
Diffstat (limited to 'lib/asn1/src/asn1ct_constructed_per.erl')
-rw-r--r--lib/asn1/src/asn1ct_constructed_per.erl6
1 files changed, 2 insertions, 4 deletions
diff --git a/lib/asn1/src/asn1ct_constructed_per.erl b/lib/asn1/src/asn1ct_constructed_per.erl
index cce6eb9831..d6f23aca06 100644
--- a/lib/asn1/src/asn1ct_constructed_per.erl
+++ b/lib/asn1/src/asn1ct_constructed_per.erl
@@ -326,16 +326,14 @@ gen_decode_constructed(Erules,Typename,D) when is_record(D,type) ->
textual_order([#'ComponentType'{textual_order=undefined}|_],TermList) ->
TermList;
textual_order(CompList,TermList) when is_list(CompList) ->
- OrderList = [Ix||#'ComponentType'{textual_order=Ix} <- CompList],
+ OrderList = [Ix||#'ComponentType'{textual_order=Ix} <- CompList],
[Term||{_,Term}<-
lists:sort(lists:zip(OrderList,
lists:sublist(TermList,length(OrderList))))];
%% sublist is just because Termlist can sometimes be longer than
%% OrderList, which it really shouldn't
textual_order({Root,Ext},TermList) ->
- textual_order(Root ++ Ext,TermList);
-textual_order({Root1,Ext,Root2},TermList) ->
- textual_order(Root1 ++ Ext ++ Root2, TermList).
+ textual_order(Root ++ Ext,TermList).
to_textual_order({Root,Ext}) ->
{to_textual_order(Root),Ext};