anchor.diff:  unit stm32f7xx_hal_sd;
   
   interface
  +
  +{$mode objfpc}
   
   uses
     stm32f7xx_hal,
  
positive.code: var
    errorstate: HAL_SD_ErrorTypedef;
  begin
    while (not __HAL_SD_SDMMC_GET_FLAG(hsd, SDMMC_FLAG_CCRCFAIL or SDMMC_FLAG_CMDREND or SDMMC_FLAG_CTIMEOUT)) do ;
  
    if (__HAL_SD_SDMMC_GET_FLAG(hsd, SDMMC_FLAG_CTIMEOUT)) then
  
negative.code:   errorstate: HAL_SD_ErrorTypedef;
    response_r1: longword;
  begin
    errorstate:=SD_OK;
  
    while (not __HAL_SD_SDMMC_GET_FLAG(hsd, SDMMC_FLAG_CCRCFAIL or SDMMC_FLAG_CMDREND or SDMMC_FLAG_CTIMEOUT)) do
    begin
    end;
  