Expectations is a library, which provides several functions, which can be used in writing tests. So far, the supported datatypes are: String, Integer, DWord, Boolean and raw data.

Tested library by included projects: DynArrays

Example:

procedure TTestDynArrays_TestWritingToArray;
var
  Arr: TDynArrayOfByte;
begin
  InitDynArrayToEmpty(Arr);
  SetDynLength(Arr, 20);

  Arr.Content^[17] := 80;
  ExpectDWord(Arr.Content^[17]).ToBe(80, '');

  FreeDynArray(Arr);
end;


procedure TTestDynArrays_TestReallocationToLargerArray;
var
  Arr: TDynArrayOfByte;
  i: Integer;
begin
  InitDynArrayToEmpty(Arr);
  ExpectBoolean(SetDynLength(Arr, 20)).ToBe(True, '');

  for i := 0 to DynLength(Arr) - 1 do
    Arr.Content^[i] := i * 10;

  ExpectBoolean(SetDynLength(Arr, 30)).ToBe(True, 'expecting successful reallocation');

  for i := 0 to 20 - 1 do  //test up to the old length, as this content has to be valid only
    ExpectDWord(Arr.Content^[i]).ToBe(DWord(i * 10), '');

  FreeDynArray(Arr);
end;

The test results are reported through UART. (See included example projects)