erlang 反编译

-module(decompile).%% API-export([start/1]).start(Module) when is_atom(Module)->start(Module, erlang:atom_to_list(Module) ++ ".erl").start(Module, ToFile) when is_atom(Module)->{ok,

曾记花开不记年

1314人浏览 · 2016-06-02 22:53:41

曾记花开不记年 · 2016-06-02 22:53:41 发布

-module(decompile).

%% API
-export([
    start/1
]).

start(Module) when is_atom(Module)->
	start(Module, erlang:atom_to_list(Module) ++ ".erl").
start(Module, ToFile) when is_atom(Module)->
    {ok,{_,[{abstract_code,{_,Data}}]}} = beam_lib:chunks(code:which(Module), [abstract_code]),
    SourceCode = erl_prettypr:format(erl_syntax:form_list(Data)),
    file:write_file(ToFile, SourceCode).

CSDN学习社区

CSDN联合极客时间，共同打造面向开发者的精品内容学习社区，助力成长！

更多推荐