[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#59762] Add serial-studio
From: |
Maxim Cournoyer |
Subject: |
[bug#59762] Add serial-studio |
Date: |
Mon, 16 Jan 2023 09:33:48 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/28.2 (gnu/linux) |
Hello!
Reviewing patch 2/4.
phodina <phodina@protonmail.com> writes:
> Hi,
>
> this adds a nice GUI program to monitor communication on serial interfaces
> (e.g. UART).
>
> ----
> Petr
>
> From 367d7da4a143949d11fbc76495f935dff7a3f25c Mon Sep 17 00:00:00 2001
> From: Petr Hodina <phodina@protonmail.com>
> Date: Sun, 16 Jan 2022 17:59:22 +0100
> Subject: [PATCH 1/4] gnu: Add qmqtt.
>
> * gnu/packages/qt.scm (qmqtt): New variable.
>
> diff --git a/gnu/packages/qt.scm b/gnu/packages/qt.scm
> index 30bf429897..6aaa9c47c2 100644
> --- a/gnu/packages/qt.scm
> +++ b/gnu/packages/qt.scm
> @@ -3363,6 +3363,68 @@ (define-public python-qt.py
> bindings (PySide, PySide2, PyQt4 and PyQt5).")
> (license license:expat)))
>
> +(define-public qmqtt
> + (package
> + (name "qmqtt")
> + (version "1.0.0")
> + (source (origin
> + (method git-fetch)
> + (uri (git-reference
> + (url "https://github.com/alex-spataru/qmqtt")
> + (commit (string-append "v" version))))
> + (file-name (git-file-name name version))
> + (modules '((guix build utils) (ice-9 ftw)
> + (srfi srfi-1)))
Only (guix build utils) is needed.
> + (snippet `(begin
> + (delete-file-recursively "tests/gtest/gtest")))
Extraneous 'begin' directive.
> + (sha256
> + (base32
> + "1l96cssa9hjmabds9k9nzisxnzr3ndi3r82m3lgwq9ip94kz05nw"))))
> + (build-system cmake-build-system)
> + (arguments
> + `(#:phases (modify-phases %standard-phases
Please use plain list + gexps for new packages.
> + (replace 'configure
> + (lambda* (#:key outputs #:allow-other-keys)
> + (invoke "qmake")))
Extraneous OUTPUTS argument.
> + (replace 'install
> + (lambda* (#:key outputs source #:allow-other-keys)
> + (let* ((out (assoc-ref outputs "out")) (lib
> (string-append
> + out
> "/lib"))
> + (include (string-append out "/include")))
After switching to gexps, use gexp variables such as #$output.
Extraneous SOURCE argument.
> + (mkdir-p lib)
> + (mkdir-p include)
> + (chdir "..") ;we were in dir tests
Prefer active tense (;navigate up from test directore), avoid 'we' as
much as possible.
> + (copy-recursively "lib" lib)
> + (chdir "src/mqtt")
> + (for-each (lambda (file)
> + (install-file (string-append file)
> include))
> + '("qmqtt_client.h" "qmqtt_frame.h"
> + "qmqtt_global.h"
> + "qmqtt.h"
> + "qmqtt_message.h"
> + "qmqtt_networkinterface.h"
> + "qmqtt_routedmessage.h"
> + "qmqtt_router.h"
> + "qmqtt_routesubscription.h"
> + "qmqtt_socketinterface.h"
> + "qmqtt_timerinterface.h"
> + "qmqtt_message.h")))))
> + (replace 'check
> + (lambda* (#:key tests? test-options parallel- +
> + #:allow-other-keys)
Remove extraneous arguments (test-options, parallel-).
> + (when tests?
> + (chdir "tests")
> + (substitute* "gtest/gtest.pro"
> + (("gtest") ""))
> + (invoke "qmake")))))))
> + (native-inputs (list googletest perl python))
> + (inputs (list qtbase-5 openssl qtwebsockets))
> + (home-page "https://github.com/alex-spataru/qmqtt")
> + (synopsis "MQTT Client")
"MQTT client"
> + (description "Provides an MQTT Client with SSL support and Websockets.")
> + (license license:expat)))
Please use make it a full sentence starting with a subject, e.g. "This
package provides an MQTT client with [...]".
--
Thanks,
Maxim