WIP: list_files #2

src/machi_pb_high_client.erl

@@ -20,7 +20,7 @@
 
 %% @doc Machi PB (Protocol Buffers) high-level client (prototype, API TBD)
 %%
-%% At the moment, this is prototype-quality code: the API is not yet
+%% At the moment, this is brittle-prototype-quality code: the API is not yet
 %% fully specified, there is very little error handling with respect
 %% to a single socket connection, and there is no code to deal with
 %% multiple connections/load balancing/error handling to several/all

test/machi_pb_test.erl

@@ -53,6 +53,13 @@ smoke_responses_test() ->
                                               extra= <<"bar">>}},
     R1 = encdec_response(R1),
 
+    Files2 = [#mpb_fileinfo{file_size=X, file_name="foo."++integer_to_list(X)}
+              || X <- lists:seq(1, 5)],
+    R2 = #mpb_response{req_id= <<"x">>,
+                       list_files=#mpb_listfilesresp{status='OK',
+                                                     files=Files2}},
+    R2 = encdec_response(R2),
+
     ok.
 
 encdec_request(M) ->