diff options
| author | Björn Gustavsson <[email protected]> | 2014-12-08 16:35:56 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-01-12 12:22:58 +0100 |
| commit | 819d4c5622c7c90e2929e349a8f8f2a9df4c72a2 (patch) | |
| tree | 417da30e87e417fa198211cb2c12752ae5706ce6 | |
| parent | e231f962defbfac7d5a2646ab6f1443261b2e8a2 (diff) | |
| download | otp-819d4c5622c7c90e2929e349a8f8f2a9df4c72a2.tar.gz otp-819d4c5622c7c90e2929e349a8f8f2a9df4c72a2.tar.bz2 otp-819d4c5622c7c90e2929e349a8f8f2a9df4c72a2.zip | |
Remove vestiges of obsolete {TypeName,Value} notation
| -rw-r--r-- | lib/asn1/src/asn1ct_check.erl | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lib/asn1/src/asn1ct_check.erl b/lib/asn1/src/asn1ct_check.erl index cdc8c6951a..2c781b7632 100644 --- a/lib/asn1/src/asn1ct_check.erl +++ b/lib/asn1/src/asn1ct_check.erl @@ -2017,8 +2017,6 @@ normalize_value(S0, Type, {'DEFAULT',Value}, NameList) -> normalize_value(S,Type,Val,NameList) -> normalize_value(S,Type,{'DEFAULT',Val},NameList). -normalize_boolean(S,{Name,Bool},CType) when is_atom(Name) -> - normalize_boolean(S,Bool,CType); normalize_boolean(_,true,_) -> true; normalize_boolean(_,false,_) -> @@ -2382,10 +2380,7 @@ normalize_restrictedstring(_S,CString,_) when is_list(CString) -> %% definedvalue case or argument in a parameterized type normalize_restrictedstring(S,ERef,CType) when is_record(ERef,'Externalvaluereference') -> get_normalized_value(S,ERef,CType, - fun normalize_restrictedstring/3,[]); -%% -normalize_restrictedstring(S,{Name,Val},CType) when is_atom(Name) -> - normalize_restrictedstring(S,Val,CType). + fun normalize_restrictedstring/3,[]). normalize_objectclassfieldvalue(S,{opentypefieldvalue,Type,Value},NameList) -> %% An open type has per definition no type. Thus should the type |