aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/rust-apps.scm
diff options
context:
space:
mode:
authorTimothy Sample <samplet@ngyro.com>2020-09-02 13:44:12 -0400
committerTimothy Sample <samplet@ngyro.com>2020-09-02 13:44:12 -0400
commitf14e808aeae7b2fa7536f5fe62dae66b788fea84 (patch)
tree9be69cd0764783bdd769e54839620fc83b55a964 /gnu/packages/rust-apps.scm
parent4f9043c6eca5a9b32d2be633adc11ceed87faa49 (diff)
downloadguix-f14e808aeae7b2fa7536f5fe62dae66b788fea84.tar.gz
guix-f14e808aeae7b2fa7536f5fe62dae66b788fea84.zip
gnu: hedgewars: Fix build with shared libraries.
Fixes: <https://bugs.gnu.org/43112>. * gnu/packages/games.scm (hedgewars)[arguments]: Set "haskell_flags" in #:configure-flags to enable dynamic linking.
Diffstat (limited to 'gnu/packages/rust-apps.scm')
0 files changed, 0 insertions, 0 deletions
quot; (let ((freetalk-bin (string-append #$freetalk "/bin/freetalk"))) (marionette-eval '(system* #$create-account #$jid #$password) marionette) ;; Freetalk requires write access to $HOME. (setenv "HOME" "/tmp") (system* freetalk-bin "-s" #$script.ft) (host-wait-for-file #$witness))) (test-end)))) (gexp->derivation name test)) (define %create-prosody-account (program-file "create-account" #~(begin (use-modules (ice-9 match)) (match (command-line) ((command jid password) (let ((password-input (format #f "\"~a~%~a\"" password password)) (prosodyctl #$(file-append prosody "/bin/prosodyctl"))) (system (string-join `("echo" ,password-input "|" ,prosodyctl "adduser" ,jid) " ")))))))) (define %test-prosody (let* ((config (prosody-configuration (insecure-sasl-mechanisms '()) (virtualhosts (list (virtualhost-configuration (domain "localhost"))))))) (system-test (name "prosody") (description "Connect to a running Prosody daemon.") (value (run-xmpp-test name (service prosody-service-type config) (prosody-configuration-pidfile config) %create-prosody-account))))) ;;; ;;; BitlBee. ;;; (define (run-bitlbee-test) (define os (marionette-operating-system (simple-operating-system (service dhcp-client-service-type) (service bitlbee-service-type (bitlbee-configuration (interface "0.0.0.0")))) #:imported-modules (source-module-closure '((gnu services herd))))) (define vm (virtual-machine (operating-system os) (port-forwardings `((6667 . 6667))))) (define test (with-imported-modules '((gnu build marionette)) #~(begin (use-modules (ice-9 rdelim) (srfi srfi-64) (gnu build marionette)) (define marionette (make-marionette (list #$vm))) (test-runner-current (system-test-runner #$output)) (test-begin "bitlbee") (test-assert "service started" (marionette-eval '(begin (use-modules (gnu services herd)) (start-service 'bitlbee)) marionette)) (test-assert "connect" (let* ((address (make-socket-address AF_INET INADDR_LOOPBACK 6667)) (sock (socket AF_INET SOCK_STREAM 0))) (connect sock address) ;; See <https://tools.ietf.org/html/rfc1459>. (->bool (string-contains (pk 'message (read-line sock)) "BitlBee")))) (test-end)))) (gexp->derivation "bitlbee-test" test)) (define %test-bitlbee (system-test (name "bitlbee") (description "Connect to a BitlBee IRC server.") (value (run-bitlbee-test)))) (define (run-quassel-test) (define os (marionette-operating-system (simple-operating-system (service dhcp-client-service-type) (service quassel-service-type)) #:imported-modules (source-module-closure '((gnu services herd))))) (define vm (virtual-machine (operating-system os) (port-forwardings `((4242 . 4242))))) (define test (with-imported-modules '((gnu build marionette)) #~(begin (use-modules (srfi srfi-64) (gnu build marionette)) (define marionette (make-marionette (list #$vm))) (test-runner-current (system-test-runner #$output)) (test-begin "quassel") (test-assert "service started" (marionette-eval '(begin (use-modules (gnu services herd)) (start-service 'quassel)) marionette)) (test-assert "certificate file" (marionette-eval '(file-exists? "/var/lib/quassel/quasselCert.pem") marionette)) (test-end)))) (gexp->derivation "quassel-test" test)) (define %test-quassel (system-test (name "quassel") (description "Connect to a quassel IRC server.") (value (run-quassel-test))))