模塊功能

Question

所以，這兒是個模塊，我寫的一部分：

request(Pid, ListOfDocuments) when is_pid(Pid), is_list(ListOfDocuments) -> 
io:format("We get here~n"), 
case whereis(jdw_api) of 
    undefined -> [no, api]; 
    ApiPid when is_pid(ApiPid) -> 
     io:format("... and here~n"), 
     % (1) Won't work: spawn(?MODULE, loop, [Pid, ListOfDocuments]) 
     % (2) Won't work, either: ?MODULE:loop(Pid, ListOfDocuments) 
     loop(Pid, ListOfDocuments) % (3) and neither does this... 
end. 

...等是這樣的：

loop(Pid, Docs) when is_list(Docs), length(Docs) > 0 -> 
H = hd(Docs), 
T = tl(Docs), 
io:format("... but not here...~w~n", H), 
case ?MODE of 
    sync -> 
     Ref = make_ref(), 
     jdw_api ! {self(), Ref, doc, H}, 
     Ans = loop_sync(Ref, [], []), 
     Pid ! Ans, 
     loop(Pid, T); 
    async -> {error, 'async mode not implemented yet', ?FILE, ?LINE}; 
    _ -> {'?MODE must be either async or sync'} 
end; 
loop(Pid, Docs) -> io:format("Done with document list"). 

...但由於某種原因，「循環」功能永遠不會被調用。三種不同的方式都不會使魔法發生......任何指針？

Answer 1

您的循環函數可能會被調用，但上面顯示的代碼只是該函數的一個子句，只有在使用Pid和非空文檔列表調用時纔會運行。另一個問題是你的錯誤呼叫io:format("... but not here...~w~n", H)應該是io:format("... but not here...~w~n", [H])。該調用可能會導致循環代碼崩潰。沒有更多的資料來源和request/2的例子參數很難說。