diff options
author | Björn Gustavsson <[email protected]> | 2014-12-04 10:43:11 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2015-01-12 12:22:56 +0100 |
commit | f548abfb7ef76ddf3828d5f90abe2f9df80d5b7c (patch) | |
tree | 7c506100e5d19ed6402432b5620aafcf7b2a4373 | |
parent | a19d71091ac0753e4cfd212b5f2686b53fdf355a (diff) | |
download | otp-f548abfb7ef76ddf3828d5f90abe2f9df80d5b7c.tar.gz otp-f548abfb7ef76ddf3828d5f90abe2f9df80d5b7c.tar.bz2 otp-f548abfb7ef76ddf3828d5f90abe2f9df80d5b7c.zip |
asn1ct_parser2: Correct extraction of line number from token
The first position in a token tuple is always an atom, the second
the line number. The code tested the third position.
-rw-r--r-- | lib/asn1/src/asn1ct_parser2.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/asn1/src/asn1ct_parser2.erl b/lib/asn1/src/asn1ct_parser2.erl index f3a56e1b65..4e5c76539d 100644 --- a/lib/asn1/src/asn1ct_parser2.erl +++ b/lib/asn1/src/asn1ct_parser2.erl @@ -3032,7 +3032,7 @@ merge_constraints([], Cacc, []) -> merge_constraints([], Cacc, Eacc) -> lists:reverse(Cacc) ++ [{element_set,{'Errors',Eacc},none}]. -get_line({_,Pos,Token}) when is_integer(Pos),is_atom(Token) -> +get_line({Token,Pos,_}) when is_integer(Pos), is_atom(Token) -> Pos; get_line({Token,Pos}) when is_integer(Pos),is_atom(Token) -> Pos; |