From cbb8edb7153549a62f7978169dc155e28f368f24 Mon Sep 17 00:00:00 2001
From: Maxim Cournoyer <maxim@guixotic.coop>
Date: Tue, 21 Oct 2025 10:51:55 +0900
Subject: [PATCH] gnu: Add poke-elf.

* gnu/packages/engineering.scm (poke-elf): New variable.

Change-Id: If3c462a626e0fdd09adbc6635a04e08a98f0ef33
---
 gnu/packages/engineering.scm | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index 8c9cf20986ba1de194c39b5d5e3c8fbeec2c6aee..2ad544d395d4b879ef563f078b835d16b24d69d5 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -3850,6 +3850,27 @@ full-fledged procedural, interactive programming language designed to describe
 data structures and to operate on them.")
     (license license:gpl3+)))
 
+(define-public poke-elf
+  (package
+    (name "poke-elf")
+    (version "1.0")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://gnu/poke/poke-elf-" version
+                                  ".tar.gz"))
+
+              (sha256
+               (base32
+                "0x3shih7sjj34f5305kvbp4cfy11m92zwidjk3658m23zkd6gdqa"))))
+    (build-system gnu-build-system)
+    (native-inputs (list poke))         ;for the test suite
+    (home-page "https://jemarch.net/poke-elf")
+    (synopsis "GNU poke pickle for ELF object files")
+    (description "@code{poke-elf} is a GNU poke pickle for editing ELF object files,
+executables, shared libraries and core dumps.  It supports many architectures
+and extensions.")
+    (license license:gpl3+)))
+
 (define-public emacs-poke
   ;; The 'emacs-poke' name may eventually refer to 'poke' from ELPA, which is
   ;; a different beast.