try

src/ra_log_reader.erl

@@ -210,6 +210,7 @@ fetch_term(Idx, #?STATE{cfg = #cfg{} = Cfg} = State0) ->
 segment_read_plan(_RegRefs, [], Acc) ->
     lists:reverse(Acc);
 segment_read_plan([{To, From, Fn} | SegRefs], Indexes, Acc) ->
+    %% TODO: address unnecessary allocation here
     Range = {To, From},
     case lists:splitwith(fun (I) ->
                                  ra_range:in(I, Range)
@@ -345,7 +346,7 @@ get_segment_ext(Dir, Open0, Fn) ->
             AbsFn = filename:join(Dir, Fn),
             case ra_log_segment:open(AbsFn,
                                      #{mode => read,
-                                       access_pattern => sequential})
+                                       access_pattern => random})
             of
                 {ok, S} ->
                     {S, ra_flru:insert(Fn, S, Open0)};