Skip to content

Commit 6d6dfb7

Browse files
committed
Merge branch 'eyraud/doc_ckpt_incompatibility' into 'master'
Reject older checkpoint versions Closes #119 See merge request eng/cov/gnatcoverage!272 We actually document that we reject older checkpoint versions but this was not reflected in the code. Fix this. Closes eng/cov/gnatcoverage#119
2 parents 7a2de5a + 78ecbf9 commit 6d6dfb7

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

Diff for: tools/gnatcov/checkpoints.adb

+1-1
Original file line numberDiff line numberDiff line change
@@ -573,7 +573,7 @@ package body Checkpoints is
573573
if CP_Header.Magic /= Checkpoint_Magic then
574574
Fatal_Error ("invalid checkpoint file " & Filename);
575575

576-
elsif CP_Header.Version not in Checkpoint_Version then
576+
elsif CP_Header.Version /= Checkpoint_Version'Last then
577577
Fatal_Error
578578
("invalid checkpoint version" & CP_Header.Version'Img);
579579

0 commit comments

Comments
 (0)