blocksToDefinitions' defAcc acc [] =
  reverse $ (DefinitionList (reverse defAcc)) : acc
blocksToDefinitions' defAcc acc [] =
  reverse $ (DefinitionList (reverse defAcc)) : acc
blocksToDefinitions' defAcc acc [] =
  reverse $ (DefinitionList (reverse defAcc)) : acc