diff options
author | Björn Gustavsson <[email protected]> | 2017-03-14 15:57:25 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2017-03-15 13:03:17 +0100 |
commit | ec57794ac294666a8bf31f9f7f79585ddaeed808 (patch) | |
tree | bdf221ec82a0ddac9a5dc67f8cd1b73c7608e9ce /lib/asn1/src/asn1ct_gen.erl | |
parent | afd0690257ce11ca1e4b50fe70e8f731357dacd1 (diff) | |
download | otp-ec57794ac294666a8bf31f9f7f79585ddaeed808.tar.gz otp-ec57794ac294666a8bf31f9f7f79585ddaeed808.tar.bz2 otp-ec57794ac294666a8bf31f9f7f79585ddaeed808.zip |
Remove default clauses that cause exceptions for internal errors
Just crash if there is an internal error.
Diffstat (limited to 'lib/asn1/src/asn1ct_gen.erl')
-rw-r--r-- | lib/asn1/src/asn1ct_gen.erl | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lib/asn1/src/asn1ct_gen.erl b/lib/asn1/src/asn1ct_gen.erl index 4a51bcf8ec..fa312ed052 100644 --- a/lib/asn1/src/asn1ct_gen.erl +++ b/lib/asn1/src/asn1ct_gen.erl @@ -378,9 +378,7 @@ get_component(Name,{C1,C2}) when is_list(C1),is_list(C2) -> get_component(Name,[C=#'ComponentType'{name=Name}|_Cs]) -> C; get_component(Name,[_C|Cs]) -> - get_component(Name,Cs); -get_component(Name,_) -> - throw({error,{asn1,{internal_error,Name}}}). + get_component(Name,Cs). %% generate code for all inner types that are called from the top type %% of the partial incomplete decode and are defined within the top @@ -597,9 +595,7 @@ gen_encode_constructed(Erules,Typename,InnerType,D) when is_record(D,type) -> Rtmod:gen_encode_sof(Erules,Typename,InnerType,D), {_,Type} = D#type.def, NameSuffix = asn1ct_gen:constructed_suffix(InnerType,Type#type.def), - gen_types(Erules, [NameSuffix|Typename], Type, gen_encode); - _ -> - exit({nyi,InnerType}) + gen_types(Erules, [NameSuffix|Typename], Type, gen_encode) end; gen_encode_constructed(Erules,Typename,InnerType,D) when is_record(D,typedef) -> @@ -1309,9 +1305,7 @@ get_inner(T) when is_tuple(T) -> {valuefieldreference,FieldName} -> get_fieldtype(element(2,Tuple),FieldName); {typefieldreference,FieldName} -> - get_fieldtype(element(2,Tuple),FieldName); - {'EXIT',Reason} -> - throw({asn1,{'internal error in get_inner/1',Reason}}) + get_fieldtype(element(2,Tuple),FieldName) end; _ -> element(1,T) end. |