erlang - 使用 make 编译 LFE 文件

Question

是否有一种标准方法可以根据 OTP 项目中的 make 规则编译 .lfe 源文件？

根据文档，我应该使用 lfe_comp:file/1，如果我想在 OTP 应用程序中编译多个这样的文件(我在这里应该将源文件保存在 src 中，但将二进制文件保存在 ebin 中)。

理想情况下，我可以做类似的事情

erlc -Wf -o ebin src/*lfe

但是erlc中好像没有lfe支持。我能想到的最佳解决方案是

find src/*lfe -exec erl -s lfe_comp file {} -s init stop \;
mv src/*beam ebin/

但这似乎不够优雅。有更好的想法吗？

Answer 1

根据 rvirding 的建议，这是对 lfec 的第一次尝试，它完成了我上面想要的(几乎没有别的)。我会使用 ./lfec -o ebin src/*lfe 从 Makefile 调用它。

#!/usr/bin/env escript
%% -*- erlang -*-
%%! -smp enable -sname lfec -mnesia debug verbose
main(Arguments) ->
    try
        {Opts, Args} = parse_opts(Arguments),
        case get_opt("-o", Opts) of
            false ->
               lists:map(fun lfe_comp:file/1, Args);
            Path ->
               lists:map(fun (Arg) -> lfe_comp:file(Arg, [{outdir, Path}]) end,
                         Args)
        end
    catch
        _:_ -> usage()
    end;
main(_) -> usage().

get_opt(Target, Opts) -> 
    case lists:keyfind(Target, 1, Opts) of
        false -> false;
        {_} -> true;
        {_, Setting} -> Setting
    end.

parse_opts(Args) -> parse_opts(Args, []).
parse_opts(["-o", TargetDir | Rest], Opts) ->
    parse_opts(Rest, [{"-o", TargetDir} | Opts]);
parse_opts(Args, Opts) -> {Opts, Args}.

usage() ->
    io:format("usage:\n"),
    io:format("-o [TargetDir] -- output files to specified directory\n"),
    halt(1).