From: Peter Lemenkov <lemenkov@gmail.com> Date: Thu, 31 Mar 2016 08:49:49 +0300 Subject: [PATCH] Remove support for erlang packages. Erlang "packages" were abandoned long time ago. Remaining support was dropped in erlang/otp@8e32c07940d9cd1c325d052bded3729333920f81. Signed-off-by: Peter Lemenkov <lemenkov@gmail.com> diff --git a/src/lfe_trans.erl b/src/lfe_trans.erl index d2d21b2..628e4eb 100644 --- a/src/lfe_trans.erl +++ b/src/lfe_trans.erl @@ -139,8 +139,6 @@ from_expr({record_field,_,E,R,{atom,_,F}}, Vt0, St0) -> %We KNOW! RF = list_to_atom(atom_to_list(R) ++ "-" ++ atom_to_list(F)), {Le,Vt1,St1} = from_expr(E, Vt0, St0), {[RF,Le],Vt1,St1}; -from_expr({record_field,_,_,_}=M, Vt, St) -> %Pre R16 packages - from_package_module(M, Vt, St); %% Function calls. from_expr({call,_,{remote,_,M,F},As}, Vt0, St0) -> %Remote function call {Lm,Vt1,St1} = from_expr(M, Vt0, St0), @@ -367,16 +365,6 @@ from_rec_fields([{record_field,_,{var,_,F},E}|Fs], Vt0, St0) -> %special case!! {[F,Le|Lfs],Vt2,St2}; from_rec_fields([], Vt, St) -> {[],Vt,St}. -%% from_package_module(Module, VarTable, State) -> {Module,VarTable,State}. -%% We must handle the special case where in pre-R16 you could have -%% packages with a dotted module path. It used a special record_field -%% tuple. This does not work in R16 and later! - -from_package_module({record_field,_,_,_}=M, Vt, St) -> - Segs = erl_parse:package_segments(M), - A = list_to_atom(packages:concat(Segs)), - {?Q(A),Vt,St}. - from_maybe(_, []) -> []; from_maybe(Tag, Es) -> [[Tag|Es]].