diff --git a/rust/hg-core/src/revlog/changelog.rs b/rust/hg-core/src/revlog/changelog.rs
--- a/rust/hg-core/src/revlog/changelog.rs
+++ b/rust/hg-core/src/revlog/changelog.rs
@@ -106,6 +106,20 @@ impl<'changelog> ChangelogEntry<'changel
pub fn as_revlog_entry(&self) -> &RevlogEntry {
&self.revlog_entry
}
+
+ pub fn p1_entry(&self) -> Result