aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTomas Janousek <[email protected]>2012-08-02 01:04:18 +0200
committerTomas Janousek <[email protected]>2012-08-02 01:04:18 +0200
commit18943e753f7791312d89943851169e89acece8fc (patch)
treeea94f490d88b8f70908e964ce1271f20034df060
parent24ad2d1d985bbadb28dc8fe9dfee5e33c3bdcbbc (diff)
downloadotp-18943e753f7791312d89943851169e89acece8fc.tar.gz
otp-18943e753f7791312d89943851169e89acece8fc.tar.bz2
otp-18943e753f7791312d89943851169e89acece8fc.zip
sys_pre_expand: Fix BASE never being set
Commit a612e99fb5aaa934fe5a8591db0f083d7fa0b20a turned module attributes from 2-tuples to 3-tuples but forgot to update get_base/1, breaking BASE for parametric modules.
-rw-r--r--lib/compiler/src/sys_pre_expand.erl2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/compiler/src/sys_pre_expand.erl b/lib/compiler/src/sys_pre_expand.erl
index 68bc83433e..6cea783090 100644
--- a/lib/compiler/src/sys_pre_expand.erl
+++ b/lib/compiler/src/sys_pre_expand.erl
@@ -119,7 +119,7 @@ expand_pmod(Fs0, St0) ->
get_base(As) ->
case lists:keyfind(extends, 1, As) of
- {extends,[Base]} when is_atom(Base) ->
+ {extends,_,[Base]} when is_atom(Base) ->
Base;
_ ->
[]