aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2016-02-23 08:05:45 +0100
committerBjörn Gustavsson <[email protected]>2016-02-23 09:16:50 +0100
commitb9f0b1259da6a26982855f490ba31a0031fca247 (patch)
treeb75a9a5f87d42f2b5435b30fc71b56a32fd6affe
parent6a7d8a49f0f33844a9b94fceb35079ac1b24e043 (diff)
downloadotp-b9f0b1259da6a26982855f490ba31a0031fca247.tar.gz
otp-b9f0b1259da6a26982855f490ba31a0031fca247.tar.bz2
otp-b9f0b1259da6a26982855f490ba31a0031fca247.zip
v3_core: Include line number annotations in binary patterns
We will need them when we start to produce warnings for patterns that can't match.
-rw-r--r--lib/compiler/src/v3_core.erl6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/compiler/src/v3_core.erl b/lib/compiler/src/v3_core.erl
index 72649e5c9f..68c9f964d8 100644
--- a/lib/compiler/src/v3_core.erl
+++ b/lib/compiler/src/v3_core.erl
@@ -1653,10 +1653,12 @@ pat_alias_map_pairs_1([]) -> [].
pat_bin(Ps, St) -> [pat_segment(P, St) || P <- Ps].
-pat_segment({bin_element,_,Val,Size,[Type,{unit,Unit}|Flags]}, St) ->
+pat_segment({bin_element,L,Val,Size,[Type,{unit,Unit}|Flags]}, St) ->
+ Anno = lineno_anno(L, St),
{Pval,[],St1} = pattern(Val,St),
{Psize,[],_St2} = pattern(Size,St1),
- #c_bitstr{val=Pval,size=Psize,
+ #c_bitstr{anno=Anno,
+ val=Pval,size=Psize,
unit=#c_literal{val=Unit},
type=#c_literal{val=Type},
flags=#c_literal{val=Flags}}.