diff options
| author | Björn Gustavsson <[email protected]> | 2014-11-12 14:42:00 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-01-12 11:40:27 +0100 |
| commit | ad5b931714295640ff117d23aeb8f691e9cc8a55 (patch) | |
| tree | 3cbf05b6b3871d6f8c7e2f62afdd4aaadcbc7ae4 /lib/asn1/src/asn1ct_parser2.erl | |
| parent | 1ba5c4caefe9d44266e8675e6a991280dddffde6 (diff) | |
| download | otp-ad5b931714295640ff117d23aeb8f691e9cc8a55.tar.gz otp-ad5b931714295640ff117d23aeb8f691e9cc8a55.tar.bz2 otp-ad5b931714295640ff117d23aeb8f691e9cc8a55.zip | |
Clean up checking of object sets
Diffstat (limited to 'lib/asn1/src/asn1ct_parser2.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct_parser2.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/asn1/src/asn1ct_parser2.erl b/lib/asn1/src/asn1ct_parser2.erl index bcfa779997..9b2fc0b046 100644 --- a/lib/asn1/src/asn1ct_parser2.erl +++ b/lib/asn1/src/asn1ct_parser2.erl @@ -893,7 +893,7 @@ parse_ElementSetSpecs(Tokens) -> parse_ElementSetSpec([{'ALL',_},{'EXCEPT',_}|Rest]) -> {Exclusions,Rest2} = parse_Elements(Rest), - {{'ALL',{'EXCEPT',Exclusions}},Rest2}; + {{'ALL-EXCEPT',Exclusions},Rest2}; parse_ElementSetSpec(Tokens) -> parse_Unions(Tokens). @@ -983,7 +983,7 @@ parse_IntersectionElements(Tokens) -> case Rest of [{'EXCEPT',_}|Rest2] -> {Exclusion,Rest3} = parse_Elements(Rest2), - {{InterSec,{'EXCEPT',Exclusion}},Rest3}; + {{'EXCEPT',InterSec,Exclusion},Rest3}; Rest -> {InterSec,Rest} end. |