Erlang 为什么我在Webmachine中的成功流式响应的状态代码为500？

以下代码是webmachine资源的完整源代码。预期的行为是流式响应应该是200，并且应该是指定长度的字符串，完全由字母“a”组成

该字符串确实作为响应主体返回，但状态代码为500。这怎么可能

-module(dummy_binary_resource).
-export([init/1, to_html/2]).

-include_lib("webmachine/include/webmachine.hrl").

init(Config)->
    {ok, Config}.

send_streamed_body(Remaining) ->
    PacketSize=1024,
    case Remaining of
        Partial when Partial =< PacketSize ->
            {string:chars($a,Partial),done};
        Full ->
            {string:chars($a,Full), fun() -> send_streamed_body(Remaining - PacketSize) end}
    end.

to_html(ReqData,State)->
    PathInfo = wrq:path_info(ReqData),
    {ok,SizeString} = dict:find(size,PathInfo),
    {Size,[]} = string:to_integer(SizeString),
    {true,wrq:set_resp_body({stream,send_streamed_body(Size)},ReqData),State}.

-模块（虚拟二进制资源）。
-导出（[init/1，to_html/2]）。
-include_lib（“webmachine/include/webmachine.hrl”）。
初始化（配置）->
{好的，配置}。
发送流式正文（剩余）->
PacketSize=1024，
案件剩余
部分时为部分=
{string:chars（$a，Partial），done}；
完整->
{string:chars（$a，Full），fun（）->send_streamed_body（剩余-PacketSize）end}
结束。
到html（请求数据、状态）->
路径信息=wrq：路径信息（ReqData），
{ok，SizeString}=dict:find（大小，路径信息），
{Size，[]}=string:to_integer（SizeString），
{true，wrq:set_resp_body（{stream，send_streamed_body（Size）}，ReqData），State}。

返回值不正确

适当的返回值是

{halt，200}，wrq:set_resp_body（{stream，send_streamed_body（Size）}，ReqData），State}。

因为请求数据记录已用默认代码500初始化。返回一个“停止”值似乎有点违反直觉，它不会停止任何事情，但实际上意味着成功