Was ich verstehe ist, dass -export()
es möglich machen, einige, aber nicht alle Funktionen in einer Moduldefinition verfügbar zu machen. Innerhalb der Moduldefinition sind jedoch alle Funktionen verfügbar.Warum funktioniert `export` in diesem Modul nicht richtig?
Ich habe ein Modul, das
-module(supervisor_test).
-export([start_listening/0, stop_listening/0, send_to_listener/1]).
listener() ->
receive
{Pid, Ref, x} ->
Pid ! {Ref, o};
{Pid, Ref, o} ->
Pid ! {Ref, x}
end.
supervisor() ->
process_flag(trap_exit, true),
Pid = spawn_link(?MODULE, listener, []),
register(reg_listener, Pid),
receive
{'EXIT', Pid, normal} -> % received when listener() finishes executing
ok;
{'EXIT', Pid, shutdown} -> % received when stop_listening() is called
ok;
{'EXIT', Pid, _} ->
supervisor()
end.
start_listening() ->
spawn(?MODULE, supervisor, []).
stop_listening() ->
Pid = whereis(reg_listener),
exit(Pid, shutdown).
send_to_listener(Value) ->
Ref = make_ref(),
reg_listener ! {self(), Ref, Value},
receive
{Ref, Reply} -> Reply
after 5000 ->
timeout
end.
wie folgt aussieht Jedes Mal, wenn ich kompilieren und rufen supvervisor_test:start_listening()
, erhalte ich die folgende Fehler
=ERROR REPORT==== ... ===
Error in process ... with exit value:
{undef,[{supervisor_test,supervisor,[],[]}]}
Es geht alles weg, wenn ich export_all
und aussetzen.
versuchte ich
-module(test).
-export([f1/0]).
f1() ->
f2().
f2() ->
io:format("I am here!~n").
Kompilieren und test:f1()
Aufruf und es funktioniert gut.