anchor.diff:              Point = data_point(Interval, Value),
               ok = write_at(IO, Point, Position),
   
  -            propagate_lower_archives(IO, Header, Interval, Archive, LowerArchives)
  +            propagate_lower_archives(IO, Header, Interval, Archive, LowerArchives),
  +            ok
       end.
   
   %%
  
positive.code:        true ->
             lager:debug("writing point-seq of len ~w: ~p", [Length, Bytes]),
             ok = write_at(IO, Bytes, Position)
      end,
  
      % TODO: propagate to lower archives (if necessary)
  
      ok.
  
  
  build_consecutive_points(Step, Points) ->
  
negative.code:         WroteAggregate == true ->
              propagate_lower_archives(IO, Header, TimeStamp, Lower, Ls);
          true ->
              false
      end;
  propagate_lower_archives(_, _, _, _, []) -> true.
  
  
  write_propagated_values(IO, Header, Lower, LowerInterval, Values, NumPoints) ->
  