diff options
Diffstat (limited to 'gnu/packages/embedded.scm')
| -rw-r--r-- | gnu/packages/embedded.scm | 34 |
1 files changed, 18 insertions, 16 deletions
diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm index cc999d35f8..930857d0aa 100644 --- a/gnu/packages/embedded.scm +++ b/gnu/packages/embedded.scm @@ -13,6 +13,7 @@ ;;; Copyright © 2022 Mathieu Othacehe <othacehe@gnu.org> ;;; Copyright © 2022, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com> ;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org> +;;; Copyright © 2024 Artyom V. Poptsov <poptsov.artyom@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -740,12 +741,14 @@ languages are C and C++.") (inherit gdb) (name "gdb-arm-none-eabi") (arguments - `(#:configure-flags '("--target=arm-none-eabi" - "--enable-multilib" - "--enable-interwork" - "--enable-languages=c,c++" - "--disable-nls") - ,@(package-arguments gdb)))))) + (substitute-keyword-arguments (package-arguments gdb) + ((#:configure-flags flags '()) + #~(cons* "--target=arm-none-eabi" + "--enable-multilib" + "--enable-interwork" + "--enable-languages=c,c++" + "--disable-nls" + #$flags))))))) (define-public libjaylink (package @@ -1639,7 +1642,7 @@ STC89, STC90, STC10, STC11, STC12, STC15, STC8 and STC32 series.") (define-public stlink (package (name "stlink") - (version "1.7.0") + (version "1.8.0") (source (origin (method git-fetch) @@ -1649,17 +1652,16 @@ STC89, STC90, STC10, STC11, STC12, STC15, STC8 and STC32 series.") (file-name (git-file-name name version)) (sha256 (base32 - "03xypffpbp4imrczbxmq69vgkr7mbp0ps9dk815br5wwlz6vgygl")))) + "1g5ahnj400sdf75k3xafawa6x0pzz7s86nqnfd65gqjr3bdlhlc6")))) (build-system cmake-build-system) (arguments - `(#:tests? #f ;no tests - #:configure-flags - (let* ((out (assoc-ref %outputs "out")) - (etc (in-vicinity out "etc")) - (modprobe (in-vicinity etc "modprobe.d")) - (udev-rules (in-vicinity etc "udev/rules.d"))) - (list (string-append "-DSTLINK_UDEV_RULES_DIR=" udev-rules) - (string-append "-DSTLINK_MODPROBED_DIR=" modprobe))))) + (list #:tests? #f ;no tests + #:configure-flags + #~(let* ((etc (in-vicinity #$output "etc")) + (modprobe (in-vicinity etc "modprobe.d")) + (udev-rules (in-vicinity etc "udev/rules.d"))) + (list (string-append "-DSTLINK_UDEV_RULES_DIR=" udev-rules) + (string-append "-DSTLINK_MODPROBED_DIR=" modprobe))))) (inputs (list libusb)) (synopsis "Programmer for STM32 Discovery boards") |