summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChadwain Holness <chadwainholness@gmail.com>2022-03-06 01:24:36 -0500
committerLudovic Courtès <ludo@gnu.org>2022-03-06 22:49:47 +0100
commitdf1959277c714e42a0bf286d51df0a084a6420e9 (patch)
treef31636c6e43cb2feace1c7619c4a82bafab44d40
parenta8d3033da61958c53c44dd5db90672bfc4533ef9 (diff)
downloadguix-patches-df1959277c714e42a0bf286d51df0a084a6420e9.tar
guix-patches-df1959277c714e42a0bf286d51df0a084a6420e9.tar.gz
gnu: cgdb: Reference gdb.
* gnu/packages/debug.scm (cgdb)[inputs]: Add gdb, bash-minimal [arguments]: Add phase to fix hardcoded gdb and sh paths Add configure flags for cross-compilation Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--gnu/packages/debug.scm18
1 files changed, 17 insertions, 1 deletions
diff --git a/gnu/packages/debug.scm b/gnu/packages/debug.scm
index 24d17d95b0..80685900eb 100644
--- a/gnu/packages/debug.scm
+++ b/gnu/packages/debug.scm
@@ -760,9 +760,25 @@ use than similar tools like @command{mtrace}.")
(base32 "1w8ib2vg3pg68d9hh97fw5042c73i9nqavdddc87n9bpscjbaf0d"))))
(build-system gnu-build-system)
(inputs
- (list ncurses readline))
+ (list bash-minimal ncurses readline gdb))
(native-inputs
(list flex texinfo))
+ (arguments
+ `(#:configure-flags
+ (list
+ (string-append "ac_cv_rl_version=" ,(package-version readline))
+ "ac_cv_file__dev_ptmx=no"
+ "ac_cv_file__proc_self_status=no"
+ "ac_cv_func_setpgrp_void=no")
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'unpack 'fix-paths
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((gdb (search-input-file inputs "bin/gdb"))
+ (sh (search-input-file inputs "bin/sh")))
+ (substitute* "lib/util/fork_util.cpp"
+ (("GDB = \"gdb\"") (string-append "GDB = \"" gdb "\"")))
+ (substitute* "cgdb/cgdb.cpp" (("/bin/sh") sh))))))))
(home-page "https://cgdb.github.io")
(synopsis "Console front-end to the GNU debugger")
(description