mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
Merge branch 'master' into gnome-team
This commit is contained in:
commit
2cbb1a6e1e
64 changed files with 3641 additions and 2388 deletions
|
@ -3,7 +3,7 @@
|
|||
!#
|
||||
;;;; test-driver.scm - Guile test driver for Automake testsuite harness
|
||||
|
||||
(define script-version "2021-02-02.05") ;UTC
|
||||
(define script-version "2023-12-08.14") ;UTC
|
||||
|
||||
;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
|
||||
;;; Copyright © 2021 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
|
@ -274,6 +274,7 @@ (define (main . args)
|
|||
(exit 0)))
|
||||
|
||||
;;; Local Variables:
|
||||
;;; mode: scheme
|
||||
;;; eval: (add-hook 'write-file-functions 'time-stamp)
|
||||
;;; time-stamp-start: "(define script-version \""
|
||||
;;; time-stamp-format: "%:y-%02m-%02d.%02H"
|
||||
|
|
|
@ -1799,7 +1799,7 @@ Setup}), or simply fail.
|
|||
When the build or substitution process remains silent for more than
|
||||
@var{seconds}, terminate it and report a build failure.
|
||||
|
||||
The default value is @code{0}, which disables the timeout.
|
||||
The default value is @code{3600} (one hour).
|
||||
|
||||
The value specified here can be overridden by clients (@pxref{Common
|
||||
Build Options, @option{--max-silent-time}}).
|
||||
|
@ -1808,7 +1808,7 @@ Build Options, @option{--max-silent-time}}).
|
|||
Likewise, when the build or substitution process lasts for more than
|
||||
@var{seconds}, terminate it and report a build failure.
|
||||
|
||||
The default value is @code{0}, which disables the timeout.
|
||||
The default value is 24 hours.
|
||||
|
||||
The value specified here can be overridden by clients (@pxref{Common
|
||||
Build Options, @option{--timeout}}).
|
||||
|
@ -19455,8 +19455,8 @@ few seconds when enough entropy is available and is only done once; you
|
|||
might want to turn it off for instance in a virtual machine that does
|
||||
not need it and where the extra boot time is a problem.
|
||||
|
||||
@item @code{max-silent-time} (default: @code{0})
|
||||
@itemx @code{timeout} (default: @code{0})
|
||||
@item @code{max-silent-time} (default: @code{3600})
|
||||
@itemx @code{timeout} (default: @code{(* 3600 24)})
|
||||
The number of seconds of silence and the number of seconds of activity,
|
||||
respectively, after which a build process times out. A value of zero
|
||||
disables the timeout.
|
||||
|
@ -39746,6 +39746,9 @@ This must be a list of strings where each string has the form
|
|||
"TMPDIR=/tmp/dockerd")
|
||||
@end lisp
|
||||
|
||||
@item @code{config-file} (type: maybe-file-like)
|
||||
JSON configuration file pass to @command{dockerd}.
|
||||
|
||||
@end table
|
||||
@end deftp
|
||||
|
||||
|
|
|
@ -310,7 +310,8 @@ (define-team go
|
|||
(define-team bootstrap
|
||||
(team 'bootstrap
|
||||
#:name "Bootstrap"
|
||||
#:scope (list "gnu/packages/mes.scm")))
|
||||
#:scope (list "gnu/packages/commencement.scm"
|
||||
"gnu/packages/mes.scm")))
|
||||
|
||||
(define-team embedded
|
||||
(team 'embedded
|
||||
|
@ -424,6 +425,21 @@ (define-team core
|
|||
(make-regexp* "^guix/scripts/")
|
||||
(make-regexp* "^guix/store/"))))
|
||||
|
||||
(define-team core-packages
|
||||
(team 'core-packages
|
||||
#:name "Core packages"
|
||||
#:description "Core packages: the GNU tool chain, Guile, Coreutils, etc."
|
||||
#:scope (list "gnu/packages/base.scm"
|
||||
"gnu/packages/bootstrap.scm"
|
||||
"gnu/packages/commencement.scm"
|
||||
"gnu/packages/cross-base.scm"
|
||||
"gnu/packages/gcc.scm"
|
||||
"gnu/packages/guile.scm"
|
||||
"gnu/packages/make-bootstrap.scm"
|
||||
"guix/build/gnu-build-system.scm"
|
||||
"guix/build/utils.scm"
|
||||
"guix/build-system/gnu.scm")))
|
||||
|
||||
(define-team games
|
||||
(team 'games
|
||||
#:name "Games and Toys"
|
||||
|
@ -556,7 +572,7 @@ (define-member (person "Jonathan Brielmaier"
|
|||
|
||||
(define-member (person "Ludovic Courtès"
|
||||
"ludo@gnu.org")
|
||||
core home bootstrap installer mentors)
|
||||
core home bootstrap core-packages installer mentors)
|
||||
|
||||
(define-member (person "Andreas Enge"
|
||||
"andreas@enge.fr")
|
||||
|
|
34
etc/teams/rust/rust-manifest.scm
Normal file
34
etc/teams/rust/rust-manifest.scm
Normal file
|
@ -0,0 +1,34 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
||||
;;; under the terms of the GNU General Public License as published by
|
||||
;;; the Free Software Foundation; either version 3 of the License, or (at
|
||||
;;; your option) any later version.
|
||||
;;;
|
||||
;;; GNU Guix is distributed in the hope that it will be useful, but
|
||||
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
;;; GNU General Public License for more details.
|
||||
;;;
|
||||
;;; You should have received a copy of the GNU General Public License
|
||||
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
;;; This file returns a manifest of packages built using the cargo-build-system.
|
||||
;;; It is used to assist continuous integration of the rust-team branch.
|
||||
|
||||
(use-modules (guix packages)
|
||||
(guix profiles)
|
||||
(guix build-system))
|
||||
|
||||
(manifest
|
||||
(map package->manifest-entry
|
||||
(fold-packages
|
||||
(lambda (package lst)
|
||||
(if (eq? (build-system-name (package-build-system package))
|
||||
(quote cargo))
|
||||
(cons package lst)
|
||||
lst))
|
||||
(list))))
|
|
@ -307,6 +307,7 @@ GNU_SYSTEM_MODULES = \
|
|||
%D%/packages/gobby.scm \
|
||||
%D%/packages/golang.scm \
|
||||
%D%/packages/golang-check.scm \
|
||||
%D%/packages/golang-web.scm \
|
||||
%D%/packages/gperf.scm \
|
||||
%D%/packages/gpodder.scm \
|
||||
%D%/packages/gps.scm \
|
||||
|
@ -1115,11 +1116,9 @@ dist_patch_DATA = \
|
|||
%D%/packages/patches/emacs-deferred-fix-number-of-arguments.patch \
|
||||
%D%/packages/patches/emacs-elpy-dup-test-name.patch \
|
||||
%D%/packages/patches/emacs-exec-path.patch \
|
||||
%D%/packages/patches/emacs-ess-fix-obsolete-function-alias.patch \
|
||||
%D%/packages/patches/emacs-git-email-missing-parens.patch \
|
||||
%D%/packages/patches/emacs-fix-scheme-indent-function.patch \
|
||||
%D%/packages/patches/emacs-json-reformat-fix-tests.patch \
|
||||
%D%/packages/patches/emacs-haskell-mode-no-redefine-builtin.patch \
|
||||
%D%/packages/patches/emacs-helpful-fix-tests.patch \
|
||||
%D%/packages/patches/emacs-highlight-stages-add-gexp.patch \
|
||||
%D%/packages/patches/emacs-lispy-fix-thread-last-test.patch \
|
||||
|
|
|
@ -71,6 +71,7 @@ (define-module (gnu packages backup)
|
|||
#:use-module (gnu packages glib)
|
||||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages gperf)
|
||||
#:use-module (gnu packages gtk)
|
||||
#:use-module (gnu packages guile)
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2015-2023 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2015-2024 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2016, 2017, 2018, 2020, 2021 Roel Janssen <roel@gnu.org>
|
||||
;;; Copyright © 2016 Pjotr Prins <pjotr.guix@thebird.nl>
|
||||
;;; Copyright © 2016 Ben Woodcroft <donttrustben@gmail.com>
|
||||
|
@ -7324,13 +7324,13 @@ (define-public r-edaseq
|
|||
(define-public r-edger
|
||||
(package
|
||||
(name "r-edger")
|
||||
(version "4.0.3")
|
||||
(version "4.0.5")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (bioconductor-uri "edgeR" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0sz46pwa1bsqrff2igswfhhj1fcwzn34zrlawy4fnb58z48kccb0"))))
|
||||
"16cghh83v14jdq5n6xkm3jxj87n6l6zrxjgqdwb2ffgc26vkpb7w"))))
|
||||
(properties `((upstream-name . "edgeR")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
|
@ -7462,6 +7462,37 @@ (define-public r-ensembldb
|
|||
;; No version specified
|
||||
(license license:lgpl3+)))
|
||||
|
||||
(define-public r-epidish
|
||||
(package
|
||||
(name "r-epidish")
|
||||
(version "2.18.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (bioconductor-uri "EpiDISH" version))
|
||||
(sha256
|
||||
(base32 "170ym3y6gd1kxghz2g5ynvgi1wrxx87b568cjcvzidpqkrkg87s6"))))
|
||||
(properties `((upstream-name . "EpiDISH")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs (list r-e1071
|
||||
r-locfdr
|
||||
r-mass
|
||||
r-matrix
|
||||
r-matrixstats
|
||||
r-quadprog
|
||||
r-stringr))
|
||||
(native-inputs (list r-knitr))
|
||||
(home-page "https://github.com/sjczheng/EpiDISH")
|
||||
(synopsis "Epigenetic dissection of intra-sample-heterogeneity")
|
||||
(description
|
||||
"@code{EpiDISH} is a R package to infer the proportions of a priori known
|
||||
cell-types present in a sample representing a mixture of such cell-types.
|
||||
Right now, the package can be used on DNAm data of whole blood, generic
|
||||
epithelial tissue and breast tissue. Besides, the package provides a function
|
||||
that allows the identification of differentially methylated cell-types and
|
||||
their directionality of change in Epigenome-Wide Association Studies.")
|
||||
(license license:gpl2)))
|
||||
|
||||
(define-public r-fastseg
|
||||
(package
|
||||
(name "r-fastseg")
|
||||
|
@ -10314,6 +10345,49 @@ (define-public r-scdblfinder
|
|||
comprehensive scDblFinder method.")
|
||||
(license license:gpl3)))
|
||||
|
||||
;; This is a CRAN package, but it depends on packages from Bioconductor.
|
||||
(define-public r-scgate
|
||||
(package
|
||||
(name "r-scgate")
|
||||
(version "1.6.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "scGate" version))
|
||||
(sha256
|
||||
(base32 "0h12d36zjc6fvxbhkxrzbpvw49z9fgyn1jc941q70ajw1yqi2hhh"))))
|
||||
(properties `((upstream-name . "scGate")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-biocparallel
|
||||
r-dplyr
|
||||
r-ggplot2
|
||||
r-ggridges
|
||||
r-patchwork
|
||||
r-reshape2
|
||||
r-seurat
|
||||
r-ucell))
|
||||
(native-inputs (list r-knitr))
|
||||
(home-page "https://github.com/carmonalab/scGate")
|
||||
(synopsis
|
||||
"Marker-based cell type purification for single-cell sequencing data")
|
||||
(description
|
||||
"This package provides a method to purify a cell type or cell population
|
||||
of interest from heterogeneous datasets. scGate package automatizes
|
||||
marker-based purification of specific cell populations, without requiring
|
||||
training data or reference gene expression profiles. scGate takes as input a
|
||||
gene expression matrix stored in a Seurat object and a @acronym{GM, gating
|
||||
model}, consisting of a set of marker genes that define the cell population of
|
||||
interest. It evaluates the strength of signature marker expression in each
|
||||
cell using the rank-based method UCell, and then performs @acronym{kNN,
|
||||
k-nearest neighbor} smoothing by calculating the mean UCell score across
|
||||
neighboring cells. kNN-smoothing aims at compensating for the large degree of
|
||||
sparsity in scRNAseq data. Finally, a universal threshold over kNN-smoothed
|
||||
signature scores is applied in binary decision trees generated from the
|
||||
user-provided gating model, to annotate cells as either “pure” or “impure”,
|
||||
with respect to the cell population of interest.")
|
||||
(license license:gpl3)))
|
||||
|
||||
;; This is a CRAN package, but it depends on packages from Bioconductor.
|
||||
(define-public r-scistreer
|
||||
(package
|
||||
|
@ -10436,6 +10510,38 @@ (define-public r-screpertoire
|
|||
powerTCR R packages.")
|
||||
(license license:gpl2)))
|
||||
|
||||
(define-public r-scrnaseq
|
||||
(package
|
||||
(name "r-scrnaseq")
|
||||
(version "2.16.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (bioconductor-uri "scRNAseq" version
|
||||
'experiment))
|
||||
(sha256
|
||||
(base32 "0dbh3sqq7lkkdf7vls5qg7fbn6y74c7hsigb4d69pvk934ll88aw"))))
|
||||
(properties `((upstream-name . "scRNAseq")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs (list r-annotationdbi
|
||||
r-annotationhub
|
||||
r-biocgenerics
|
||||
r-ensembldb
|
||||
r-experimenthub
|
||||
r-genomicfeatures
|
||||
r-genomicranges
|
||||
r-s4vectors
|
||||
r-singlecellexperiment
|
||||
r-summarizedexperiment))
|
||||
(native-inputs (list r-knitr))
|
||||
(home-page "https://bioconductor.org/packages/scRNAseq")
|
||||
(synopsis "Collection of public single-cell RNA-seq datasets")
|
||||
(description
|
||||
"This package contains gene-level counts for a collection of public
|
||||
@code{scRNA-seq} datasets, provided as @code{SingleCellExperiment} objects
|
||||
with cell- and gene-level metadata.")
|
||||
(license license:cc0)))
|
||||
|
||||
(define-public r-scry
|
||||
(package
|
||||
(name "r-scry")
|
||||
|
@ -10793,6 +10899,44 @@ (define-public r-tkwidgets
|
|||
"This package implements widgets to provide user interfaces.")
|
||||
(license license:artistic2.0)))
|
||||
|
||||
(define-public r-toast
|
||||
(package
|
||||
(name "r-toast")
|
||||
(version "1.16.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (bioconductor-uri "TOAST" version))
|
||||
(sha256
|
||||
(base32 "00wpgs2zdrgrh9xmp6m5h9xgv85mhdi36qvwg9gwbz9i7cfabmy1"))))
|
||||
(properties `((upstream-name . "TOAST")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs (list r-corpcor
|
||||
r-doparallel
|
||||
r-epidish
|
||||
r-ggally
|
||||
r-ggplot2
|
||||
r-limma
|
||||
r-nnls
|
||||
r-quadprog
|
||||
r-summarizedexperiment
|
||||
r-tidyr))
|
||||
(native-inputs (list r-knitr))
|
||||
(home-page "https://bioconductor.org/packages/TOAST")
|
||||
(synopsis "Tools for the analysis of heterogeneous tissues")
|
||||
(description
|
||||
"This package is devoted to analyzing high-throughput data (e.g. gene
|
||||
expression microarray, DNA methylation microarray, RNA-seq) from complex
|
||||
tissues. Current functionalities include
|
||||
|
||||
@enumerate
|
||||
@item detect cell-type specific or cross-cell type differential signals
|
||||
@item tree-based differential analysis
|
||||
@item improve variable selection in reference-free deconvolution
|
||||
@item partial reference-free deconvolution with prior knowledge.
|
||||
@end enumerate")
|
||||
(license license:gpl2)))
|
||||
|
||||
;; TODO: check javascript
|
||||
(define-public r-trackviewer
|
||||
(package
|
||||
|
|
|
@ -130,6 +130,7 @@ (define-module (gnu packages bioinformatics)
|
|||
#:use-module (gnu packages pdf)
|
||||
#:use-module (gnu packages perl)
|
||||
#:use-module (gnu packages perl-check)
|
||||
#:use-module (gnu packages perl-web)
|
||||
#:use-module (gnu packages pkg-config)
|
||||
#:use-module (gnu packages popt)
|
||||
#:use-module (gnu packages protobuf)
|
||||
|
@ -574,6 +575,30 @@ (define-public bitmapperbs
|
|||
whole-genome bisulfite sequencing (WGBS) reads from directional protocol.")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public bustools
|
||||
(package
|
||||
(name "bustools")
|
||||
(version "0.43.2")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/BUStools/bustools")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"068kjlc4d528269nl5mc3j8h2c95r1v545d3fi1iw1ckg8rba0hg"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments (list #:tests? #f)) ;no test target
|
||||
(inputs (list zlib))
|
||||
(home-page "https://bustools.github.io")
|
||||
(synopsis "Tools for working with BUS files")
|
||||
(description "bustools is a program for manipulating BUS files for single
|
||||
cell RNA-Seq datasets. It can be used to error correct barcodes, collapse
|
||||
UMIs, produce gene count or transcript compatibility count matrices, and is useful
|
||||
for many other tasks.")
|
||||
(license license:bsd-2)))
|
||||
|
||||
(define-public cellsnp-lite
|
||||
;; Last release is from November 2021 and does not contain fixes.
|
||||
(let ((commit "0885d746b0b1ea65c8ef92f8943ca7669ca9734a")
|
||||
|
@ -617,6 +642,50 @@ (define-public cellsnp-lite
|
|||
memory usage.")
|
||||
(license license:asl2.0))))
|
||||
|
||||
(define-public cpat
|
||||
(package
|
||||
(name "cpat")
|
||||
(version "3.0.4")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "CPAT" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0dfrwwbhv1n4nh2a903d1qfb30fgxgya89sa70aci3wzf8h2z0vd"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(for-each delete-file-recursively
|
||||
(list ".eggs"
|
||||
"lib/__pycache__/"
|
||||
"lib/cpmodule/__pycache__/")))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
'(modify-phases %standard-phases
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
(with-directory-excursion "test"
|
||||
;; There is no test4.fa
|
||||
(substitute* "test.sh"
|
||||
((".*-g test4.fa.*") ""))
|
||||
(invoke "bash" "test.sh"))))))))
|
||||
(propagated-inputs
|
||||
(list python-numpy python-pysam))
|
||||
(inputs
|
||||
(list r-minimal))
|
||||
(home-page "https://wlcb.oit.uci.edu/cpat/")
|
||||
(synopsis "Alignment-free distinction between coding and noncoding RNA")
|
||||
(description
|
||||
"CPAT is a method to distinguish coding and noncoding RNA by using a
|
||||
logistic regression model based on four pure sequence-based, linguistic
|
||||
features: ORF size, ORF coverage, Ficket TESTCODE, and Hexamer usage bias.
|
||||
Linguistic features based method does not require other genomes or protein
|
||||
databases to perform alignment and is more robust. Because it is
|
||||
alignment-free, it runs much faster and also easier to use.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public pbcopper
|
||||
(package
|
||||
(name "pbcopper")
|
||||
|
@ -1070,6 +1139,42 @@ (define-public r-singlet
|
|||
similar.")
|
||||
(license license:gpl2+))))
|
||||
|
||||
(define-public r-stacas
|
||||
(package
|
||||
(name "r-stacas")
|
||||
(version "2.2.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/carmonalab/STACAS")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "13i0h5i6vlbrb8ndq9gr81560z9d74b2c7m3rjfzls01irjza9hm"))))
|
||||
(properties `((upstream-name . "STACAS")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-biocneighbors
|
||||
r-biocparallel
|
||||
r-ggplot2
|
||||
r-ggridges
|
||||
r-pbapply
|
||||
r-r-utils
|
||||
r-seurat))
|
||||
(home-page "https://github.com/carmonalab/STACAS")
|
||||
(synopsis "Sub-type anchoring correction for alignment in Seurat")
|
||||
(description
|
||||
"This package implements methods for batch correction and integration of
|
||||
scRNA-seq datasets, based on the Seurat anchor-based integration framework.
|
||||
In particular, STACAS is optimized for the integration of heterogenous
|
||||
datasets with only limited overlap between cell sub-types (e.g. TIL sets of
|
||||
CD8 from tumor with CD8/CD4 T cells from lymphnode), for which the default
|
||||
Seurat alignment methods would tend to over-correct biological differences.
|
||||
The 2.0 version of the package allows the users to incorporate explicit
|
||||
information about cell-types in order to assist the integration process.")
|
||||
(license license:gpl3)))
|
||||
|
||||
(define-public r-stringendo
|
||||
(let ((commit "15594b1bba11048a812874bafec0eea1dcc8618a")
|
||||
(revision "1"))
|
||||
|
@ -1156,6 +1261,32 @@ (define-public r-streamgraph
|
|||
visualizations.")
|
||||
(license license:expat))))
|
||||
|
||||
(define-public r-wasabi
|
||||
(let ((commit "8c33cabde8d18c2657cd6e38e7cb834f87cf9846")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "r-wasabi")
|
||||
(version (git-version "1.0.1" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/COMBINE-lab/wasabi")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0rpdj6n4cnx8n2zl60dzgl638474sg49dknwi9x3qb4g56dpphfa"))))
|
||||
(properties `((upstream-name . "wasabi")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs (list r-data-table r-rhdf5 r-rjson))
|
||||
(home-page "https://github.com/COMBINE-lab/wasabi")
|
||||
(synopsis "Use Sailfish and Salmon with Sleuth")
|
||||
(description
|
||||
"This package converts the output of the Sailfish and Salmon RNA-seq
|
||||
quantification tools so that it can be used with the Sleuth differential
|
||||
analysis package.")
|
||||
(license license:bsd-3))))
|
||||
|
||||
(define-public pbbam
|
||||
(package
|
||||
(name "pbbam")
|
||||
|
@ -2259,6 +2390,40 @@ (define-public python-scdamandtools
|
|||
counts.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public python-snaptools
|
||||
(package
|
||||
(name "python-snaptools")
|
||||
(version "1.4.8")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "snaptools" version))
|
||||
(sha256
|
||||
(base32
|
||||
"1s5373g5jjbshh3q39zy7dlxr7nda6ksxq9d1gw46h82c4fsmfbn"))))
|
||||
(build-system pyproject-build-system)
|
||||
(propagated-inputs
|
||||
(list python-future
|
||||
python-h5py
|
||||
python-louvain
|
||||
python-numpy
|
||||
python-pybedtools
|
||||
python-pysam))
|
||||
(home-page "https://github.com/r3fang/SnapTools")
|
||||
(synopsis "Tools for processing snap files" )
|
||||
(description
|
||||
"@code{SnapTools} can operate on snap files the following types of
|
||||
operations:
|
||||
|
||||
@itemize
|
||||
@item index the reference genome before alignment;
|
||||
@item align reads to the corresponding reference genome;
|
||||
@item pre-process by convert pair-end reads into fragments, checking the
|
||||
mapping quality score, alingment and filtration;
|
||||
@item create the cell-by-bin matrix.
|
||||
@end itemize")
|
||||
(license license:asl2.0)))
|
||||
|
||||
(define-public python-bioframe
|
||||
(package
|
||||
(name "python-bioframe")
|
||||
|
@ -4893,6 +5058,126 @@ (define-public trf
|
|||
bases are detected.")
|
||||
(license license:agpl3+)))
|
||||
|
||||
(define-public trinityrnaseq
|
||||
(package
|
||||
(name "trinityrnaseq")
|
||||
(version "2.13.2")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/trinityrnaseq/trinityrnaseq.git")
|
||||
(commit (string-append "Trinity-v" version))
|
||||
(recursive? #true)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1qszrxqbx4q5pavpgm4rkrh1z1v1mf7qx83vv3fnlqdmncnsf1gv"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:test-target "test"
|
||||
#:modules
|
||||
'((guix build gnu-build-system)
|
||||
(guix build utils)
|
||||
(ice-9 match)
|
||||
(srfi srfi-1))
|
||||
#:make-flags
|
||||
#~(list (string-append "CC=" #$(cc-for-target)))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(replace 'configure
|
||||
(lambda _
|
||||
(setenv "SHELL" (which "sh"))
|
||||
(setenv "CONFIG_SHELL" (which "sh"))
|
||||
;; Do not require version.h, which triggers a local build of a
|
||||
;; vendored htslib.
|
||||
(substitute* "trinity-plugins/bamsifter/Makefile"
|
||||
(("sift_bam_max_cov.cpp htslib/version.h")
|
||||
"sift_bam_max_cov.cpp"))))
|
||||
(add-after 'build 'build-plugins
|
||||
(lambda _
|
||||
;; Run this in the subdirectory to avoid running the
|
||||
;; tests right here.
|
||||
(with-directory-excursion "trinity-plugins"
|
||||
(invoke "make" "plugins"))))
|
||||
;; The install script uses rsync, provides no overrides for the
|
||||
;; default location at /usr/local/bin, and patching it would change
|
||||
;; all lines that do something.
|
||||
(replace 'install
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((share (string-append #$output "/share/trinity/"))
|
||||
(bin (string-append #$output "/bin/")))
|
||||
(mkdir-p bin)
|
||||
(copy-recursively "." share)
|
||||
(delete-file (string-append share "/Chrysalis/build/CMakeFiles/CMakeOutput.log"))
|
||||
(delete-file (string-append share "/Inchworm/build/CMakeFiles/CMakeOutput.log"))
|
||||
|
||||
(wrap-program (string-append share "Trinity")
|
||||
`("R_LIBS_SITE" ":" = (,(getenv "R_LIBS_SITE")))
|
||||
`("PERL5LIB" ":" = (,(getenv "PERL5LIB")))
|
||||
`("PYTHONPATH" ":" = (,(getenv "GUIX_PYTHONPATH")))
|
||||
`("PATH" ":" =
|
||||
,(cons (string-append share "/trinity-plugins/BIN")
|
||||
(filter-map (match-lambda
|
||||
((name . dir)
|
||||
(string-append dir "/bin")))
|
||||
inputs))))
|
||||
(symlink (string-append share "Trinity")
|
||||
(string-append bin "Trinity"))))))))
|
||||
(inputs
|
||||
(list blast+
|
||||
bowtie
|
||||
fastqc
|
||||
hisat
|
||||
htslib
|
||||
icedtea-8
|
||||
jellyfish
|
||||
kallisto
|
||||
multiqc
|
||||
perl
|
||||
perl-uri-escape
|
||||
python-numpy
|
||||
python-wrapper
|
||||
r-ape
|
||||
r-argparse
|
||||
r-biobase
|
||||
r-ctc
|
||||
r-deseq2
|
||||
r-edger
|
||||
r-fastcluster
|
||||
r-glimma
|
||||
r-goplot
|
||||
r-goseq
|
||||
r-gplots
|
||||
r-minimal
|
||||
r-qvalue
|
||||
r-rots
|
||||
r-sm
|
||||
r-tidyverse
|
||||
rsem
|
||||
salmon
|
||||
samtools
|
||||
sra-tools
|
||||
star
|
||||
zlib))
|
||||
(propagated-inputs
|
||||
(list coreutils
|
||||
gzip
|
||||
which))
|
||||
(native-inputs (list cmake))
|
||||
(home-page "https://github.com/trinityrnaseq/trinityrnaseq/wiki")
|
||||
(synopsis "Trinity RNA-Seq de novo transcriptome assembly")
|
||||
(description "Trinity assembles transcript sequences from Illumina RNA-Seq
|
||||
data. Trinity represents a novel method for the efficient and robust de novo
|
||||
reconstruction of transcriptomes from RNA-seq data. Trinity combines three
|
||||
independent software modules: Inchworm, Chrysalis, and Butterfly, applied
|
||||
sequentially to process large volumes of RNA-seq reads. Trinity partitions
|
||||
the sequence data into many individual de Bruijn graphs, each representing the
|
||||
transcriptional complexity at a given gene or locus, and then processes each
|
||||
graph independently to extract full-length splicing isoforms and to tease
|
||||
apart transcripts derived from paralogous genes.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public repeat-masker
|
||||
(package
|
||||
(name "repeat-masker")
|
||||
|
@ -10313,6 +10598,51 @@ (define-public r-premessa
|
|||
bead-based normalization and debarcoding.")
|
||||
(license license:gpl3))))
|
||||
|
||||
(define-public r-projectils
|
||||
(let ((commit "cc73b97471b4b6eea11ce779b5c4a7dc5c3e1709")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "r-projectils")
|
||||
(version (git-version "3.0.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/carmonalab/ProjecTILs")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0dpzvbhhb9andnj7angpj32cgkwd6rs6qgpl6i21pqzcn6vqqhqw"))))
|
||||
(properties `((upstream-name . "ProjecTILs")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-biocneighbors
|
||||
r-biocparallel
|
||||
r-dplyr
|
||||
r-ggplot2
|
||||
r-matrix
|
||||
r-patchwork
|
||||
r-pheatmap
|
||||
r-pracma
|
||||
r-purrr
|
||||
r-rcolorbrewer
|
||||
r-reshape2
|
||||
r-scales
|
||||
r-scgate
|
||||
r-seurat
|
||||
r-seuratobject
|
||||
r-stacas
|
||||
r-ucell
|
||||
r-umap
|
||||
r-uwot))
|
||||
(home-page "https://github.com/carmonalab/ProjecTILs")
|
||||
(synopsis "Reference-based analysis of scRNA-seq data")
|
||||
(description
|
||||
"This package implements methods to project single-cell RNA-seq data
|
||||
onto a reference atlas, enabling interpretation of unknown cell transcriptomic
|
||||
states in the the context of known, reference states.")
|
||||
(license license:gpl3))))
|
||||
|
||||
(define-public r-presto
|
||||
(let ((commit "052085db9c88aa70a28d11cc58ebc807999bf0ad")
|
||||
(revision "0"))
|
||||
|
@ -10527,6 +10857,43 @@ (define-public r-metacell
|
|||
variation, gene modules and their regulatory models and more.")
|
||||
(license license:expat))))
|
||||
|
||||
(define-public r-sleuth
|
||||
(package
|
||||
(name "r-sleuth")
|
||||
(version "0.30.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/pachterlab/sleuth")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "09xgc7r6iisjkk0c0wn0q56zy0aph386kphwixfzq4422y7vlqci"))))
|
||||
(properties `((upstream-name . "sleuth")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs (list r-aggregation
|
||||
r-data-table
|
||||
r-dplyr
|
||||
r-ggplot2
|
||||
r-lazyeval
|
||||
r-matrixstats
|
||||
r-pheatmap
|
||||
r-reshape2
|
||||
r-rhdf5
|
||||
r-shiny
|
||||
r-tidyr))
|
||||
(native-inputs (list r-knitr))
|
||||
(home-page "https://github.com/pachterlab/sleuth")
|
||||
(synopsis "Tools for investigating RNA-Seq")
|
||||
(description
|
||||
"Sleuth is a program for differential analysis of RNA-Seq data.
|
||||
It makes use of quantification uncertainty estimates obtained via Kallisto for
|
||||
accurate differential analysis of isoforms or genes, allows testing in the
|
||||
context of experiments with complex designs, and supports interactive
|
||||
exploratory data analysis via sleuth live.")
|
||||
(license license:gpl3)))
|
||||
|
||||
(define-public r-snapatac
|
||||
(package
|
||||
(name "r-snapatac")
|
||||
|
@ -16602,7 +16969,16 @@ (define-public python-hicexplorer
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1yavgxry38g326z10bclvdf8glmma05fxj5m73h15m1r2l9xmw3v"))))
|
||||
"1yavgxry38g326z10bclvdf8glmma05fxj5m73h15m1r2l9xmw3v"))
|
||||
(modules '((guix build utils)))
|
||||
;; setup.py is malformed. The requirements are defined using a catchall
|
||||
;; pattern for the patch version number. This has been fixed in version
|
||||
;; 3.7.3, but we cannot upgrade to this version yet, since some Guix
|
||||
;; packages are not new enough. (See upstream commit
|
||||
;; 4845c715ec7b105e938d0c2426e27d0181690bfe for the fix).
|
||||
(snippet '(substitute* "setup.py"
|
||||
(("\\.\\*")
|
||||
"")))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
|
@ -20324,24 +20700,28 @@ (define-public scvelo
|
|||
(uri (pypi-uri "scvelo" version))
|
||||
(sha256
|
||||
(base32 "0h5ha1459ljs0qgpnlfsw592i8dxqn6p9bl08l1ikpwk36baxb7z"))))
|
||||
(build-system python-build-system)
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
;; Numba needs a writable dir to cache functions.
|
||||
(add-before 'check 'set-numba-cache-dir
|
||||
(lambda _
|
||||
(setenv "NUMBA_CACHE_DIR" "/tmp")))
|
||||
(replace 'check
|
||||
(lambda* (#:key outputs tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
;; The discovered test file names must match the names of the
|
||||
;; compiled files, so we cannot run the tests from
|
||||
;; /tmp/guix-build-*.
|
||||
(with-directory-excursion
|
||||
(string-append (assoc-ref outputs "out")
|
||||
"/lib/python3.10/site-packages/scvelo/core/tests/")
|
||||
(invoke "pytest" "-v"))))))))
|
||||
(list
|
||||
#:test-flags
|
||||
;; XXX: these two tests fail for unknown reasons
|
||||
'(list "-k" "not test_perfect_fit and not test_perfect_fit_2d")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; Numba needs a writable dir to cache functions.
|
||||
(add-before 'check 'set-numba-cache-dir
|
||||
(lambda _
|
||||
(setenv "NUMBA_CACHE_DIR" "/tmp")))
|
||||
(replace 'check
|
||||
(lambda* (#:key tests? test-flags #:allow-other-keys)
|
||||
(when tests?
|
||||
;; The discovered test file names must match the names of the
|
||||
;; compiled files, so we cannot run the tests from
|
||||
;; /tmp/guix-build-*.
|
||||
(with-directory-excursion
|
||||
(string-append #$output
|
||||
"/lib/python3.10/site-packages/scvelo/core/tests/")
|
||||
(apply invoke "pytest" "-v" test-flags))))))))
|
||||
(propagated-inputs
|
||||
(list python-anndata
|
||||
python-hnswlib
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2012, 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2014, 2015, 2018, 2019 Mark H Weaver <mhw@netris.org>
|
||||
;;; Copyright © 2017, 2020 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2017, 2020, 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2018, 2020, 2022 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2019 Carl Dong <contact@carldong.me>
|
||||
;;; Copyright © 2019 Léo Le Bouter <lle-bout@zaclys.net>
|
||||
|
@ -323,6 +323,9 @@ (define* (glibc-dynamic-linker
|
|||
((string=? system "powerpc64-linux") "/lib/ld64.so.1")
|
||||
((string=? system "alpha-linux") "/lib/ld-linux.so.2")
|
||||
|
||||
;; TODO: Differentiate between x86_64-linux-gnu and x86_64-linux-gnux32.
|
||||
((string=? system "x86_64-linux-gnux32") "/lib/ld-linux-x32.so.2")
|
||||
|
||||
;; XXX: This one is used bare-bones, without a libc, so add a case
|
||||
;; here just so we can keep going.
|
||||
((string=? system "arm-eabi") "no-ld.so")
|
||||
|
|
|
@ -39,7 +39,7 @@
|
|||
;;; Copyright © 2021 Hugo Lecomte <hugo.lecomte@inria.fr>
|
||||
;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be>
|
||||
;;; Copyright © 2022, 2023 David Elsing <david.elsing@posteo.net>
|
||||
;;; Copyright © 2022 Sharlatan Hellseher <sharlatanus@gmail.com>
|
||||
;;; Copyright © 2022, 2023 Sharlatan Hellseher <sharlatanus@gmail.com>
|
||||
;;; Copyright © 2022 jgart <jgart@dismail.de>
|
||||
;;; Copyright © 2023 Luis Felipe López Acevedo <luis.felipe.la@protonmail.com>
|
||||
;;; Copyright © 2023 Timo Wilken <guix@twilken.net>
|
||||
|
@ -1069,7 +1069,7 @@ (define-public cpputest
|
|||
(define-public actionlint
|
||||
(package
|
||||
(name "actionlint")
|
||||
(version "1.6.23")
|
||||
(version "1.6.26")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
|
@ -1078,7 +1078,7 @@ (define-public actionlint
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"07is4920a40zrl7mfldg0az2pisi7f6dv4vh3ijn3nzb4i7fqbni"))))
|
||||
"0j4ni2cryvqn3qim1r6q6sargh0wig6l4vjjwc40cgqvvkrdla04"))))
|
||||
(build-system go-build-system)
|
||||
(arguments
|
||||
'(#:import-path "github.com/rhysd/actionlint/cmd/actionlint"
|
||||
|
@ -1087,7 +1087,7 @@ (define-public actionlint
|
|||
(inputs (list go-github-com-fatih-color
|
||||
go-github-com-mattn-go-colorable
|
||||
go-github-com-mattn-go-runewidth
|
||||
go-github-com-robfig-cron-1.2
|
||||
go-github-com-robfig-cron
|
||||
go-golang.org-x-sync-errgroup
|
||||
go-golang.org-x-sync-semaphore
|
||||
go-gopkg-in-yaml-v3))
|
||||
|
|
|
@ -21,6 +21,7 @@ (define-module (gnu packages configuration-management)
|
|||
#:use-module (guix build-system go)
|
||||
#:use-module (guix git-download)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages version-control)
|
||||
#:use-module (gnu packages textutils)
|
||||
#:use-module ((guix licenses) #:prefix license:)
|
||||
|
|
|
@ -7437,6 +7437,10 @@ (define-public r-evmix
|
|||
can safely interchange most code.")
|
||||
(license license:gpl3)))
|
||||
|
||||
;; This package contains minified JavaScript: jExcel CE Spreadsheet,
|
||||
;; version 3.9.1. It is not clear how to obtain this particular
|
||||
;; version as there is no tag for 3.9.1. There only is 3.6.1 and
|
||||
;; 4.2.0 at https://github.com/jspreadsheet/ce.
|
||||
(define-public r-excelr
|
||||
(package
|
||||
(name "r-excelr")
|
||||
|
@ -7452,37 +7456,44 @@ (define-public r-excelr
|
|||
(properties `((upstream-name . "excelR")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'process-javascript
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(with-directory-excursion "inst/htmlwidgets/lib/jexcel/js/"
|
||||
(let ((source (assoc-ref inputs "js-jexcel"))
|
||||
(target "jexcel.min.js"))
|
||||
(format #true "Processing ~a --> ~a~%"
|
||||
source target)
|
||||
(invoke "esbuild" source "--minify"
|
||||
(string-append "--outfile=" target)))))))))
|
||||
(native-inputs
|
||||
`(("esbuild" ,esbuild)
|
||||
;; There is no tag for this particular commit, but comparison of the
|
||||
;; contents of the JavaScript files point to this commit as the most
|
||||
;; likely source.
|
||||
("js-jexcel"
|
||||
,(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://raw.githubusercontent.com/jspreadsheet/ce/"
|
||||
"8af1960f76e6803bebc5750013d2ebe95354e88a/dist/jexcel.js"))
|
||||
(sha256
|
||||
(base32
|
||||
"0y88hsr9d8cpnvdmbm17m328pc4kc5wbcv02kzmhm0bryzhviw7h"))))))
|
||||
(list
|
||||
#:modules
|
||||
'((guix build r-build-system)
|
||||
(guix build minify-build-system)
|
||||
(guix build utils))
|
||||
#:imported-modules
|
||||
`(,@%r-build-system-modules
|
||||
(guix build minify-build-system))
|
||||
#:phases
|
||||
#~(modify-phases (@ (guix build r-build-system) %standard-phases)
|
||||
(add-after 'unpack 'process-javascript
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(with-directory-excursion "inst/htmlwidgets/lib/jexcel/js"
|
||||
(minify (search-input-file inputs "/dist/jexcel.js")
|
||||
#:target "jexcel.min.js")))))))
|
||||
(propagated-inputs (list r-htmlwidgets r-jsonlite))
|
||||
(native-inputs
|
||||
(list esbuild
|
||||
;; There is no tag for this particular commit, but comparison of
|
||||
;; the contents of the JavaScript files point to this commit as the
|
||||
;; most likely source.
|
||||
(let* ((commit "8af1960f76e6803bebc5750013d2ebe95354e88a")
|
||||
(version (git-version "3.9.1" "0" commit)))
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/jspreadsheet/ce")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "jexcel" version))
|
||||
(sha256
|
||||
(base32
|
||||
"1zk0wc4h0vax7zgimhwqq2icrvjr84agm3qv42l16gim7gq7fqfq"))))))
|
||||
(home-page "https://github.com/Swechhya/excelR")
|
||||
(synopsis "Wrapper of the JavaScript library jExcel")
|
||||
(description
|
||||
"This package provides an R interface to the jExcel library to
|
||||
create web-based interactive tables and spreadsheets compatible with
|
||||
spreadsheet software.")
|
||||
"This package provides an R interface to the jExcel library to create
|
||||
web-based interactive tables and spreadsheets compatible with spreadsheet
|
||||
software.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public r-extremes
|
||||
|
@ -9498,14 +9509,14 @@ (define-public r-laeken
|
|||
(define-public r-vcd
|
||||
(package
|
||||
(name "r-vcd")
|
||||
(version "1.4-11")
|
||||
(version "1.4-12")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (cran-uri "vcd" version))
|
||||
(sha256
|
||||
(base32
|
||||
"0ch9ks25ab4h4fh4y267s0psvc4ndyaplk8ddva2j54yd1ayhm3s"))))
|
||||
"127dkln826ah5ydp3pmd5bqyns9m9m6yrjnmn7fir4r9al8yycf9"))))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs
|
||||
(list r-colorspace r-lmtest r-mass))
|
||||
|
|
|
@ -108,6 +108,7 @@ (define-module (gnu packages databases)
|
|||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-check)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages gperf)
|
||||
#:use-module (gnu packages gtk)
|
||||
#:use-module (gnu packages guile)
|
||||
|
@ -1600,14 +1601,14 @@ (define-public recutils
|
|||
(define-public emacs-rec-mode
|
||||
(package
|
||||
(name "emacs-rec-mode")
|
||||
(version "1.9.1")
|
||||
(version "1.9.3")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://elpa.gnu.org/packages/"
|
||||
"rec-mode-" version ".tar"))
|
||||
(sha256
|
||||
(base32
|
||||
"0f60bw07l6kk1kkjjxsk30p6rxj9mpngaxqy8piyabnijfgjzd3s"))
|
||||
"15m0h84fcrcxpx67mc9any4ap2dcqysfjm1d2a7sx4clx8h3mgk0"))
|
||||
(snippet #~(begin (delete-file "rec-mode.info")))))
|
||||
(build-system emacs-build-system)
|
||||
(arguments
|
||||
|
|
|
@ -69,25 +69,16 @@ (define-module (gnu packages display-managers)
|
|||
(define-public sddm
|
||||
(package
|
||||
(name "sddm")
|
||||
(version "0.19.0")
|
||||
(version "0.20.0")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
"https://github.com/sddm/sddm"
|
||||
"/releases/download/v" version "/"
|
||||
"sddm-" version ".tar.xz"))
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/sddm/sddm")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0hcdysw8ibr66vk8i7v56l0v5ijvhlq67v4460mc2xf2910g2m72"))
|
||||
(snippet
|
||||
#~(begin
|
||||
;; https://github.com/sddm/sddm/issues/1536
|
||||
;; https://github.com/sddm/sddm/commit/e93bf95c54ad8c2a1604f8d7be05339164b19308
|
||||
;; Commit comes shortly after the 0.19.0 release.
|
||||
(use-modules ((guix build utils)))
|
||||
(substitute* "src/daemon/XorgDisplayServer.cpp"
|
||||
(("m_cookie\\[i\\] = digits\\[dis\\(gen\\)\\]")
|
||||
"m_cookie[i] = QLatin1Char(digits[dis(gen)])"))))))
|
||||
"1450zv03d3mbid27986p4mdshw9qf3ar8crl4idybf7khxgan22y"))))
|
||||
(build-system qt-build-system)
|
||||
(native-inputs
|
||||
(list extra-cmake-modules pkg-config qttools-5))
|
||||
|
@ -109,36 +100,39 @@ (define-public sddm
|
|||
shadow
|
||||
wayland))
|
||||
(arguments
|
||||
`(#:configure-flags
|
||||
,#~(list
|
||||
;; This option currently does nothing, but will presumably be enabled
|
||||
;; if/when <https://github.com/sddm/sddm/pull/616> is merged.
|
||||
"-DENABLE_WAYLAND=ON"
|
||||
"-DENABLE_PAM=ON"
|
||||
;; Both flags are required for elogind support.
|
||||
"-DNO_SYSTEMD=ON" "-DUSE_ELOGIND=ON"
|
||||
"-DCONFIG_FILE=/etc/sddm.conf"
|
||||
;; Set path to /etc/login.defs.
|
||||
;; An alternative would be to use -DUID_MIN and -DUID_MAX.
|
||||
(string-append "-DLOGIN_DEFS_PATH="
|
||||
#$(this-package-input "shadow")
|
||||
"/etc/login.defs")
|
||||
(string-append "-DQT_IMPORTS_DIR="
|
||||
#$output "/lib/qt5/qml")
|
||||
(string-append "-DCMAKE_INSTALL_SYSCONFDIR="
|
||||
#$output "/etc"))
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'embed-loginctl-reference
|
||||
(lambda _
|
||||
(substitute* "CMakeLists.txt"
|
||||
(("/usr/bin/loginctl") (which "loginctl")))
|
||||
#t)))))
|
||||
(list
|
||||
#:configure-flags
|
||||
#~(list
|
||||
"-DENABLE_WAYLAND=ON"
|
||||
"-DENABLE_PAM=ON"
|
||||
;; Both flags are required for elogind support.
|
||||
"-DNO_SYSTEMD=ON"
|
||||
"-DUSE_ELOGIND=ON"
|
||||
"-DCONFIG_FILE=/etc/sddm.conf"
|
||||
;; Set path to /etc/login.defs.
|
||||
;; An alternative would be to use -DUID_MIN and -DUID_MAX.
|
||||
(string-append "-DLOGIN_DEFS_PATH="
|
||||
#$(this-package-input "shadow")
|
||||
"/etc/login.defs")
|
||||
(string-append "-DCMAKE_CXX_FLAGS=-I"
|
||||
#$(this-package-input
|
||||
"qtdeclarative") "/include/qt5")
|
||||
(string-append "-DQT_IMPORTS_DIR="
|
||||
#$output "/lib/qt5/qml")
|
||||
(string-append "-DCMAKE_INSTALL_SYSCONFDIR="
|
||||
#$output "/etc"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'embed-loginctl-reference
|
||||
(lambda _
|
||||
(substitute* "CMakeLists.txt"
|
||||
(("/usr/bin/loginctl")
|
||||
(which "loginctl"))))))))
|
||||
(synopsis "QML based X11 and Wayland display manager")
|
||||
(description "SDDM is a display manager for X11 and Wayland aiming to be
|
||||
fast, simple and beautiful. SDDM is themeable and puts no restrictions on the
|
||||
user interface design. It uses QtQuick which gives the designer the ability to
|
||||
create smooth, animated user interfaces.")
|
||||
user interface design. It uses QtQuick which gives the designer the ability
|
||||
to create smooth, animated user interfaces.")
|
||||
(home-page "https://github.com/sddm/sddm")
|
||||
;; QML files are MIT licensed and images are CC BY 3.0.
|
||||
(license (list license:gpl2+ license:expat license:cc-by3.0))))
|
||||
|
|
File diff suppressed because it is too large
Load diff
|
@ -1098,7 +1098,7 @@ (define-public inspekt3d
|
|||
(define-public kicad
|
||||
(package
|
||||
(name "kicad")
|
||||
(version "7.0.9")
|
||||
(version "7.0.10")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
|
@ -1106,7 +1106,7 @@ (define-public kicad
|
|||
(commit version)))
|
||||
(sha256
|
||||
(base32
|
||||
"1hq9rba1gcks14zwbr8nbicpsil4imslgfch6ll33fhizbks3fq4"))
|
||||
"0rmlkgzgvpd70jzspyrrb2f618fimw52qrhpsp777flmpyh91wly"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
|
@ -1206,7 +1206,7 @@ (define-public kicad-doc
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"14dg99fvl6av9sn6gig6d6k1sdcf2svxy4fipqcz994z2khhz1sj"))))
|
||||
"0lc7d6hn8ya8m51kjnf59v41pbp03l5ncxir75s21pb92l26xgnv"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
`(#:configure-flags (list "-DBUILD_FORMATS=html")
|
||||
|
@ -1240,7 +1240,7 @@ (define-public kicad-symbols
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0ynsnjq3z126cjkgm1fjbjvdvpc0walnr42ya9dv46l27kxy2j77"))))
|
||||
"0nlgmxf9z1vf4g350dfkxql1dawgmw275wqxkgszsfxmhdfpmi9v"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
`(#:tests? #f)) ; no tests exist
|
||||
|
@ -1269,7 +1269,7 @@ (define-public kicad-footprints
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"16a4c2xs4i8wbm01a901yxabxk0qdsjkzlccfawddv82bkh4b87h"))))
|
||||
"1az6fzh1lma71mj12bc4bblnmzjayrxhkb8w9rjvlhvvgv33cdmy"))))
|
||||
(synopsis "Official KiCad footprint libraries")
|
||||
(description "This package contains the official KiCad footprint libraries.")))
|
||||
|
||||
|
@ -1286,7 +1286,7 @@ (define-public kicad-packages3d
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1cly28vc07i54v487zbb8d1h70nrd3naxvq146b0xnbrjwnd2q28"))))
|
||||
"0xzyi4mgyifwc6dppdzh6jq294mkj0a71cwkqw2ymz1kfbksw626"))))
|
||||
(synopsis "Official KiCad 3D model libraries")
|
||||
(description "This package contains the official KiCad 3D model libraries.")))
|
||||
|
||||
|
@ -1303,7 +1303,7 @@ (define-public kicad-templates
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"11582ldnv7hkljmhaym83962kixq1hjbfmdrn5laq7l4jk3l19vh"))))
|
||||
"0mykfwwik7472i4r0isc5szj3dnmvd0538p0vlmzh4rcgj3pj3vm"))))
|
||||
(synopsis "Official KiCad project and worksheet templates")
|
||||
(description "This package contains the official KiCad project and
|
||||
worksheet templates.")))
|
||||
|
|
|
@ -93,6 +93,7 @@ (define-module (gnu packages finance)
|
|||
#:use-module (gnu packages gnome)
|
||||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages graphviz)
|
||||
#:use-module (gnu packages groff)
|
||||
#:use-module (gnu packages gsasl)
|
||||
|
@ -2299,7 +2300,7 @@ (define-public xmrig
|
|||
(define-public p2pool
|
||||
(package
|
||||
(name "p2pool")
|
||||
(version "3.7")
|
||||
(version "3.10")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -2308,7 +2309,7 @@ (define-public p2pool
|
|||
(commit (string-append "v" version))
|
||||
(recursive? #t)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256 (base32 "1sghdk8yq8si0bq0z83fji48q8yrq0ymvsxbbh5mscw6223syrjq"))
|
||||
(sha256 (base32 "0lp9slfwaq3wp4x6xpsiazam5lv6dz57m20adzlzzk0anb1ascr0"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
#~(for-each delete-file-recursively
|
||||
|
|
|
@ -196,69 +196,71 @@ (define-public bullet
|
|||
(license license:zlib)))
|
||||
|
||||
(define-public dds
|
||||
(package
|
||||
(name "dds")
|
||||
(version "2.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/dds-bridge/dds")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1iv09qic43nvla02lm8zgnkqpjgnc95p8zh3wyifmnmlh1rz02yj"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'chdir
|
||||
(lambda _
|
||||
(chdir "src")))
|
||||
(replace 'configure
|
||||
;; Configuration is done by copying the appropriate
|
||||
;; make file in the working directory. There is no
|
||||
;; configure script.
|
||||
(lambda _
|
||||
(copy-file "Makefiles/Makefile_linux_shared"
|
||||
"Makefile")))
|
||||
(replace 'check
|
||||
;; There is no "check" traget. We must compile
|
||||
;; a "dtest" program and apply it on a data set.
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
(install-file "libdds.so" "../test")
|
||||
(with-directory-excursion "../test"
|
||||
(copy-file "Makefiles/Makefile_linux"
|
||||
"Makefile")
|
||||
(substitute* "Makefile"
|
||||
(("-Werror") ""))
|
||||
(invoke "make")
|
||||
(invoke "./dtest" "-f" "../hands/list100.txt")))))
|
||||
(replace 'install
|
||||
;; "install" target merely moves ".so" file around
|
||||
;; the source directory. We install it in the store,
|
||||
;; along with all shipped documentation (which cannot
|
||||
;; be built from source unfortunately).
|
||||
(lambda _
|
||||
(install-file "libdds.so"
|
||||
(string-append #$output "/lib"))
|
||||
(let ((doc (string-append #$output
|
||||
"/share/doc/"
|
||||
#$name "-" #$version)))
|
||||
(install-file "../LICENSE" doc)
|
||||
(copy-recursively "../doc" doc)))))))
|
||||
(native-inputs
|
||||
(list gawk procps))
|
||||
(inputs
|
||||
(list boost))
|
||||
(home-page "https://privat.bahnhof.se/wb758135/")
|
||||
(synopsis "Double dummy solver for the bridge card game")
|
||||
(description "DDS is a double-dummy solver of bridge hands. It supports
|
||||
(let ((commit "d2bc4c2c703941664fc1d73e69caa5233cdeac18")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "dds")
|
||||
(version (git-version "2.9.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/dds-bridge/dds")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1ishbb69cvyv96xdxshnly0m5ydwljgdf8fwa1cr9rj2qj40q4rm"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'chdir
|
||||
(lambda _
|
||||
(chdir "src")))
|
||||
(replace 'configure
|
||||
;; Configuration is done by copying the appropriate
|
||||
;; make file in the working directory. There is no
|
||||
;; configure script.
|
||||
(lambda _
|
||||
(copy-file "Makefiles/Makefile_linux_shared"
|
||||
"Makefile")))
|
||||
(replace 'check
|
||||
;; There is no "check" traget. We must compile
|
||||
;; a "dtest" program and apply it on a data set.
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
(install-file "libdds.so" "../test")
|
||||
(with-directory-excursion "../test"
|
||||
(copy-file "Makefiles/Makefile_linux"
|
||||
"Makefile")
|
||||
(substitute* "Makefile"
|
||||
(("-Werror") ""))
|
||||
(invoke "make")
|
||||
(invoke "./dtest" "-f" "../hands/list100.txt")))))
|
||||
(replace 'install
|
||||
;; "install" target merely moves ".so" file around
|
||||
;; the source directory. We install it in the store,
|
||||
;; along with all shipped documentation (which cannot
|
||||
;; be built from source unfortunately).
|
||||
(lambda _
|
||||
(install-file "libdds.so"
|
||||
(string-append #$output "/lib"))
|
||||
(let ((doc (string-append #$output
|
||||
"/share/doc/"
|
||||
#$name "-" #$version)))
|
||||
(install-file "../LICENSE" doc)
|
||||
(copy-recursively "../doc" doc)))))))
|
||||
(native-inputs
|
||||
(list gawk procps))
|
||||
(inputs
|
||||
(list boost))
|
||||
(home-page "https://privat.bahnhof.se/wb758135/")
|
||||
(synopsis "Double dummy solver for the bridge card game")
|
||||
(description "DDS is a double-dummy solver of bridge hands. It supports
|
||||
single-threading and multi-threading for improved performance. DDS
|
||||
offers a wide range of functions, including par-score calculations.")
|
||||
(license license:asl2.0)))
|
||||
(license license:asl2.0))))
|
||||
|
||||
(define-public deutex
|
||||
(package
|
||||
|
@ -3269,16 +3271,16 @@ (define-public raylib
|
|||
(define-public bbcsdl
|
||||
(package
|
||||
(name "bbcsdl")
|
||||
(version "1.35a")
|
||||
(version "1.39a")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/rtrussell/BBCSDL/")
|
||||
(commit "b9b2a3eb438cb799edb2766055b3c38e9518e3e3")))
|
||||
(commit "93b0ffae960f4c4f45fdc2202bc6e83ee5ca277c")))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1d03xmhrl6ba6w0vwfk46mpyc9d0w3bixxj2d4irx7wl7bh3bfic"))))
|
||||
"03ga14k2hbhflnaynbyx9lwlbxlzx3rv6zqq21yhl183s6d4c0wa"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list
|
||||
|
@ -3318,6 +3320,7 @@ (define-public bbcsdl
|
|||
inputs (string-append "share/fonts/truetype/" font))
|
||||
(string-append opt "/lib/" font)))
|
||||
'("DejaVuSans.ttf" "DejaVuSansMono.ttf"
|
||||
"DejaVuSans-Oblique.ttf"
|
||||
"FreeSans.ttf" "FreeMono.ttf" "FreeSerif.ttf"))
|
||||
(mkdir bin)
|
||||
(symlink (string-append opt "/bbcsdl")
|
||||
|
|
|
@ -78,7 +78,8 @@
|
|||
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2023 Florian Pelz <pelzflorian@pelzflorian.de>
|
||||
;;; Copyright © 2023 Ivana Drazovic <iv.dra@hotmail.com>
|
||||
;;; Copyright © 2023 gemmaro <gemmaro.dev@gmail.com>
|
||||
;;; Copyright © 2023, 2024 gemmaro <gemmaro.dev@gmail.com>
|
||||
;;; Copyright © 2023 Wilko Meyer <w@wmeyer.eu>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -193,6 +194,7 @@ (define-module (gnu packages games)
|
|||
#:use-module (gnu packages protobuf)
|
||||
#:use-module (gnu packages pulseaudio)
|
||||
#:use-module (gnu packages python)
|
||||
#:use-module (gnu packages python-compression)
|
||||
#:use-module (gnu packages python-web)
|
||||
#:use-module (gnu packages python-xyz)
|
||||
#:use-module (gnu packages qt)
|
||||
|
@ -230,6 +232,7 @@ (define-module (gnu packages games)
|
|||
#:use-module (guix build-system meson)
|
||||
#:use-module (guix build-system perl)
|
||||
#:use-module (guix build-system python)
|
||||
#:use-module (guix build-system pyproject)
|
||||
#:use-module (guix build-system qt)
|
||||
#:use-module (guix build-system scons)
|
||||
#:use-module (guix build-system trivial)
|
||||
|
@ -2367,6 +2370,55 @@ (define-public prboom-plus
|
|||
"PrBoom+ is a Doom source port developed from the original PrBoom project.")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public redeal
|
||||
(let ((commit "e2e81a477fd31ae548a340b5f0f380594d3d0ad6")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "redeal")
|
||||
(version (git-version "0.2.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/anntzer/redeal")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1vac36bg4ah9gs4hgmp745xq6nnmd7s71vsq99d72ng3sxap0wa3"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'unbundle-dds
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(substitute* "setup.py"
|
||||
(("cmdclass=.*") ""))
|
||||
(let ((libdds (search-input-file inputs "lib/libdds.so")))
|
||||
(substitute* "redeal/dds.py"
|
||||
((" and os.path.exists\\(dll_path\\)") "")
|
||||
(("dll = DLL\\(dll_path\\)")
|
||||
(format #f "dll = DLL(~s)" libdds))))))
|
||||
(add-after 'install 'install-examples
|
||||
(lambda _
|
||||
(let* ((doc (string-append #$output "/share/doc/"))
|
||||
(examples
|
||||
(string-append doc #$name "-" #$version "/examples")))
|
||||
(mkdir-p examples)
|
||||
(copy-recursively "examples" examples)))))))
|
||||
(inputs (list dds `(,python "tk")))
|
||||
(propagated-inputs (list python-colorama))
|
||||
(home-page "https://github.com/anntzer/redeal")
|
||||
(synopsis
|
||||
"Deal generator for bridge card game, written in Python")
|
||||
(description
|
||||
"Redeal is a deal generator written in Python. It outputs deals
|
||||
satisfying whatever conditions you specify --- deals with a double void, deals
|
||||
with a strong 2♣ opener opposite a yarborough, etc. Using Bo Haglund's double
|
||||
dummy solver, it can even solve the hands it has generated for you.")
|
||||
(license license:gpl3))))
|
||||
|
||||
(define-public retux
|
||||
(let ((release "1.6.1")
|
||||
(revision 0))
|
||||
|
@ -3385,25 +3437,29 @@ (define-public talkfilters
|
|||
(define-public taisei
|
||||
(package
|
||||
(name "taisei")
|
||||
(version "1.3.2")
|
||||
(version "1.4")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://github.com/taisei-project/"
|
||||
"taisei/releases/download/v" version
|
||||
"/taisei-v" version ".tar.xz"))
|
||||
"/taisei-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32 "1g53fcyrlzmvlsb40pw90gaglysv6n1w42hk263iv61ibhdmzh6v"))))
|
||||
(base32 "1glrr99xiyz674d1izgvmk9w1zxanc94d34pacd0wya66bbml0nc"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
`(#:build-type "release" ;comment out for bug-reporting (and cheats)
|
||||
#:configure-flags
|
||||
(list "-Dr_default=gles30"
|
||||
"-Dr_gles20=true"
|
||||
"-Dr_gles30=true"
|
||||
"-Dshader_transpiler=true")))
|
||||
(list
|
||||
#:build-type "release" ;comment out for bug-reporting (and cheats)
|
||||
#:configure-flags #~(list "-Dr_default=gles30"
|
||||
"-Dr_gles20=true"
|
||||
"-Dr_gles30=true"
|
||||
"-Dshader_transpiler=true")))
|
||||
(native-inputs
|
||||
(list pkg-config python python-docutils python-pygments))
|
||||
(list pkg-config
|
||||
python
|
||||
python-docutils
|
||||
python-pygments
|
||||
python-zstandard))
|
||||
(inputs
|
||||
(list cglm
|
||||
freetype
|
||||
|
@ -3417,21 +3473,23 @@ (define-public taisei
|
|||
sdl2-mixer
|
||||
shaderc
|
||||
spirv-cross
|
||||
zlib))
|
||||
zlib
|
||||
(list zstd "lib")))
|
||||
(home-page "https://taisei-project.org/")
|
||||
(synopsis "Shoot'em up fangame and libre clone of Touhou Project")
|
||||
(description
|
||||
"The player controls a character (one of three: Good, Bad, and Dead),
|
||||
dodges the missiles (lots of it cover the screen, but the character's hitbox
|
||||
is very small), and shoot at the adversaries that keep appear on the screen.")
|
||||
(license (list ;;game
|
||||
license:expat
|
||||
;;resources/00-taisei.pkgdir/bgm/
|
||||
;;atlas/portraits/
|
||||
license:cc-by4.0
|
||||
;;miscellaneous
|
||||
license:cc0
|
||||
license:public-domain))))
|
||||
(license (list
|
||||
;; game
|
||||
license:expat
|
||||
;; resources/00-taisei.pkgdir/bgm/
|
||||
;; atlas/portraits/
|
||||
license:cc-by4.0
|
||||
;; miscellaneous
|
||||
license:cc0
|
||||
license:public-domain))))
|
||||
|
||||
(define-public cmatrix
|
||||
(package
|
||||
|
@ -3833,7 +3891,7 @@ (define-public irrlicht-for-minetest
|
|||
(package
|
||||
(inherit irrlicht)
|
||||
(name "irrlicht-for-minetest")
|
||||
(version "1.9.0mt10")
|
||||
(version "1.9.0mt13")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -3843,7 +3901,7 @@ (define-public irrlicht-for-minetest
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0y5vchz91khs8dmrkpgc7sqmvzx2yjj6svivvm80r4yppv7s03rw"))))
|
||||
"11pxg0yh50ym1hvh8va5jbbcjz5dsshj3xxvm3qhkgg96vpism06"))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
;; No check target.
|
||||
|
@ -10115,6 +10173,36 @@ (define-public q5go
|
|||
(home-page "https://github.com/bernds/q5Go")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public qcheckers
|
||||
(package
|
||||
(name "qcheckers")
|
||||
(version "0.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/portnov/qcheckers")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "05wzql6abzdf6l0vdzki4rfy2zn31mcplh1wkw3ddk8w81pvaymw"))))
|
||||
(build-system qt-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(replace 'configure
|
||||
(lambda _
|
||||
(invoke "qmake"
|
||||
(string-append "PREFIX=" #$output)))))))
|
||||
(inputs (list qtbase-5 qtsvg-5))
|
||||
(home-page "https://portnov.github.io/qcheckers/")
|
||||
(synopsis "Qt-based checkers boardgame")
|
||||
(description "QCheckers, formely known as KCheckers, is a is a Qt version
|
||||
of the classic boardgame checkers (also known as draughts).")
|
||||
(license license:gpl2+)))
|
||||
|
||||
(define-public xmoto
|
||||
(package
|
||||
(name "xmoto")
|
||||
|
@ -10415,6 +10503,31 @@ (define-public moonfish
|
|||
using any UCI engine and also to connect UCI engines to Lichess.")
|
||||
(license license:agpl3+))))
|
||||
|
||||
(define-public morris
|
||||
(package
|
||||
(name "morris")
|
||||
(version "0.3")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/farindk/morris")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1kkcnpkzgybm7rqg7nafd7sqd5m4alns6l4j5zcf3p41jdc9s3iv"))))
|
||||
(build-system glib-or-gtk-build-system)
|
||||
(inputs (list automake autoconf pkg-config intltool
|
||||
gnu-gettext libtool glib gtk+-2 boost))
|
||||
(arguments `(#:tests? #f))
|
||||
(home-page "http://nine-mens-morris.net/downloads.html")
|
||||
(synopsis "Morris is an implementation of the board game Nine Men's Morris")
|
||||
(description "Morris is an implementation of the board game Nine Men's Morris.
|
||||
It supports not only the standard game, but also several rule-variants and different
|
||||
board layouts. You can play against the computer, or simply use the program to
|
||||
present the board, but play against another human opponent.")
|
||||
(license license:gpl3)))
|
||||
|
||||
(define-public barrage
|
||||
(package
|
||||
(name "barrage")
|
||||
|
|
|
@ -3,7 +3,7 @@
|
|||
;;; Copyright © 2014, 2015, 2018 Mark H Weaver <mhw@netris.org>
|
||||
;;; Copyright © 2014, 2015, 2016, 2017, 2019, 2021 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2015, 2023 Andreas Enge <andreas@enge.fr>
|
||||
;;; Copyright © 2015-2018, 2020-2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2015-2018, 2020-2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2016 Carlos Sánchez de La Lama <csanchezdll@gmail.com>
|
||||
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2018, 2020, 2022 Marius Bakke <marius@gnu.org>
|
||||
|
@ -75,6 +75,9 @@ (define (gcc-configure-flags-for-triplet target)
|
|||
"--with-mode=thumb"
|
||||
"--with-fpu=neon"))
|
||||
|
||||
((string-match "x86_64-linux-gnux32" target)
|
||||
'("--with-abi=mx32"))
|
||||
|
||||
((and (string-suffix? "-gnu" target)
|
||||
(not (string-contains target "-linux")))
|
||||
;; Cross-compilation of libcilkrts in GCC 5.5.0 to GNU/Hurd fails
|
||||
|
|
|
@ -690,7 +690,12 @@ (define-public glew
|
|||
#t))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:make-flags #~(list (string-append "GLEW_PREFIX=" #$output)
|
||||
(list #:make-flags #~(list #$@(if (%current-target-system)
|
||||
#~((string-append "CC=" #$(cc-for-target))
|
||||
(string-append "LD=" #$(cc-for-target))
|
||||
(string-append "STRIP=" #$(strip-for-target)))
|
||||
#~())
|
||||
(string-append "GLEW_PREFIX=" #$output)
|
||||
(string-append "GLEW_DEST=" #$output))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
|
|
|
@ -23,6 +23,7 @@
|
|||
;;; Copyright © 2021 Aleksandr Vityazev <avityazev@posteo.org>
|
||||
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -236,6 +237,12 @@ (define-public libassuan
|
|||
(base32
|
||||
"1r1lvcp67gn5lfrj1g388sd77ca6qwnmxndirdysd71gk362z34f"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments (if (%current-target-system)
|
||||
(list #:configure-flags
|
||||
#~(list (string-append
|
||||
"--with-libgpg-error-prefix="
|
||||
#$(this-package-input "libgpg-error"))))
|
||||
'()))
|
||||
(propagated-inputs
|
||||
(list libgpg-error pth))
|
||||
(home-page "https://gnupg.org")
|
||||
|
|
|
@ -1035,6 +1035,9 @@ (define (runpaths-of-input label)
|
|||
(setenv "MACH_BUILD_PYTHON_NATIVE_PACKAGE_SOURCE" "system")
|
||||
(setenv "MOZ_BUILD_DATE" #$%icecat-build-id) ; avoid timestamp
|
||||
|
||||
;; WM_CLASS (default is "$MOZ_APP_NAME-$MOZ_UPDATE_CHANNEL").
|
||||
(setenv "MOZ_APP_REMOTINGNAME" "Icecat")
|
||||
|
||||
;; XXX TODO: Fix this to work on systems other than x86_64-linux.
|
||||
(setenv "GUIX_PYTHONPATH"
|
||||
(string-append (getcwd)
|
||||
|
@ -1092,18 +1095,22 @@ (define (runpaths-of-input label)
|
|||
(let* ((lib (string-append #$output "/lib"))
|
||||
(gtk #$(this-package-input "gtk+"))
|
||||
(gtk-share (string-append gtk "/share"))
|
||||
(ld-libs '#$(map (lambda (label)
|
||||
(file-append (this-package-input label) "/lib"))
|
||||
'("libpng-apng"
|
||||
"libxscrnsaver"
|
||||
"mesa"
|
||||
"pciutils"
|
||||
"mit-krb5"
|
||||
"eudev"
|
||||
"pulseaudio"
|
||||
;; For the integration of native notifications
|
||||
;; (same reason as icedove)
|
||||
"libnotify"))))
|
||||
(ld-libs '#$(cons
|
||||
(file-append
|
||||
(this-package-input "libcanberra")
|
||||
"/lib/gtk-3.0/modules")
|
||||
(map (lambda (label)
|
||||
(file-append (this-package-input label) "/lib"))
|
||||
'("libpng-apng"
|
||||
"libxscrnsaver"
|
||||
"mesa"
|
||||
"pciutils"
|
||||
"mit-krb5"
|
||||
"eudev"
|
||||
"pulseaudio"
|
||||
;; For the integration of native notifications
|
||||
;; (same reason as icedove)
|
||||
"libnotify")))))
|
||||
(wrap-program (car (find-files lib "^icecat$"))
|
||||
`("XDG_DATA_DIRS" prefix (,gtk-share))
|
||||
;; The following line is commented out because the icecat
|
||||
|
@ -1123,7 +1130,7 @@ (define (runpaths-of-input label)
|
|||
(("NewWindow") "new-window")
|
||||
(("NewPrivateWindow") "new-private-window")
|
||||
(("StartupNotify=true")
|
||||
"StartupNotify=true\nStartupWMClass=Navigator"))
|
||||
"StartupNotify=true\nStartupWMClass=Icecat"))
|
||||
(install-file desktop-file applications))))
|
||||
(add-after 'install-desktop-entry 'install-icons
|
||||
(lambda _
|
||||
|
@ -1775,7 +1782,7 @@ (define-public icedove-minimal
|
|||
(format #t
|
||||
"[Desktop Entry]~@
|
||||
Name=Icedove~@
|
||||
Exec=~a/bin/icedove~@
|
||||
Exec=~a/bin/icedove %u~@
|
||||
Icon=icedove~@
|
||||
GenericName=Mail/News Client~@
|
||||
Categories=Network;Email;~@
|
||||
|
|
1467
gnu/packages/golang-web.scm
Normal file
1467
gnu/packages/golang-web.scm
Normal file
File diff suppressed because it is too large
Load diff
File diff suppressed because it is too large
Load diff
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2017, 2018, 2019, 2020, 2022, 2023 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2017-2024 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com>
|
||||
;;; Copyright © 2018, 2020, 2022 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2019, 2021, 2022 Efraim Flashner <efraim@flashner.co.il>
|
||||
|
@ -426,6 +426,48 @@ (define-public python-vtraag-louvain
|
|||
large networks.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public python-louvain-igraph
|
||||
(package
|
||||
(name "python-louvain-igraph")
|
||||
(version "0.8.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/vtraag/louvain-igraph")
|
||||
(commit version)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1j2ybihvvzggwjb9zvm829aqb5b94q10h8bw6v0h42xd9w75z9sv"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'find-igraph
|
||||
(lambda _
|
||||
(setenv "SETUPTOOLS_SCM_PRETEND_VERSION" #$version)
|
||||
(substitute* "setup.py"
|
||||
(("/usr/include/igraph")
|
||||
(string-append #$(this-package-input "igraph")
|
||||
"/include/igraph"))))))))
|
||||
(propagated-inputs (list python-igraph))
|
||||
(inputs (list igraph))
|
||||
(native-inputs
|
||||
(list python-ddt
|
||||
python-setuptools-scm
|
||||
pkg-config))
|
||||
(home-page "https://github.com/vtraag/louvain-igraph")
|
||||
(synopsis "Implementation of the Louvain algorithm")
|
||||
(description "This package implements the Louvain algorithm for community
|
||||
detection in C++ and exposes it to Python. Besides the relative flexibility
|
||||
of the implementation, it also scales well, and can be run on graphs of
|
||||
millions of nodes (as long as they can fit in memory). The core function is
|
||||
@code{find_partition} which finds the optimal partition using the louvain
|
||||
algorithm for a number of different methods.")
|
||||
(license license:gpl3+)))
|
||||
|
||||
(define-public faiss
|
||||
(package
|
||||
(name "faiss")
|
||||
|
@ -449,8 +491,8 @@ (define-public faiss
|
|||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
`(#:configure-flags
|
||||
(list "-DBUILD_WITH_GPU=OFF" ; thanks, but no thanks, CUDA.
|
||||
"-DBUILD_TUTORIAL=OFF") ; we don't need those
|
||||
(list "-DBUILD_WITH_GPU=OFF" ; thanks, but no thanks, CUDA.
|
||||
"-DBUILD_TUTORIAL=OFF") ; we don't need those
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'prepare-build
|
||||
|
@ -466,7 +508,7 @@ (define-public faiss
|
|||
'()))))))
|
||||
(substitute* "CMakeLists.txt"
|
||||
(("-m64") "")
|
||||
(("-mpopcnt") "") ; only some architectures
|
||||
(("-mpopcnt") "") ; only some architectures
|
||||
(("-msse4")
|
||||
(string-append
|
||||
(string-join features)
|
||||
|
|
|
@ -3565,6 +3565,80 @@ (define-public guile-srfi-128
|
|||
;; contains ISC code from the SRFI sample implementation
|
||||
license:isc))))
|
||||
|
||||
(define-public guile-srfi-133
|
||||
(package
|
||||
(name "guile-srfi-133")
|
||||
(version "0.0.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/scheme-requests-for-implementation/srfi-133")
|
||||
(commit "db81a114cd3e23375f024baec15482614ec90453")))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0a7srl72291yah0aj6rwddhj041v2spximhknjj7hczlparsrm7f"))))
|
||||
(build-system guile-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'move-create-and-delete-files
|
||||
(lambda _
|
||||
(rename-file "vectors" "srfi")
|
||||
(rename-file "srfi/vectors-test.scm" "srfi/srfi-test.scm")
|
||||
(rename-file "srfi/vectors-impl.scm" "srfi/srfi-impl.scm")
|
||||
(with-output-to-file "srfi/srfi-133.scm"
|
||||
(lambda ()
|
||||
(display "(define-module (srfi srfi-133)
|
||||
#:replace (;; Constructors
|
||||
vector-copy
|
||||
|
||||
;; Mutators
|
||||
vector-fill! vector-copy!
|
||||
|
||||
;; Conversion
|
||||
vector->list list->vector)
|
||||
#:export (;; Constructors
|
||||
vector-unfold vector-unfold-right vector-reverse-copy
|
||||
vector-append vector-concatenate vector-append-subvectors
|
||||
|
||||
;; Predicates
|
||||
vector-empty? vector=
|
||||
|
||||
;; Iteration
|
||||
vector-fold vector-fold-right vector-map vector-map!
|
||||
vector-for-each vector-count vector-cumulate
|
||||
|
||||
;; Searching
|
||||
vector-index vector-index-right vector-skip vector-skip-right
|
||||
vector-binary-search vector-any vector-every vector-partition
|
||||
|
||||
;; Mutators
|
||||
vector-swap! vector-reverse!
|
||||
vector-reverse-copy! vector-unfold! vector-unfold-right!
|
||||
|
||||
;; Conversion
|
||||
reverse-vector->list reverse-list->vector
|
||||
vector->string string->vector))
|
||||
|
||||
(include \"srfi-impl.scm\")")))
|
||||
(for-each (lambda (filename)
|
||||
(delete-file filename))
|
||||
'("tests/run.scm"
|
||||
"srfi/vectors.sld"
|
||||
"srfi/vectors.scm")))))))
|
||||
(native-inputs
|
||||
(list guile-3.0))
|
||||
(home-page "https://github.com/scheme-requests-for-implementation/srfi-133")
|
||||
(synopsis "R7RS-compatible vector library for Guile")
|
||||
(description
|
||||
"This package provides a Guile implementation of
|
||||
@uref{https://srfi.schemers.org/srfi-133/srfi-133.html, SRFI-133}, a
|
||||
comprehensive library of vector operations.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public guile-srfi-145
|
||||
(package
|
||||
(name "guile-srfi-145")
|
||||
|
@ -3766,6 +3840,56 @@ (define-public guile-srfi-189
|
|||
or errors (Left).")
|
||||
(license license:expat))))
|
||||
|
||||
(define-public guile-srfi-232
|
||||
(package
|
||||
(name "guile-srfi-232")
|
||||
(version "0.0.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/scheme-requests-for-implementation/srfi-232")
|
||||
(commit "c3f580d220778cd71492aba4fdd0c7040968e705")))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0lp4zcqjjj6hwfh3ix71wak1nffgg4npzsg7cdxfn9hf6iwf9xby"))))
|
||||
(build-system guile-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'move-and-delete-things
|
||||
(lambda _
|
||||
(let* ((srfi-directory (string-append #$output "/srfi")))
|
||||
(mkdir-p "srfi")
|
||||
(with-output-to-file "srfi/srfi-232.scm"
|
||||
(lambda ()
|
||||
(display "(define-library (srfi srfi-232)
|
||||
(export curried define-curried)
|
||||
(import (only (guile) import)
|
||||
(scheme base))
|
||||
(include \"../srfi-232.scm\"))")))
|
||||
(for-each (lambda (filename)
|
||||
(delete-file filename))
|
||||
'("test-body.scm"
|
||||
"test-chibi.scm"
|
||||
"test-srfi-64.scm"))))))))
|
||||
(native-inputs
|
||||
(list guile-3.0))
|
||||
(home-page "https://github.com/scheme-requests-for-implementation/srfi-232")
|
||||
(synopsis "Flexible curried procedures")
|
||||
(description
|
||||
" This package provides an implementation of
|
||||
@uref{https://srfi.schemers.org/srfi-232/srfi-232.html, SRFI-232}, which
|
||||
describes @code{curried}, a variant of @code{lambda} that creates true curried
|
||||
procedures which also behave just like ordinary Scheme procedures. They can
|
||||
be applied to their arguments one by one, all at once, or anywhere in between,
|
||||
without any novel syntax. @code{curried} also supports nullary and variadic
|
||||
procedures, and procedures created with it have predictable behavior when
|
||||
applied to surplus arguments.")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public emacsy
|
||||
(package
|
||||
(name "emacsy")
|
||||
|
|
|
@ -35,6 +35,7 @@ (define-module (gnu packages high-availability)
|
|||
#:use-module (gnu packages gettext)
|
||||
#:use-module (gnu packages glib)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages hardware)
|
||||
#:use-module (gnu packages linux)
|
||||
#:use-module (gnu packages lua)
|
||||
|
|
|
@ -2225,20 +2225,24 @@ (define-public jp2a
|
|||
(define-public grim
|
||||
(package
|
||||
(name "grim")
|
||||
(version "1.4.0")
|
||||
(version "1.4.1")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/emersion/grim")
|
||||
(url "https://git.sr.ht/~emersion/grim")
|
||||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1b1k5cmmk7gzis0rncyl98lnhdwpjkdsv9pada5mmgxcpka6f0lp"))))
|
||||
(base32 "1snp4qlj05d0nx4f0qr8kywv0i1xcw5i278ybng1rand2alhkjz5"))))
|
||||
(build-system meson-build-system)
|
||||
(native-inputs (list pkg-config scdoc))
|
||||
(native-inputs (append (if (%current-target-system)
|
||||
;; for wayland-scanner
|
||||
(list pkg-config-for-build wayland)
|
||||
'())
|
||||
(list pkg-config scdoc)))
|
||||
(inputs (list pixman libpng libjpeg-turbo wayland wayland-protocols))
|
||||
(home-page "https://github.com/emersion/grim")
|
||||
(home-page "https://sr.ht/~emersion/grim/")
|
||||
(synopsis "Create screenshots from a Wayland compositor")
|
||||
(description "grim can create screenshots from a Wayland compositor.")
|
||||
;; MIT license.
|
||||
|
@ -2247,7 +2251,7 @@ (define-public grim
|
|||
(define-public slurp
|
||||
(package
|
||||
(name "slurp")
|
||||
(version "1.4.0")
|
||||
(version "1.5.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -2256,10 +2260,14 @@ (define-public slurp
|
|||
(commit (string-append "v" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "1i6g4dfiv2mwkjvvrx3wizb1n05xmd4j9nkhdii4klwd1gdrhjwd"))))
|
||||
(base32 "0wlml42c3shma50bsvqzll7p3zn251jaf0jm59q2idks8gg1zkyq"))))
|
||||
(build-system meson-build-system)
|
||||
(native-inputs
|
||||
(list pkg-config scdoc))
|
||||
(append (if (%current-target-system)
|
||||
;; for wayland-scanner
|
||||
(list wayland pkg-config-for-build)
|
||||
'())
|
||||
(list pkg-config scdoc)))
|
||||
(inputs
|
||||
(list cairo libxkbcommon wayland wayland-protocols))
|
||||
(home-page "https://github.com/emersion/slurp")
|
||||
|
|
|
@ -30,6 +30,7 @@ (define-module (gnu packages ipfs)
|
|||
#:use-module (guix build-system go)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-check)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages python)
|
||||
#:use-module (gnu packages shells)
|
||||
#:use-module (gnu packages syncthing))
|
||||
|
|
|
@ -1,6 +1,6 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2012, 2013, 2018 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2017, 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -21,6 +21,7 @@ (define-module (gnu packages libsigsegv)
|
|||
#:use-module (guix licenses)
|
||||
#:use-module (guix packages)
|
||||
#:use-module (guix download)
|
||||
#:use-module (guix utils)
|
||||
#:use-module (guix build-system gnu))
|
||||
|
||||
(define-public libsigsegv
|
||||
|
@ -40,21 +41,15 @@ (define-public libsigsegv
|
|||
(arguments
|
||||
`(;; The shared library isn't built by default but some packages need it.
|
||||
#:configure-flags '("--enable-shared")
|
||||
|
||||
;; On MIPS, work around this error:
|
||||
;;
|
||||
;; In file included from fault-linux-mips-old.h:18:0,
|
||||
;; [...]
|
||||
;; linux-libre-headers-cross-mips64el-linux-gnu-3.3.8/include/asm/sigcontext.h:57:8: error: redefinition of 'struct sigcontext'
|
||||
,@(if (string-contains (or (%current-target-system) (%current-system))
|
||||
"mips64el")
|
||||
`(#:phases (modify-phases %standard-phases
|
||||
(add-before 'configure 'patch-mips-old-h
|
||||
(lambda _
|
||||
(substitute* "src/fault-linux-mips-old.h"
|
||||
(("#include <asm/sigcontext\\.h>") ""))
|
||||
#t))))
|
||||
'())))
|
||||
;; On some architectures 'struct sigcontext' gets redefined from
|
||||
;; %linux-libre-headers/include/asm/sigcontext.h
|
||||
,@(cond ((%current-target-system)
|
||||
`(#:phases (modify-phases %standard-phases
|
||||
(add-before 'configure 'patch-asm-sigcontext-h
|
||||
(lambda _
|
||||
(substitute* (find-files "src" "^fault-.*-old\\.h$")
|
||||
(("#include <asm/sigcontext\\.h>") "")))))))
|
||||
(else '()))))
|
||||
(description
|
||||
"GNU libsigsegv is a library to handle page faults, which occur when a
|
||||
program tries to access an unavailable region of memory, in user mode. By
|
||||
|
|
|
@ -76,7 +76,7 @@
|
|||
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
|
||||
;;; Copyright © 2023 dan <i@dan.games>
|
||||
;;; Copyright © 2023 Foundation Devices, Inc. <hello@foundationdevices.com>
|
||||
;;; Copyright © 2023 Wilko Meyer <w@wmeyer.eu>
|
||||
;;; Copyright © 2023, 2024 Wilko Meyer <w@wmeyer.eu>
|
||||
;;; Copyright © 2023 Jaeme Sifat <jaeme@runbox.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
|
@ -494,17 +494,17 @@ (define (%upstream-linux-source version hash)
|
|||
;; The current "stable" kernels. That is, the most recently released major
|
||||
;; versions that are still supported upstream.
|
||||
|
||||
(define-public linux-libre-6.6-version "6.6.8")
|
||||
(define-public linux-libre-6.6-version "6.6.9")
|
||||
(define-public linux-libre-6.6-gnu-revision "gnu")
|
||||
(define deblob-scripts-6.6
|
||||
(linux-libre-deblob-scripts
|
||||
linux-libre-6.6-version
|
||||
linux-libre-6.6-gnu-revision
|
||||
(base32 "0g8m0rb15b0231dv8ji456s75a67szsaim71may3yprplycz6pav")
|
||||
(base32 "1hg3ck1j8288fhlhcvhgs1zzwh3i62nfvphw7x3vsaqr75kiwbjp")))
|
||||
(base32 "0kavbby960k7wg355p3hjb9v1c4gnk8dv3lkfhpz44ayhv7kihg5")))
|
||||
(define-public linux-libre-6.6-pristine-source
|
||||
(let ((version linux-libre-6.6-version)
|
||||
(hash (base32 "05i4ayj9wyjkd1s8ixx7bxwcyagqyx8rhj1zvbc3cjqyw4sc8djh")))
|
||||
(hash (base32 "1cs8ym3yq9czjx6sbxpmn16l6a577mc4c1ff7nk1p2gw1jpnbg4f")))
|
||||
(make-linux-libre-source version
|
||||
(%upstream-linux-source version hash)
|
||||
deblob-scripts-6.6)))
|
||||
|
@ -512,17 +512,17 @@ (define-public linux-libre-6.6-pristine-source
|
|||
;; The "longterm" kernels — the older releases with long-term upstream support.
|
||||
;; Here are the support timelines:
|
||||
;; <https://www.kernel.org/category/releases.html>
|
||||
(define-public linux-libre-6.1-version "6.1.69")
|
||||
(define-public linux-libre-6.1-version "6.1.70")
|
||||
(define-public linux-libre-6.1-gnu-revision "gnu")
|
||||
(define deblob-scripts-6.1
|
||||
(linux-libre-deblob-scripts
|
||||
linux-libre-6.1-version
|
||||
linux-libre-6.1-gnu-revision
|
||||
(base32 "1sf80f2i4vf888xjcn84ymn4w5ynn30ib9033zwmv7f09yvfhapy")
|
||||
(base32 "1hdibv43xbn1lv83i6qjgfmf1bvqxvq17fryfsq4r4sjgs9212js")))
|
||||
(base32 "1jg2v1nxd6i5x536vmd1l14xhpzrcimpmjfipb1zkrwil102y25f")))
|
||||
(define-public linux-libre-6.1-pristine-source
|
||||
(let ((version linux-libre-6.1-version)
|
||||
(hash (base32 "0hdm28k49kmy9r96hckps0bvvaq9m06l72n8ih305rccs6a2cgby")))
|
||||
(hash (base32 "1vxgardfm2fi4c7zkxpljqicllfqqnp835a9lyb7dh2nchk6a4zd")))
|
||||
(make-linux-libre-source version
|
||||
(%upstream-linux-source version hash)
|
||||
deblob-scripts-6.1)))
|
||||
|
|
|
@ -1038,8 +1038,8 @@ (define-public ecl-stefil
|
|||
(sbcl-package->ecl-package sbcl-stefil))
|
||||
|
||||
(define-public sbcl-try
|
||||
(let ((commit "a1fffad2ca328b3855f629b633ab1daaeec929c2")
|
||||
(revision "1"))
|
||||
(let ((commit "cf2a8887d091bf297b72ef69e15012e7e849ba3b")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-try")
|
||||
(version (git-version "0.0.1" revision commit))
|
||||
|
@ -1051,7 +1051,7 @@ (define-public sbcl-try
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-try" version))
|
||||
(sha256
|
||||
(base32 "03dm2i2y4wiyzz9d25zdxm6gdglnvwali0ylp0rfwpk6wf29sj09"))))
|
||||
(base32 "166i3fqwxfv9skz6yf95c95nx0jjqy1ak1131bd0sqmd582gi9mg"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-cl-ppcre))
|
||||
|
|
|
@ -32,7 +32,7 @@
|
|||
;;; Copyright © 2021 Aleksandr Vityazev <avityazev@posteo.org>
|
||||
;;; Copyright © 2021 Jacob MacDonald <jaccarmac@gmail.com>
|
||||
;;; Copyright © 2022 Jai Vetrivelan <jaivetrivelan@gmail.com>
|
||||
;;; Copyright © 2022, 2023 Paul A. Patience <paul@apatience.com>
|
||||
;;; Copyright © 2022, 2023, 2024 Paul A. Patience <paul@apatience.com>
|
||||
;;; Copyright © 2022 Thomas Albers Raviola <thomas@thomaslabs.org>
|
||||
;;; Copyright © 2022 Arun Isaac <arunisaac@systemreboot.net>
|
||||
;;; Copyright © 2022 Trevor Richards <trev@trevdev.ca>
|
||||
|
@ -1005,11 +1005,11 @@ (define-public cl-adopt
|
|||
(sbcl-package->cl-source-package sbcl-adopt))
|
||||
|
||||
(define-public sbcl-clingon
|
||||
(let ((commit "ff4fda1768551fecdf1c527a3097ae99ba5f40b5")
|
||||
(revision "1"))
|
||||
(let ((commit "379fc41e7b3977661f1454cf35acdbfae046d40d")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "sbcl-clingon")
|
||||
(version (git-version "0.4.0" revision commit))
|
||||
(version (git-version "0.5.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -1018,7 +1018,7 @@ (define-public sbcl-clingon
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-clingon" version))
|
||||
(sha256
|
||||
(base32 "1b5ybq2x8bwsr541cznwv43lf9j5gz1ij52xj181kg32wb3x0y3n"))))
|
||||
(base32 "11p9lplx0fc5ghx601i150vrd46zdbvw0hfrbrrrdqplxaqpywq5"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-rove))
|
||||
|
@ -1510,8 +1510,8 @@ (define-public ecl-cl-ppcre
|
|||
(sbcl-package->ecl-package sbcl-cl-ppcre))
|
||||
|
||||
(define-public sbcl-one-more-re-nightmare
|
||||
(let ((commit "09c33feed35797512bf123ccca053cf8ba42bfbd")
|
||||
(revision "0"))
|
||||
(let ((commit "5b0b02e59f90964baf5737abd13300fa82f27667")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "sbcl-one-more-re-nightmare")
|
||||
(version (git-version "0.0.0" revision commit))
|
||||
|
@ -1523,7 +1523,7 @@ (define-public sbcl-one-more-re-nightmare
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-one-more-re-nightmare" version))
|
||||
(sha256
|
||||
(base32 "0vc0lxvn3anjb63hr26r1l18aw5nbj80w9ja3a32fip6nbwfsrfv"))))
|
||||
(base32 "0mwgjgnp8dsf2zn0290px5q89z93zs0v4dhvs3rcir4mpiw8rbsn"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(arguments
|
||||
'(#:asd-test-systems '("one-more-re-nightmare-tests")
|
||||
|
@ -3152,8 +3152,8 @@ (define-public ecl-calm
|
|||
(sbcl-package->ecl-package sbcl-calm))
|
||||
|
||||
(define-public sbcl-esrap
|
||||
(let ((commit "4c82a863871e117f0041b9ef37e61c0b62318aa7")
|
||||
(revision "3"))
|
||||
(let ((commit "d806138342a6b27327649fd5f36e0fe2e0966867")
|
||||
(revision "4"))
|
||||
(package
|
||||
(name "sbcl-esrap")
|
||||
(version (git-version "0.18" revision commit))
|
||||
|
@ -3163,9 +3163,9 @@ (define-public sbcl-esrap
|
|||
(uri (git-reference
|
||||
(url "https://github.com/scymtym/esrap")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "cl-esrap" version))
|
||||
(sha256
|
||||
(base32 "16nc3rhxd61xabja1h9akqqva0cmz2gxk0bkaqy10h492wx93d81"))
|
||||
(file-name (git-file-name "cl-esrap" version))))
|
||||
(base32 "0gs0mfamldhaihnlk0qxg2q4bl8bamq68dif9js9fkl8apg3iykl"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-fiveam))
|
||||
|
@ -3407,8 +3407,8 @@ (define-public cl-fn
|
|||
|
||||
(define-public sbcl-nibbles
|
||||
;; No tagged release since 2018.
|
||||
(let ((commit "dad25240928d5cf8f7df69c4398244e03570bb35")
|
||||
(revision "2"))
|
||||
(let ((commit "a46a67736e07b548cdd7485cb36834f7942313f1")
|
||||
(revision "3"))
|
||||
(package
|
||||
(name "sbcl-nibbles")
|
||||
(version (git-version "0.14" revision commit))
|
||||
|
@ -3418,9 +3418,9 @@ (define-public sbcl-nibbles
|
|||
(uri (git-reference
|
||||
(url "https://github.com/sharplispers/nibbles/")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "cl-nibbles" version))
|
||||
(sha256
|
||||
(base32 "0r6ljlpgjmkf87pmvdwzva8qj15bhznc3ylgcjjqyy4frbx9lygz"))
|
||||
(file-name (git-file-name "nibbles" version))))
|
||||
(base32 "12qjich11hp31dhbvbsixyjbddmr6faaajigrivgbxy9kw6d279j"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
;; Tests only.
|
||||
|
@ -7497,8 +7497,8 @@ (define-public ecl-find-port
|
|||
(sbcl-package->ecl-package sbcl-find-port))
|
||||
|
||||
(define-public sbcl-numpy-file-format
|
||||
(let ((commit "e97aef6c592a412fdd1afa9a5f09d0b1ce134510")
|
||||
(revision "1"))
|
||||
(let ((commit "e440c7bbc0d86b9abf73acb0fa665b77b82a6c98")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-numpy-file-format")
|
||||
(version (git-version "0.0.0" revision commit))
|
||||
|
@ -7510,7 +7510,7 @@ (define-public sbcl-numpy-file-format
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-numpy-file-format" version))
|
||||
(sha256
|
||||
(base32 "0j7jjcf6k3anvgpm4nf81g6gbhff44v0v9rai7kwm2bm3abzsjfd"))))
|
||||
(base32 "1n0nixc44z1cymm20wif0l2100ydv0h69l6i6xz5bmwcb2zc4gqr"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(inputs
|
||||
(list sbcl-ieee-floats sbcl-trivial-features))
|
||||
|
@ -8316,8 +8316,8 @@ (define-public ecl-cl-cookie
|
|||
(sbcl-package->ecl-package sbcl-cl-cookie))
|
||||
|
||||
(define-public sbcl-dexador
|
||||
(let ((commit "74a233edb0ebf2b8c696fb8db984ac568fbcc4e5")
|
||||
(revision "1"))
|
||||
(let ((commit "051cbb784ea3015cef9731eb5a624f3122de84b5")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-dexador")
|
||||
(build-system asdf-build-system/sbcl)
|
||||
|
@ -8331,7 +8331,7 @@ (define-public sbcl-dexador
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-dexador" version))
|
||||
(sha256
|
||||
(base32 "14cbykd9j8klm8sz3siq5zk78a0ljd6rdwfq12fi4h1ih50apyfi"))))
|
||||
(base32 "1sggpi43la8dai102fmkzysh7760hvk6q68f0pkbb9187vz8nd3y"))))
|
||||
(inputs
|
||||
(list sbcl-alexandria
|
||||
sbcl-babel
|
||||
|
@ -8342,22 +8342,19 @@ (define-public sbcl-dexador
|
|||
sbcl-cl-base64
|
||||
sbcl-cl-cookie
|
||||
sbcl-cl-ppcre
|
||||
sbcl-cl-reexport
|
||||
sbcl-fast-http
|
||||
sbcl-fast-io
|
||||
sbcl-quri
|
||||
sbcl-trivial-garbage
|
||||
sbcl-trivial-gray-streams
|
||||
sbcl-trivial-mimes
|
||||
sbcl-usocket))
|
||||
;; These native-inputs are for tests only, which are disabled.
|
||||
;; Leave them commented since they add a lot to the closure size.
|
||||
;; (native-inputs
|
||||
;; (list sbcl-cl-ppcre
|
||||
;; sbcl-clack
|
||||
;; (list sbcl-clack
|
||||
;; sbcl-lack
|
||||
;; sbcl-local-time
|
||||
;; sbcl-prove
|
||||
;; sbcl-trivial-features))
|
||||
;; sbcl-rove))
|
||||
(arguments
|
||||
;; TODO: Circular dependency: tests depend on clack-test which depends on dexador.
|
||||
`(#:tests? #f
|
||||
|
@ -13990,8 +13987,8 @@ (define-public ecl-moptilities
|
|||
'(#:tests? #f)))))
|
||||
|
||||
(define-public sbcl-osicat
|
||||
(let ((commit "a45eb3b5826e9175f7c94ba97a00d6b4932f3163")
|
||||
(revision "3"))
|
||||
(let ((commit "982327905b8980ff3173344ca87282e046565732")
|
||||
(revision "4"))
|
||||
(package
|
||||
(name "sbcl-osicat")
|
||||
(version (git-version "0.7.0" revision commit))
|
||||
|
@ -14004,7 +14001,7 @@ (define-public sbcl-osicat
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-osicat" version))
|
||||
(sha256
|
||||
(base32 "1ilag0b0xn97acc0m1q93vwp2y3md9a586858zfx04d8wpbvk8sz"))
|
||||
(base32 "10q1dfkhrvp5ia860q10y4wdm11fmxf7xv8zl4viz2np9xzf5v22"))
|
||||
(snippet
|
||||
'(begin
|
||||
;; The useless release.sh drags `bash' into the closure.
|
||||
|
@ -17455,19 +17452,20 @@ (define-public cl-flamegraph
|
|||
(sbcl-package->cl-source-package sbcl-flamegraph))
|
||||
|
||||
(define-public sbcl-trivial-benchmark
|
||||
(let ((commit "42d76733dd2e873471c6f1e27d39113293f7dd5c"))
|
||||
(let ((commit "1fbc8d15f09ed8aa426bc73956b8b7c9b2668802")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-trivial-benchmark")
|
||||
(version (git-version "2.0.0" "1" commit))
|
||||
(version (git-version "2.0.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/Shinmera/trivial-benchmark/")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(file-name (git-file-name "cl-trivial-benchmark" version))
|
||||
(sha256
|
||||
(base32 "0fbzqbpm2ixz85555krl36kbbbjyn699vdj6k383khi3g9y629fa"))))
|
||||
(base32 "1p48wgpady0n8frdcgp7sbg93b0fbvpx1qk5valmanhwr9j3xh88"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(inputs
|
||||
(list sbcl-alexandria))
|
||||
|
@ -17952,47 +17950,50 @@ (define-public cl-shlex
|
|||
(sbcl-package->cl-source-package sbcl-shlex))
|
||||
|
||||
(define-public sbcl-cmd
|
||||
(let ((commit "dda16c251992d2711dd98a073c436e73355cdb15"))
|
||||
(let ((commit "0164d574ba236e2001ee1d9dba3f4774c7512a8c")
|
||||
(revision "8"))
|
||||
(package
|
||||
(name "sbcl-cmd")
|
||||
(version (git-version "0.0.1" "7" commit))
|
||||
(version (git-version "0.0.1" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/ruricolist/cmd/")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(file-name (git-file-name "cl-cmd" version))
|
||||
(sha256
|
||||
(base32 "1m72vir64h21y3z1dmdywr0r3dl9lwawgd5p9g0cl3bgmz2wjgqr"))))
|
||||
(base32 "03wbckzmz6pqdlz7pyar6nfg4vs4bl0b2np7n3kk3qhjbrdakc4m"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(inputs
|
||||
`(("alexandria" ,sbcl-alexandria)
|
||||
("coreutils" ,coreutils)
|
||||
("procps" ,procps)
|
||||
("serapeum" ,sbcl-serapeum)
|
||||
("shlex" ,sbcl-shlex)
|
||||
("trivia" ,sbcl-trivia)))
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fix-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((bin (string-append (assoc-ref inputs "coreutils") "/bin"))
|
||||
(ps-bin (string-append (assoc-ref inputs "procps") "/bin")))
|
||||
(substitute* "cmd.lisp"
|
||||
(("\\(def \\+env\\+ \"env\"\\)")
|
||||
(format #f "(def +env+ \"~a/env\")" bin))
|
||||
(("\\(def \\+kill\\+ \"kill\"\\)")
|
||||
(format #f "(def +kill+ \"~a/kill\")" bin))
|
||||
(("\\(def \\+ps\\+ \"ps\"\\)")
|
||||
(format #f "(def +ps+ \"~a/ps\")" ps-bin))
|
||||
(("\\(def \\+pwd\\+ \"pwd\"\\)")
|
||||
(format #f "(def +pwd+ \"~a/pwd\")" bin))
|
||||
(("\\(def \\+sh\\+ \"/bin/sh\"\\)")
|
||||
(format #f "(def +sh+ \"~a\")" (which "sh")))
|
||||
(("\\(def \\+tr\\+ \"tr\"\\)")
|
||||
(format #f "(def +tr+ \"~a/tr\")" bin)))))))))
|
||||
(list #:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fix-paths
|
||||
(lambda* (#:key inputs #:allow-other-keys)
|
||||
(let ((bin (string-append (assoc-ref inputs "coreutils")
|
||||
"/bin"))
|
||||
(ps-bin (string-append (assoc-ref inputs "procps")
|
||||
"/bin")))
|
||||
(substitute* "cmd.lisp"
|
||||
(("\\(def \\+env\\+ \"env\"\\)")
|
||||
(format #f "(def +env+ \"~a/env\")" bin))
|
||||
(("\\(def \\+kill\\+ \"kill\"\\)")
|
||||
(format #f "(def +kill+ \"~a/kill\")" bin))
|
||||
(("\\(def \\+ps\\+ \"ps\"\\)")
|
||||
(format #f "(def +ps+ \"~a/ps\")" ps-bin))
|
||||
(("\\(def \\+pwd\\+ \"pwd\"\\)")
|
||||
(format #f "(def +pwd+ \"~a/pwd\")" bin))
|
||||
(("\\(def \\+sh\\+ \"/bin/sh\"\\)")
|
||||
(format #f "(def +sh+ \"~a\")" (which "sh")))
|
||||
(("\\(def \\+tr\\+ \"tr\"\\)")
|
||||
(format #f "(def +tr+ \"~a/tr\")" bin)))))))))
|
||||
(inputs
|
||||
(list coreutils
|
||||
procps
|
||||
sbcl-alexandria
|
||||
sbcl-serapeum
|
||||
sbcl-shlex
|
||||
sbcl-trivia))
|
||||
(home-page "https://github.com/ruricolist/cmd")
|
||||
(synopsis "Conveniently run external programs from Common Lisp")
|
||||
(description
|
||||
|
@ -18195,33 +18196,35 @@ (define-public cl-concrete-syntax-tree
|
|||
(sbcl-package->cl-source-package sbcl-concrete-syntax-tree))
|
||||
|
||||
(define-public sbcl-eclector
|
||||
(package
|
||||
(name "sbcl-eclector")
|
||||
(version "0.9.0")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/s-expressionists/Eclector")
|
||||
(commit version)))
|
||||
(file-name (git-file-name "cl-eclector" version))
|
||||
(sha256
|
||||
(base32 "10whwpz08fkdcz59sz1b6rn5r1pdns5wnsb1g26gppiv3rrg3cvh"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-fiveam))
|
||||
(inputs
|
||||
(list sbcl-acclimation
|
||||
sbcl-alexandria
|
||||
sbcl-closer-mop
|
||||
sbcl-concrete-syntax-tree))
|
||||
(arguments
|
||||
'(#:asd-systems '("eclector"
|
||||
"eclector-concrete-syntax-tree")))
|
||||
(home-page "https://s-expressionists.github.io/Eclector/")
|
||||
(synopsis "Highly customizable, portable Common Lisp reader")
|
||||
(description
|
||||
"Eclector is a portable Common Lisp reader that is highly customizable,
|
||||
(let ((commit "d499b09142c7e39b4ef52e821fa767d5a8d606a0")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "sbcl-eclector")
|
||||
(version (git-version "0.9.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/s-expressionists/Eclector")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "cl-eclector" version))
|
||||
(sha256
|
||||
(base32 "1sg8wmdpm8pcjwk394way5vs2ya3r995lddmi51q9zfn9hmzb7gn"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-fiveam))
|
||||
(inputs
|
||||
(list sbcl-acclimation
|
||||
sbcl-alexandria
|
||||
sbcl-closer-mop
|
||||
sbcl-concrete-syntax-tree))
|
||||
(arguments
|
||||
'(#:asd-systems '("eclector"
|
||||
"eclector-concrete-syntax-tree")))
|
||||
(home-page "https://s-expressionists.github.io/Eclector/")
|
||||
(synopsis "Highly customizable, portable Common Lisp reader")
|
||||
(description
|
||||
"Eclector is a portable Common Lisp reader that is highly customizable,
|
||||
can recover from errors and can return concrete syntax trees.
|
||||
|
||||
In contrast to many other reader implementations, eclector can recover from
|
||||
|
@ -18230,7 +18233,7 @@ (define-public sbcl-eclector
|
|||
|
||||
It can also produce instances of the concrete syntax tree classes provided by
|
||||
the concrete syntax tree library.")
|
||||
(license license:bsd-2)))
|
||||
(license license:bsd-2))))
|
||||
|
||||
(define-public ecl-eclector
|
||||
(sbcl-package->ecl-package sbcl-eclector))
|
||||
|
@ -19193,8 +19196,8 @@ (define-public cl-percent-encoding
|
|||
(sbcl-package->cl-source-package sbcl-percent-encoding))
|
||||
|
||||
(define-public sbcl-machine-state
|
||||
(let ((commit "afa7392bc5dcb689cd170bcca765fb6ce6e4efc5")
|
||||
(revision "1"))
|
||||
(let ((commit "3d258eea63942e7d2fd7212f1ad8bbcf505634a2")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-machine-state")
|
||||
(version (git-version "1.0.0" revision commit))
|
||||
|
@ -19204,9 +19207,9 @@ (define-public sbcl-machine-state
|
|||
(uri (git-reference
|
||||
(url "https://github.com/Shinmera/machine-state")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "machine-state" version))
|
||||
(file-name (git-file-name "cl-machine-state" version))
|
||||
(sha256
|
||||
(base32 "1b897wj06cnalzf5nl6rif1skpa79rzc9a562x1bdhvanhsp7hwa"))))
|
||||
(base32 "1fjf2v8agx75qnna1n8fn54lvb01w1rk1vddi3p45a2xw1kwhzml"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(inputs
|
||||
(list sbcl-bordeaux-threads
|
||||
|
@ -19216,7 +19219,7 @@ (define-public sbcl-machine-state
|
|||
(arguments
|
||||
'(#:tests? #f ; No tests.
|
||||
#:asd-systems '("machine-state" "machine-state/opengl")))
|
||||
(home-page "https://notabug.org/cage/cl-mount-info.git")
|
||||
(home-page "https://shinmera.github.io/machine-state/")
|
||||
(synopsis "Retrieve machine state information about CPU time, memory usage and more")
|
||||
(description
|
||||
"This library implements various functions to access status information
|
||||
|
@ -19868,8 +19871,8 @@ (define-public cl-abstract-classes
|
|||
(sbcl-package->cl-source-package sbcl-abstract-classes))
|
||||
|
||||
(define-public sbcl-coalton
|
||||
(let ((commit "ba758062bdc7c316438198601f43900c51df25d8")
|
||||
(revision "3"))
|
||||
(let ((commit "939342495f55991812c2c2767322c5e51e755216")
|
||||
(revision "4"))
|
||||
(package
|
||||
(name "sbcl-coalton")
|
||||
(version (git-version "0.0.1" revision commit))
|
||||
|
@ -19881,16 +19884,17 @@ (define-public sbcl-coalton
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-coalton" version))
|
||||
(sha256
|
||||
(base32 "08sxfla1gyf9pczylaq1cn2j1nr2gzc9w0pk6aarsa4q2770zhf7"))))
|
||||
(base32 "08qzj3v4fvn9h87whyqg650rpap8lva7jr94d1akv6m2z62l5q68"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-fiasco))
|
||||
(inputs
|
||||
(list sbcl-alexandria
|
||||
sbcl-concrete-syntax-tree
|
||||
sbcl-eclector
|
||||
sbcl-float-features
|
||||
sbcl-fset
|
||||
sbcl-json-streams
|
||||
sbcl-split-sequence
|
||||
sbcl-named-readtables
|
||||
sbcl-trivial-garbage))
|
||||
(home-page "https://coalton-lang.github.io")
|
||||
(synopsis "Dialect of ML in Common Lisp")
|
||||
|
@ -20561,6 +20565,118 @@ (define-public sbcl-3d-transforms
|
|||
(define-public cl-3d-transforms
|
||||
(sbcl-package->cl-source-package sbcl-3d-transforms))
|
||||
|
||||
(define-public sbcl-type-templates
|
||||
(let ((commit "5b389ebcff61b81585a64d0b899b69fa12aa5f96")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "sbcl-type-templates")
|
||||
(version (git-version "4.0.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/Shinmera/type-templates")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "cl-type-templates" version))
|
||||
(sha256
|
||||
(base32 "1zmz3bmwg8ncqbnjwimn8n7q9ik9arnhd5ijd22ap1nwhbnmk1rj"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(arguments
|
||||
;; No tests
|
||||
(list #:tests? #f))
|
||||
(inputs
|
||||
(list sbcl-alexandria
|
||||
sbcl-documentation-utils
|
||||
sbcl-form-fiddle))
|
||||
(home-page "https://shinmera.github.io/type-templates/")
|
||||
(synopsis "Library for defining and expanding templated functions")
|
||||
(description
|
||||
"The Type-Templates library allows you to define types and “template
|
||||
functions” that can be expanded into various type-specialized versions to
|
||||
eliminate runtime dispatch overhead. It was specifically designed to
|
||||
implement low-level numerical data types and functionality.")
|
||||
(license license:zlib))))
|
||||
|
||||
(define-public cl-type-templates
|
||||
(sbcl-package->cl-source-package sbcl-type-templates))
|
||||
|
||||
(define-public ecl-type-templates
|
||||
(sbcl-package->ecl-package sbcl-type-templates))
|
||||
|
||||
(define-public sbcl-3d-math
|
||||
(let ((commit "3831b1706d225def95a7301ef48b393b563f0114")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "sbcl-3d-math")
|
||||
(version (git-version "1.0.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/Shinmera/3d-math")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "cl-3d-math" version))
|
||||
(sha256
|
||||
(base32 "052vzx5j7bag9dxvl0j0wrm244js1djldyn31rwxgkq7965rmi5r"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-parachute))
|
||||
(inputs
|
||||
(list sbcl-documentation-utils
|
||||
sbcl-type-templates))
|
||||
(home-page "https://shinmera.github.io/3d-math/")
|
||||
(synopsis "Linear algebra for 2D and 3D computations")
|
||||
(description
|
||||
"The @code{3d-math} library implements types, operators, and algorithms
|
||||
commonly used in math for 2D and 3D graphics. It supersedes and combines the
|
||||
prior libraries @code{3d-vectors}, @code{3d-matrices}, @code{3d-quaternions},
|
||||
and @code{3d-transforms}. The new API is largely but not entirely backwards
|
||||
compatible, and adds new functionality.")
|
||||
(license license:zlib))))
|
||||
|
||||
(define-public cl-3d-math
|
||||
(sbcl-package->cl-source-package sbcl-3d-math))
|
||||
|
||||
(define-public ecl-3d-math
|
||||
(sbcl-package->ecl-package sbcl-3d-math))
|
||||
|
||||
(define-public sbcl-3d-spaces
|
||||
(let ((commit "a93f4915affcf65617366297ad8bd2ec77bae702")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "sbcl-3d-spaces")
|
||||
(version (git-version "1.0.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/Shirakumo/3d-spaces")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "cl-3d-spaces" version))
|
||||
(sha256
|
||||
(base32 "1m5cg5zy1731dcgkm1p4m53z1zsp387xligxh32pdrnrhc2lzhmf"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-parachute))
|
||||
(inputs
|
||||
(list sbcl-3d-math
|
||||
sbcl-documentation-utils
|
||||
sbcl-for
|
||||
sbcl-trivial-extensible-sequences))
|
||||
(home-page "https://shirakumo.github.io/3d-spaces/")
|
||||
(synopsis "Implementations of various spatial query structures")
|
||||
(description
|
||||
"The 3D-Spaces library implements a number of spatial query data
|
||||
structures; structures that can answer spatial range queries for optimized
|
||||
lookup, particularly suited for games.")
|
||||
(license license:zlib))))
|
||||
|
||||
(define-public cl-3d-spaces
|
||||
(sbcl-package->cl-source-package sbcl-3d-spaces))
|
||||
|
||||
(define-public ecl-3d-spaces
|
||||
(sbcl-package->ecl-package sbcl-3d-spaces))
|
||||
|
||||
(define-public sbcl-glsl-toolkit
|
||||
(let ((commit "4c4889e75c635772c4df70b11d6f14e7a596da43")
|
||||
(revision "2"))
|
||||
|
@ -20785,25 +20901,25 @@ (define-public cl-typesetting
|
|||
(sbcl-package->cl-source-package sbcl-cl-typesetting))
|
||||
|
||||
(define-public sbcl-shasht
|
||||
(let ((commit "4055327ef8e2aaa8627892ab256350ff3cb15e3c")
|
||||
(revision "1"))
|
||||
(let ((commit "27ba0a8842e103f2d575b3c8bbcfc19bd172d9ea")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-shasht")
|
||||
(version (git-version "0.1.0" revision commit))
|
||||
(version (git-version "0.1" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
(url "https://github.com/yitzchak/shasht")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "shasht" version))
|
||||
(file-name (git-file-name "cl-shasht" version))
|
||||
(sha256
|
||||
(base32 "01mh20s5gj0lajq45anxji77ykq1wcg72mn1y9a1k8i7q1ainjlr"))))
|
||||
(base32 "1y7qh8kdhk06243vkmxzdk0y9rax4g8pv28bd01j48ix777mpcdc"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(native-inputs
|
||||
(list sbcl-alexandria sbcl-parachute))
|
||||
(inputs
|
||||
(list sbcl-trivial-do))
|
||||
(list sbcl-closer-mop sbcl-trivial-do))
|
||||
(home-page "https://yitzchak.github.io/shasht/")
|
||||
(synopsis "Common Lisp JSON reading and writing library")
|
||||
(description
|
||||
|
@ -21493,11 +21609,11 @@ (define-public cl-glfw3
|
|||
(sbcl-package->cl-source-package sbcl-cl-glfw3))
|
||||
|
||||
(define-public sbcl-cl-gltf
|
||||
(let ((commit "7f9193acec80cad775b61b1c7a125c14a7b35a0c")
|
||||
(let ((commit "dab186ebf9169926ccfcdec121a157162ad6ed83")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "sbcl-cl-gltf")
|
||||
(version (git-version "1.0.0" revision commit))
|
||||
(version (git-version "2.0.0" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -21506,7 +21622,7 @@ (define-public sbcl-cl-gltf
|
|||
(commit commit)))
|
||||
(file-name (git-file-name "cl-gltf" version))
|
||||
(sha256
|
||||
(base32 "0ni42242a4x052dqlycwrg5j6piwm87s4wgbn2q0a9s3l9f811vk"))))
|
||||
(base32 "0ijy0paph7w037a2k14pv8j44mnj4gwhddhxzyqsz3qwl6fpb7yb"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(arguments
|
||||
;; No tests provided.
|
||||
|
@ -21733,8 +21849,8 @@ (define-public cl-binding-arrows
|
|||
|
||||
(define-public sbcl-atomics
|
||||
;; No release in years.
|
||||
(let ((commit "9ee0bdebcd2bb9b242671a75460db13fbf45454c")
|
||||
(revision "1"))
|
||||
(let ((commit "b7477024894e322bff9c85e6d81e5e8d1d4eae59")
|
||||
(revision "2"))
|
||||
(package
|
||||
(name "sbcl-atomics")
|
||||
(version (git-version "1.0.0" revision commit))
|
||||
|
@ -21744,9 +21860,9 @@ (define-public sbcl-atomics
|
|||
(uri (git-reference
|
||||
(url "https://github.com/Shinmera/atomics")
|
||||
(commit commit)))
|
||||
(file-name (git-file-name "atomics" version))
|
||||
(file-name (git-file-name "cl-atomics" version))
|
||||
(sha256
|
||||
(base32 "0mp5jdqq0aamdhgnvw149cqqi3zg7dkkibp25qi4rafw1fnpd40z"))))
|
||||
(base32 "1ah6fgvfva0axnhj4sp1qy6gjyw41fkhpnv998di0wbp6hls8j39"))))
|
||||
(build-system asdf-build-system/sbcl)
|
||||
(inputs
|
||||
(list sbcl-documentation-utils))
|
||||
|
|
|
@ -999,7 +999,7 @@ (define man-for-txr
|
|||
(define-public txr
|
||||
(package
|
||||
(name "txr")
|
||||
(version "292")
|
||||
(version "293")
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -1008,7 +1008,7 @@ (define-public txr
|
|||
(commit (string-append "txr-" version))))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0lly446pinfrr5d4rgsas8c7kqal2g03bbsbmn0yvhvazb39c15g"))))
|
||||
(base32 "1b3vhlnw4ymznnlh9d71qhkcdc1p69a53hilckc3rql9y4jsik57"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:configure-flags
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2015-2023 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2015-2024 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2016, 2020-2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2016, 2017, 2020 Marius Bakke <mbakke@fastmail.com>
|
||||
;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||||
|
@ -1151,6 +1151,11 @@ (define-public onnx
|
|||
(build-system python-build-system)
|
||||
(arguments
|
||||
'(#:phases (modify-phases %standard-phases
|
||||
(add-after 'unpack 'relax-requirements
|
||||
(lambda _
|
||||
;; Does this difference really matter?
|
||||
(substitute* "requirements.txt"
|
||||
(("3.20.1") "3.20.2"))))
|
||||
(add-before 'build 'pass-cmake-arguments
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
;; Pass options to the CMake-based build process.
|
||||
|
@ -1235,7 +1240,13 @@ (define-public onnx-for-torch2
|
|||
'(begin
|
||||
(delete-file-recursively "third_party")
|
||||
(substitute* "onnx/backend/test/runner/__init__.py"
|
||||
(("urlretrieve\\(.*") "raise unittest.SkipTest('Skipping download')\n"))))))))
|
||||
(("urlretrieve\\(.*") "raise unittest.SkipTest('Skipping download')\n"))))))
|
||||
(arguments
|
||||
;; reuse build system tweaks
|
||||
(substitute-keyword-arguments (package-arguments onnx)
|
||||
((#:phases phases)
|
||||
#~(modify-phases #$phases
|
||||
(delete 'relax-requirements)))))))
|
||||
|
||||
(define-public python-onnx
|
||||
;; This used to be called "python-onnx" because it provided nothing but
|
||||
|
@ -1262,7 +1273,12 @@ (define-public onnx-optimizer
|
|||
(modules '((guix build utils)))
|
||||
(snippet '(delete-file-recursively "third_party"))))
|
||||
(build-system python-build-system)
|
||||
(arguments (package-arguments onnx)) ;reuse build system tweaks
|
||||
(arguments
|
||||
;; reuse build system tweaks
|
||||
(substitute-keyword-arguments (package-arguments onnx)
|
||||
((#:phases phases)
|
||||
#~(modify-phases #$phases
|
||||
(delete 'relax-requirements)))))
|
||||
(native-inputs
|
||||
(list cmake python-pytest python-pytest-runner python-nbval
|
||||
python-coverage))
|
||||
|
|
|
@ -109,6 +109,7 @@ (define-module (gnu packages mail)
|
|||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-check)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages groff)
|
||||
#:use-module (gnu packages gsasl)
|
||||
#:use-module (gnu packages gtk)
|
||||
|
|
|
@ -2636,11 +2636,11 @@ (define-public telegram-purple
|
|||
(license license:gpl2+)))
|
||||
|
||||
(define-public tdlib
|
||||
(let ((commit "4ed0b23c9c99868ab4d2d28e8ff244687f7b3144")
|
||||
(let ((commit "27c3eaeb4964bd5f18d8488e354abde1a4383e49")
|
||||
(revision "0"))
|
||||
(package
|
||||
(name "tdlib")
|
||||
(version (git-version "1.8.20" revision commit))
|
||||
(version (git-version "1.8.23" revision commit))
|
||||
(source
|
||||
(origin
|
||||
(method git-fetch)
|
||||
|
@ -2648,7 +2648,7 @@ (define-public tdlib
|
|||
(url "https://github.com/tdlib/td")
|
||||
(commit commit)))
|
||||
(sha256
|
||||
(base32 "16kprlcnphi89yfwgnlaxjwwb1xx24az8xd710rx8cslb4zv00qw"))
|
||||
(base32 "14f65dfmg2p5hyvi3lffvvazwcd3i3jrrw3c2pwrc5yfgxk3662g"))
|
||||
(file-name (git-file-name name version))))
|
||||
(build-system cmake-build-system)
|
||||
(arguments
|
||||
|
|
|
@ -52,7 +52,7 @@ (define-module (gnu packages minetest)
|
|||
(define-public minetest
|
||||
(package
|
||||
(name "minetest")
|
||||
(version "5.7.0")
|
||||
(version "5.8.0")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri (git-reference
|
||||
|
@ -61,7 +61,7 @@ (define-public minetest
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"008l44zwwsarwk4hn7wx2nj2m21b1iqsphl7g69rrlxj760zl0pl"))
|
||||
"1sww17h8z77w38jk19nsqxn8xcj27msq0glbil7pyj4i0ffprjrr"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
|
@ -166,7 +166,7 @@ (define minetest-data
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"02kbj1h6jsq6k8x4v2ir0njczdz7nyx6dbym85ixxp3mrqxiws61"))))
|
||||
"1pq4rm15lzwcqv6npgyz6v89hi3zj8zybw25n9i0d27qj786xc4z"))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
(list #:install-plan
|
||||
|
|
|
@ -117,7 +117,7 @@ (define-public libmpdclient
|
|||
(define-public mpd
|
||||
(package
|
||||
(name "mpd")
|
||||
(version "0.23.14")
|
||||
(version "0.23.15")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri
|
||||
|
@ -126,7 +126,7 @@ (define-public mpd
|
|||
"/mpd-" version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"1lh9nn4a7ng6i08df7rbs8c4nbgmz883pss9p2gswa6m4rsadfc5"))))
|
||||
"06k60ych9crifyx6zfc98hdcihixq5nba1c9rwngib6ik8ik40am"))))
|
||||
(build-system meson-build-system)
|
||||
(arguments
|
||||
(list
|
||||
|
@ -162,6 +162,7 @@ (define-public mpd
|
|||
boost
|
||||
chromaprint
|
||||
curl
|
||||
dbus
|
||||
elogind
|
||||
expat
|
||||
ffmpeg
|
||||
|
|
|
@ -6,7 +6,7 @@
|
|||
;;; Copyright © 2016, 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2018 Eric Bavier <bavier@member.fsf.org>
|
||||
;;; Copyright © 2018, 2019, 2021, 2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2018, 2019, 2021, 2023, 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2021 Vinicius Monego <monego@posteo.net>
|
||||
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
|
@ -71,6 +71,8 @@ (define-public gmp
|
|||
;; they produce different headers. We need shared.
|
||||
`("--disable-static"
|
||||
"--enable-shared"))
|
||||
((target-x32?)
|
||||
`("ABI=x32"))
|
||||
(else '())))
|
||||
;; Remove after core-updates merge.
|
||||
;; Workaround for gcc-7 transition breakage, -system and cross-build,
|
||||
|
|
|
@ -123,6 +123,7 @@ (define-module (gnu packages networking)
|
|||
#:use-module (gnu packages gnome)
|
||||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages graphviz)
|
||||
#:use-module (gnu packages gstreamer)
|
||||
#:use-module (gnu packages gtk)
|
||||
|
@ -4449,31 +4450,30 @@ (define-public yggdrasil
|
|||
#:deep? #true)))
|
||||
(cons go-golang-org-x-sys-0.8
|
||||
(map p
|
||||
(list go-golang-zx2c4-com-wireguard
|
||||
go-golang-org-x-text
|
||||
go-golang-org-x-net
|
||||
go-golang-org-x-crypto
|
||||
go-golang-org-x-tools
|
||||
go-netns
|
||||
go-netlink
|
||||
(list go-github-com-arceliar-ironwood
|
||||
go-github-com-arceliar-phony
|
||||
go-github-com-bits-and-blooms-bitset
|
||||
go-github-com-bits-and-blooms-bloom
|
||||
go-github-com-quic-go-quic-go
|
||||
go-github-com-hjson-hjson-go
|
||||
go-github-com-olekukonko-tablewriter
|
||||
go-github-com-mitchellh-mapstructure
|
||||
go-github-com-mattn-go-runewidth
|
||||
go-github-com-mattn-go-isatty
|
||||
go-github-com-mattn-go-colorable
|
||||
go-github-com-kardianos-minwinsvc
|
||||
go-github-com-hjson-hjson-go
|
||||
go-github-com-hashicorp-go-syslog
|
||||
go-github-com-gologme-log
|
||||
go-github-com-fatih-color
|
||||
go-github-com-cheggaaa-pb-v3
|
||||
go-github-com-fatih-color
|
||||
go-github-com-gologme-log
|
||||
go-github-com-hashicorp-go-syslog
|
||||
go-github-com-hjson-hjson-go
|
||||
go-github-com-kardianos-minwinsvc
|
||||
go-github-com-mattn-go-colorable
|
||||
go-github-com-mattn-go-isatty
|
||||
go-github-com-mattn-go-runewidth
|
||||
go-github-com-mitchellh-mapstructure
|
||||
go-github-com-olekukonko-tablewriter
|
||||
go-github-com-quic-go-quic-go
|
||||
go-github-com-vividcortex-ewma
|
||||
go-github-com-arceliar-phony
|
||||
go-github-com-arceliar-ironwood)))))
|
||||
go-golang-org-x-crypto
|
||||
go-golang-org-x-net
|
||||
go-golang-org-x-text
|
||||
go-golang-org-x-tools
|
||||
go-golang-zx2c4-com-wireguard
|
||||
go-netlink
|
||||
go-netns)))))
|
||||
(home-page "https://yggdrasil-network.github.io/blog.html")
|
||||
(synopsis
|
||||
"Experiment in scalable routing as an encrypted IPv6 overlay network")
|
||||
|
|
|
@ -1,23 +0,0 @@
|
|||
From 9cc5520e1998d03f5dec0fbb1fe71b7cdec38b65 Mon Sep 17 00:00:00 2001
|
||||
From: Alex Branham <alex.branham@gmail.com>
|
||||
Date: Wed, 6 Jan 2021 06:41:20 -0500
|
||||
Subject: [PATCH] Add required when to obsolete function alias
|
||||
|
||||
Closes #1085
|
||||
---
|
||||
lisp/ess-r-package.el | 2 +-
|
||||
1 file changed, 1 insertion(+), 1 deletion(-)
|
||||
|
||||
diff --git a/lisp/ess-r-package.el b/lisp/ess-r-package.el
|
||||
index 260959955..397ce14e6 100644
|
||||
--- a/lisp/ess-r-package.el
|
||||
+++ b/lisp/ess-r-package.el
|
||||
@@ -577,7 +577,7 @@ package mode. Use this function if state of the buffer such as
|
||||
(error "As of ESS 16.04, `ess-developer' is deprecated. Use `ess-r-set-evaluation-env' instead"))
|
||||
|
||||
(defalias 'ess-toggle-developer 'ess-developer)
|
||||
-(define-obsolete-function-alias 'ess-r-devtools-check-package-buildwin 'ess-r-devtools-check-with-winbuilder)
|
||||
+(define-obsolete-function-alias 'ess-r-devtools-check-package-buildwin 'ess-r-devtools-check-with-winbuilder "18.04")
|
||||
(define-obsolete-function-alias 'ess-r-devtools-ask 'ess-r-devtools-execute-command "18.04")
|
||||
|
||||
(make-obsolete-variable 'ess-developer "Please use `ess-developer-select-package' and `ess-r-set-evaluation-env' instead." "16.04")
|
|
@ -1,75 +0,0 @@
|
|||
From faa95a784d2c74c72e70367a5d531df6dd61aeab Mon Sep 17 00:00:00 2001
|
||||
From: Steve Purcell <steve@sanityinc.com>
|
||||
Date: Sun, 6 Aug 2023 16:41:48 +0200
|
||||
Subject: [PATCH] Don't redefine built-in function
|
||||
|
||||
Fixes #1817
|
||||
---
|
||||
tests/haskell-indent-tests.el | 14 ++++++++------
|
||||
tests/haskell-indentation-tests.el | 14 ++++++++------
|
||||
2 files changed, 16 insertions(+), 12 deletions(-)
|
||||
|
||||
diff --git a/tests/haskell-indent-tests.el b/tests/haskell-indent-tests.el
|
||||
index 7196405b8..9a3de4ad3 100644
|
||||
--- a/tests/haskell-indent-tests.el
|
||||
+++ b/tests/haskell-indent-tests.el
|
||||
@@ -40,11 +40,13 @@
|
||||
;; (haskell-indent-put-region-in-literate (point-min) (point-max) -1)
|
||||
;; (buffer-substring-no-properties (point-min) (point-max))))))
|
||||
|
||||
-(defsubst string-trim-left (string)
|
||||
- "Remove leading whitespace from STRING."
|
||||
- (if (string-match "\\`[ \t\n\r]+" string)
|
||||
- (replace-match "" t t string)
|
||||
- string))
|
||||
+(if (fboundp 'string-trim-left)
|
||||
+ (defalias 'haskell--string-trim-left 'string-trim-left)
|
||||
+ (defun haskell--string-trim-left (string &optional regexp)
|
||||
+ "Remove leading whitespace from STRING."
|
||||
+ (if (string-match (concat "\\`\\(?:" (or regexp "[ \t\n\r]+") "\\)") string)
|
||||
+ (substring string (match-end 0))
|
||||
+ string)))
|
||||
|
||||
(defun haskell-indent-format-info (info)
|
||||
(if (cdr info)
|
||||
@@ -128,7 +130,7 @@ macro quotes them for you."
|
||||
:expected-result
|
||||
,(if allow-failure :failed :passed)
|
||||
(haskell-indent-check
|
||||
- ,(string-trim-left source)
|
||||
+ ,(haskell--string-trim-left source)
|
||||
,@(mapcar (lambda (x)
|
||||
(list 'quote x))
|
||||
test-cases))))))
|
||||
diff --git a/tests/haskell-indentation-tests.el b/tests/haskell-indentation-tests.el
|
||||
index 4889b76a7..cd783a4f4 100644
|
||||
--- a/tests/haskell-indentation-tests.el
|
||||
+++ b/tests/haskell-indentation-tests.el
|
||||
@@ -33,11 +33,13 @@
|
||||
|
||||
;;; Code:
|
||||
|
||||
-(defsubst string-trim-left (string)
|
||||
- "Remove leading whitespace from STRING."
|
||||
- (if (string-match "\\`[ \t\n\r]+" string)
|
||||
- (replace-match "" t t string)
|
||||
- string))
|
||||
+(if (fboundp 'string-trim-left)
|
||||
+ (defalias 'haskell--string-trim-left 'string-trim-left)
|
||||
+ (defun haskell--string-trim-left (string &optional regexp)
|
||||
+ "Remove leading whitespace from STRING."
|
||||
+ (if (string-match (concat "\\`\\(?:" (or regexp "[ \t\n\r]+") "\\)") string)
|
||||
+ (substring string (match-end 0))
|
||||
+ string)))
|
||||
|
||||
(defun haskell-indentation-check (source &rest test-cases)
|
||||
"Check if `haskell-indentation-find-indentations' returns expected results.
|
||||
@@ -115,7 +117,7 @@ macro quotes them for you."
|
||||
:expected-result
|
||||
,(if allow-failure :failed :passed)
|
||||
(haskell-indentation-check
|
||||
- ,(string-trim-left source)
|
||||
+ ,(haskell--string-trim-left source)
|
||||
,@(mapcar (lambda (x)
|
||||
(list 'quote x))
|
||||
test-cases))))))
|
|
@ -73,8 +73,8 @@ (define-public drawterm
|
|||
|
||||
(define-public plan9port
|
||||
;; no releases
|
||||
(let ((commit "cc4571fec67407652b03d6603ada6580de2194dc")
|
||||
(revision "0"))
|
||||
(let ((commit "f8681acb374fa0d5ed1568dbedb00a4abe1ca6f1")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "plan9port")
|
||||
(version (git-version "0.1.0" revision commit))
|
||||
|
@ -86,7 +86,7 @@ (define-public plan9port
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"1g2kzlghcghs560na6xalfsjq5zwp015wv9wk8wxn26981zs759x"))
|
||||
"01343jvn8kr63i78h8xlgscn6wihdsr44xzh1cylvhigjbqw8n2x"))
|
||||
(modules '((guix build utils)))
|
||||
(snippet #~(for-each delete-file-recursively
|
||||
'("font/luc" ;nonfree
|
||||
|
@ -94,73 +94,69 @@ (define-public plan9port
|
|||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(list #:tests? #f ;no tests
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'setup
|
||||
(lambda _
|
||||
(delete-file "src/cmd/mk/mk.pdf")
|
||||
(substitute* "src/cmd/acme/acme.c"
|
||||
(("/lib/font/bit/lucsans/euro.8.font")
|
||||
(string-append #$output
|
||||
"/font/fixed/unicode.5x8.font"))
|
||||
(("/lib/font/bit/lucm/unicode.9.font")
|
||||
(string-append #$output
|
||||
"/font/fixed/unicode.6x9.font")))
|
||||
(substitute* (find-files "src")
|
||||
(("/lib/font/bit")
|
||||
(string-append #$output "/font")))
|
||||
(substitute* "bin/9c"
|
||||
(("which")
|
||||
(which "which")))
|
||||
(substitute* "src/cmd/fontsrv/freetyperules.sh"
|
||||
(("'\\$i'/freetype2")
|
||||
(string-append "-I"
|
||||
#$freetype
|
||||
"/include/freetype2")))
|
||||
(with-output-to-file "LOCAL.config"
|
||||
(lambda _
|
||||
(format #t "CC9=~a~%" #$(cc-for-target))
|
||||
(format #t "FONTSRV=fontsrv~%")))
|
||||
(setenv "X11"
|
||||
#$libx11)
|
||||
(setenv "PLAN9"
|
||||
(getcwd))
|
||||
(setenv "PLAN9_TARGET"
|
||||
#$output)))
|
||||
(delete 'configure) ;no configure
|
||||
(replace 'build
|
||||
(lambda _
|
||||
(invoke "./INSTALL" "-b")))
|
||||
(replace 'install
|
||||
(lambda _
|
||||
(for-each (lambda (x)
|
||||
(let ((out (string-append #$output
|
||||
"/" x)))
|
||||
(mkdir-p out)
|
||||
(copy-recursively x out)))
|
||||
;; TODO: use external sky and dict packages
|
||||
'("bin" "face"
|
||||
"font"
|
||||
"include"
|
||||
"lib"
|
||||
"lp"
|
||||
"mail"
|
||||
"man"
|
||||
"ndb"
|
||||
"plumb"
|
||||
"tmac"
|
||||
"troff"
|
||||
"postscript"))
|
||||
(install-file "rcmain" #$output)))
|
||||
(add-after 'install 'wrap-executables
|
||||
(lambda _
|
||||
(for-each (lambda (exe)
|
||||
(wrap-program exe
|
||||
`("PLAN9" ":" prefix
|
||||
(,#$output))))
|
||||
(find-files
|
||||
(string-append #$output "/bin")))))
|
||||
;; Plan9 doesn't compress man pages
|
||||
(delete 'compress-documentation))))
|
||||
#:strip-directories #~'("plan9/bin")
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'setup
|
||||
(lambda _
|
||||
(let ((dest (string-append #$output "/plan9")))
|
||||
(delete-file "src/cmd/mk/mk.pdf")
|
||||
(substitute* "src/cmd/acme/acme.c"
|
||||
(("/lib/font/bit/lucsans/euro.8.font")
|
||||
(string-append dest
|
||||
"/font/fixed/unicode.5x8.font"))
|
||||
(("/lib/font/bit/lucm/unicode.9.font")
|
||||
(string-append dest
|
||||
"/font/fixed/unicode.6x9.font")))
|
||||
(substitute* (find-files "src")
|
||||
(("/lib/font/bit")
|
||||
(string-append dest "/font")))
|
||||
(substitute* "bin/9c"
|
||||
(("which")
|
||||
(which "which")))
|
||||
(substitute* "src/cmd/fontsrv/freetyperules.sh"
|
||||
(("'\\$i'/freetype2")
|
||||
(string-append "-I"
|
||||
#$freetype
|
||||
"/include/freetype2")))
|
||||
(with-output-to-file "LOCAL.config"
|
||||
(lambda _
|
||||
(format #t "CC9=~a~%" #$(cc-for-target))
|
||||
(format #t "FONTSRV=fontsrv~%")))
|
||||
(setenv "X11" #$libx11)
|
||||
(setenv "PLAN9" (getcwd))
|
||||
(setenv "PLAN9_TARGET" dest))))
|
||||
(delete 'configure) ;no configure
|
||||
(replace 'build
|
||||
(lambda _
|
||||
(invoke "./INSTALL" "-b")))
|
||||
(replace 'install
|
||||
(lambda _
|
||||
(invoke "./INSTALL" "-c")
|
||||
(let ((dest (getenv "PLAN9_TARGET")))
|
||||
(for-each (lambda (x)
|
||||
(let ((out (string-append dest "/" x)))
|
||||
(mkdir-p out)
|
||||
(copy-recursively x out)))
|
||||
;; TODO: use external sky and dict packages
|
||||
'("bin" "face"
|
||||
"font"
|
||||
"include"
|
||||
"lib"
|
||||
"lp"
|
||||
"mail"
|
||||
"man"
|
||||
"ndb"
|
||||
"plumb"
|
||||
"tmac"
|
||||
"troff"
|
||||
"postscript"))
|
||||
(install-file "rcmain" dest)
|
||||
(mkdir-p (string-append #$output "/bin"))
|
||||
(symlink (string-append dest "/bin/9")
|
||||
(string-append #$output "/bin/9")))))
|
||||
;; Plan9 doesn't compress man pages
|
||||
(delete 'compress-documentation))))
|
||||
(native-inputs (list perl which))
|
||||
(inputs (list bash-minimal ;for 'wrap-program'
|
||||
fontconfig libx11 libxext libxt))
|
||||
|
|
|
@ -9239,6 +9239,105 @@ (define-public python-lfdfiles
|
|||
experimental data and metadata at the Laboratory for Fluorescence Dynamics.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public python-av
|
||||
(package
|
||||
(name "python-av")
|
||||
(version "10.0.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "av" version))
|
||||
(sha256
|
||||
(base32 "01byqsjclkg65mhr6b4i2r2n4y7af9kdd2c35lxny27121b3vzca"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:test-flags
|
||||
#~(list
|
||||
;; Tests require outbound access to download data samples from
|
||||
;; http://fate.ffmpeg.org/fate-suite:
|
||||
;;
|
||||
;; E urllib.error.URLError: <urlopen error [Errno -3]
|
||||
;; Temporary failure in name resolution>
|
||||
;;
|
||||
"--ignore=tests/test_doctests.py"
|
||||
"--ignore=tests/test_timeout.py"
|
||||
"-k"
|
||||
(string-append
|
||||
"not test_data"
|
||||
" and not test_container_probing"
|
||||
" and not test_stream_probing"
|
||||
" and not test_transcode"
|
||||
" and not test_codec_tag"
|
||||
" and not test_parse"
|
||||
" and not test_decode_audio_sample_count"
|
||||
" and not test_decoded_motion_vectors"
|
||||
" and not test_decoded_motion_vectors_no_flag"
|
||||
" and not test_decoded_time_base"
|
||||
" and not test_decoded_video_frame_count"
|
||||
" and not test_encoding_aac"
|
||||
" and not test_encoding_dnxhd"
|
||||
" and not test_encoding_dvvideo"
|
||||
" and not test_encoding_h264"
|
||||
" and not test_encoding_mjpeg"
|
||||
" and not test_encoding_mp2"
|
||||
" and not test_encoding_mpeg1video"
|
||||
" and not test_encoding_mpeg4"
|
||||
" and not test_encoding_pcm_s24le"
|
||||
" and not test_encoding_png"
|
||||
" and not test_encoding_tiff"
|
||||
" and not test_encoding_xvid"
|
||||
" and not test_reading_from_buffer"
|
||||
" and not test_reading_from_buffer_no_seek"
|
||||
" and not test_reading_from_file"
|
||||
" and not test_reading_from_pipe_readonly"
|
||||
" and not test_reading_from_write_readonly"
|
||||
" and not test_writing_to_custom_io_dash"
|
||||
" and not test_writing_to_custom_io_image2"
|
||||
" and not test_decode_half"
|
||||
" and not test_seek_end"
|
||||
" and not test_seek_float"
|
||||
" and not test_seek_int64"
|
||||
" and not test_seek_middle"
|
||||
" and not test_seek_start"
|
||||
" and not test_stream_seek"
|
||||
" and not test_selection"
|
||||
" and not test_stream_tuples"
|
||||
" and not test_movtext"
|
||||
" and not test_vobsub"
|
||||
" and not test_roundtrip"
|
||||
" and not test_stream_probing"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-before 'check 'build-extensions
|
||||
(lambda _
|
||||
(invoke "python" "setup.py" "build_ext" "--inplace"))))))
|
||||
(native-inputs
|
||||
(list pkg-config
|
||||
python-cython
|
||||
python-editorconfig
|
||||
python-numpy
|
||||
python-pillow
|
||||
python-pytest))
|
||||
(inputs
|
||||
;; XXX: Build is failing with FFmpeg 6.0, unresolved upstream.
|
||||
;; See https://github.com/PyAV-Org/PyAV/issues/1106
|
||||
(list ffmpeg-5))
|
||||
(home-page "https://github.com/PyAV-Org/PyAV")
|
||||
(synopsis "Pythonic bindings for FFmpeg's libraries")
|
||||
(description
|
||||
"PyAV is a Python library that allows for direct and precise manipulation
|
||||
of media through containers, streams, packets, codecs, and frames. It provides
|
||||
access to the powerful FFmpeg libraries while managing the complex details as
|
||||
much as possible.
|
||||
PyAV also facilitates data transformation and integration with
|
||||
other packages such as Numpy and Pillow. However, working with media is a
|
||||
challenging task and PyAV cannot abstract it away or make all the best decisions
|
||||
for you. If you can accomplish your tasks with the ffmpeg command, PyAV may not
|
||||
be necessary. Nonetheless, PyAV is an essential tool when working with media
|
||||
that requires its specific capabilities.")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public python-ffmpeg-python
|
||||
;; The latest release (0.2.0) is old and its test suite crashs on Python 3.10.
|
||||
(let ((commit "df129c7ba30aaa9ffffb81a48f53aa7253b0b4e6") (revision "0"))
|
||||
|
@ -30243,6 +30342,45 @@ (define-public python-parallel
|
|||
applications with variable CPU loads).")
|
||||
(license license:bsd-3)))
|
||||
|
||||
(define-public python-djitellopy
|
||||
(package
|
||||
(name "python-djitellopy")
|
||||
(version "2.5.0")
|
||||
(source
|
||||
(origin
|
||||
(method url-fetch)
|
||||
(uri (pypi-uri "djitellopy" version))
|
||||
(sha256
|
||||
(base32 "1kc0syb4hpn7fay0rxpazmczag6jw3pncrrc6v762jj0afiwkrps"))))
|
||||
(build-system pyproject-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:tests? #f ;no test suite
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
;; OpenCV does not ship metadata files for its Python library, which
|
||||
;; makes it invisible to the sanity_check script (see:
|
||||
;; https://github.com/opencv/opencv/issues/24810).
|
||||
(delete 'sanity-check))))
|
||||
(propagated-inputs
|
||||
(list opencv ;for opencv-python
|
||||
python-av
|
||||
python-numpy
|
||||
python-pillow))
|
||||
(home-page "https://github.com/damiafuentes/DJITelloPy")
|
||||
(synopsis
|
||||
"DJI Tello drone video streaming, swarms and state packets library")
|
||||
(description
|
||||
"DJI Tello drone Python interface using the official Tello SDK and Tello
|
||||
EDU SDK. This library has the following features:
|
||||
@itemize
|
||||
@item Implementation of all tello commands
|
||||
@item Retrieve a video stream easily
|
||||
@item Receive and parse state packets
|
||||
@item Control a swarm of drones.
|
||||
@end itemize")
|
||||
(license license:expat)))
|
||||
|
||||
(define-public python-djvulibre
|
||||
(package
|
||||
(name "python-djvulibre")
|
||||
|
|
|
@ -331,7 +331,7 @@ (define-public zsh-syntax-highlighting
|
|||
(define-public grml-zsh-config
|
||||
(package
|
||||
(name "grml-zsh-config")
|
||||
(version "0.19.5")
|
||||
(version "0.19.6")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append
|
||||
|
@ -339,7 +339,7 @@ (define-public grml-zsh-config
|
|||
version ".tar.gz"))
|
||||
(sha256
|
||||
(base32
|
||||
"0ifw490z3v9ljccbmm04adz39fj2dmx8mjgayxqj0a9ln90yfdc4"))))
|
||||
"1k1m2fbmvw73qy9mc6k2ygjg6zz8h7nn3d9pvj6jbjadnx4pz770"))))
|
||||
(build-system copy-build-system)
|
||||
(arguments
|
||||
(list
|
||||
|
|
|
@ -6448,7 +6448,7 @@ (define-public r-tgconfig
|
|||
(license license:gpl3+))))
|
||||
|
||||
(define-public r-tgutil
|
||||
(let ((commit "0e4a2e84e5cf1f74bc66df0a3d8eac89633fd7b1")
|
||||
(let ((commit "db4ff8b98082f8e4dbdeacb452641d215fd3c7ff")
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "r-tgutil")
|
||||
|
@ -6461,7 +6461,7 @@ (define-public r-tgutil
|
|||
(commit commit)))
|
||||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32 "0pmacpzhrigprlpl8b5j4xz7l110ifw98017xwk569dghbf8zrq1"))))
|
||||
(base32 "00rsqs7f896piywh84jr8fkphbbx4jb7radf6znhhj6fip63yn91"))))
|
||||
(properties `((upstream-name . "tgutil")))
|
||||
(build-system r-build-system)
|
||||
(propagated-inputs (list r-broom
|
||||
|
@ -6481,7 +6481,9 @@ (define-public r-tgutil
|
|||
r-tidyr))
|
||||
(home-page "https://github.com/tanaylab/tgutil")
|
||||
(synopsis "Simple utility functions for Tanay lab code")
|
||||
(description "Shared utility functions for multiple Tanay lab packages.")
|
||||
(description
|
||||
"This package provides simple utility functions that are shared
|
||||
across several packages maintained by the Tanay lab.")
|
||||
(license license:gpl3))))
|
||||
|
||||
(define-public r-catterplots
|
||||
|
@ -6755,11 +6757,9 @@ (define-public java-jdistlib
|
|||
(license license:gpl2+)))
|
||||
|
||||
(define-public emacs-ess
|
||||
;; Latest release is old. This is not the latest commit either due to bug
|
||||
;; reported here: <https://github.com/emacs-ess/ESS/issues/987>.
|
||||
(let ((commit "24da603184ce39246611dd5b8602e769d7ebd5bf")
|
||||
(let ((commit "3691ecc642eab5d016887e42699648e0eeeef566")
|
||||
(version "18.10.2")
|
||||
(revision "0"))
|
||||
(revision "1"))
|
||||
(package
|
||||
(name "emacs-ess")
|
||||
(version (git-version version revision commit))
|
||||
|
@ -6770,60 +6770,96 @@ (define-public emacs-ess
|
|||
(url "https://github.com/emacs-ess/ESS")
|
||||
(commit commit)))
|
||||
(sha256
|
||||
(base32 "0j98lv07nzwzd54d4dgcfz01wy5gj48m0mnirxzh5r45ik2myh1r"))
|
||||
(base32 "19p8djsbgvahpsx1w8i6h3qvpbdr4isjwm3wi82yk2648ri0qsq1"))
|
||||
(file-name (git-file-name name version))
|
||||
(modules '((guix build utils)))
|
||||
(snippet
|
||||
'(begin
|
||||
;; Stop ESS from trying to bundle an external julia-mode.el.
|
||||
(substitute* "lisp/Makefile"
|
||||
((" \\$\\(JULIAS)") "")
|
||||
(("\ttest.*julia-mode.*\\.el") ""))
|
||||
;; Only build docs in info format.
|
||||
(substitute* "doc/Makefile"
|
||||
(("all : info text")
|
||||
"all : info")
|
||||
(("install: install-info install-other-docs")
|
||||
"install: install-info"))
|
||||
;; Stop install-info from trying to update the info directory.
|
||||
(substitute* "doc/Makefile"
|
||||
((".*/dir.*") ""))
|
||||
;; Fix r-help-mode test.
|
||||
(substitute* "test/ess-test-r.el"
|
||||
(("\\(equal ess-help-object \"plot.default\")") "t"))
|
||||
;; Avoid generating ess-autoloads.el twice.
|
||||
(substitute* "Makefile"
|
||||
(("all: lisp doc etc autoloads")
|
||||
"all: lisp doc etc"))
|
||||
;; Install to correct directories.
|
||||
(substitute* "Makefile"
|
||||
(("mkdir -p \\$\\(ESSDESTDIR)")
|
||||
"$(MAKE) -C lisp install; $(MAKE) -C doc install")
|
||||
(("\\$\\(INSTALL) -R \\./\\* \\$\\(ESSDESTDIR)/")
|
||||
"$(MAKE) -C etc install"))
|
||||
#t))
|
||||
(patches
|
||||
(search-patches "emacs-ess-fix-obsolete-function-alias.patch"))))
|
||||
#~(begin
|
||||
;; Stop ESS from trying to bundle an external julia-mode.el.
|
||||
(substitute* "lisp/Makefile"
|
||||
((" \\$\\(JULIAS)") "")
|
||||
(("\ttest.*julia-mode.*\\.el") ""))
|
||||
;; Only build docs in info format.
|
||||
(substitute* "doc/Makefile"
|
||||
(("all : info text")
|
||||
"all : info")
|
||||
(("install: install-info install-other-docs")
|
||||
"install: install-info"))
|
||||
;; Stop install-info from trying to update the info directory.
|
||||
(substitute* "doc/Makefile"
|
||||
((".*/dir.*") ""))
|
||||
;; Fix r-help-mode test.
|
||||
(substitute* "test/ess-test-r.el"
|
||||
(("\\(equal ess-help-object \"plot.default\")") "t"))
|
||||
;; Avoid generating ess-autoloads.el twice.
|
||||
(substitute* "Makefile"
|
||||
(("all: lisp doc etc autoloads")
|
||||
"all: lisp doc etc"))
|
||||
;; Install to correct directories.
|
||||
(substitute* "Makefile"
|
||||
(("mkdir -p \\$\\(ESSDESTDIR)")
|
||||
"$(MAKE) -C lisp install; $(MAKE) -C doc install")
|
||||
(("\\$\\(INSTALL) -R \\./\\* \\$\\(ESSDESTDIR)/")
|
||||
"$(MAKE) -C etc install"))))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
(let ((base-directory "/share/emacs/site-lisp"))
|
||||
`(#:make-flags (list (string-append "PREFIX=" %output)
|
||||
(string-append "ETCDIR=" %output
|
||||
,base-directory "/etc")
|
||||
(string-append "LISPDIR=" %output
|
||||
,base-directory)
|
||||
(string-append "INFODIR=" %output
|
||||
"/share/info"))
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(replace 'check
|
||||
(lambda _ (invoke "make" "test")))))))
|
||||
(list
|
||||
#:modules '((guix build gnu-build-system)
|
||||
(guix build utils)
|
||||
(guix build emacs-utils))
|
||||
#:imported-modules `(,@%gnu-build-system-modules
|
||||
(guix build emacs-build-system)
|
||||
(guix build emacs-utils))
|
||||
#:make-flags
|
||||
#~(list (string-append "PREFIX=" #$output)
|
||||
(string-append "ETCDIR=" #$output #$base-directory "/etc")
|
||||
(string-append "LISPDIR=" #$output #$base-directory)
|
||||
(string-append "INFODIR=" #$output "/share/info"))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(delete 'configure)
|
||||
(add-before 'check 'skip-failing-tests
|
||||
;; XXX: Skip 10 failing tests (out of 187).
|
||||
(lambda _
|
||||
(let-syntax
|
||||
((disable-tests
|
||||
(syntax-rules ()
|
||||
((_ file ())
|
||||
(syntax-error "test names list must not be empty"))
|
||||
((_ file (test-name ...))
|
||||
(substitute* file
|
||||
(((string-append "^\\(ert-deftest " test-name ".*")
|
||||
all)
|
||||
(string-append all "(skip-unless nil)\n"))
|
||||
...)))))
|
||||
(disable-tests (list "test/ess-test-inf.el"
|
||||
"test/ess-test-r.el")
|
||||
("ess--derive-connection-path"
|
||||
"ess-eval-line-test"
|
||||
"ess-eval-region-test"
|
||||
"ess-mock-remote-process"
|
||||
"ess-r-load-ESSR-github-fetch-no"
|
||||
"ess-r-load-ESSR-github-fetch-yes"
|
||||
"ess-set-working-directory-test"
|
||||
"ess-test-r-startup-directory")))
|
||||
;; The two tests below use a different syntax.
|
||||
(emacs-batch-edit-file "test/ess-test-r-eval.el"
|
||||
'(progn
|
||||
(mapc (lambda (test)
|
||||
(goto-char (point-min))
|
||||
(search-forward (format "etest-deftest %s " test))
|
||||
(beginning-of-line)
|
||||
(kill-sexp))
|
||||
'("ess-r-eval-ns-env-roxy-tracebug-test"
|
||||
"ess-r-eval-sink-freeze-test"))
|
||||
(basic-save-buffer)))))
|
||||
(replace 'check
|
||||
(lambda _ (invoke "make" "test")))))))
|
||||
(native-inputs
|
||||
(list perl r-roxygen2 texinfo))
|
||||
(inputs
|
||||
`(("emacs" ,emacs-minimal)
|
||||
("r-minimal" ,r-minimal)))
|
||||
(list emacs-minimal r-minimal))
|
||||
(propagated-inputs
|
||||
(list emacs-julia-mode))
|
||||
(home-page "https://ess.r-project.org/")
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2015, 2016, 2022 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2015, 2016, 2022, 2024 Ricardo Wurmus <rekado@elephly.net>
|
||||
;;; Copyright © 2016 Nikita <nikita@n0.is>
|
||||
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net>
|
||||
|
@ -51,31 +51,31 @@ (define-public tbb
|
|||
`(#:configure-flags
|
||||
'(,@(if (or (target-riscv64?)
|
||||
(target-ppc32?))
|
||||
'("-DTBB_TEST_LINK_FLAGS=-latomic")
|
||||
`())
|
||||
'("-DTBB_TEST_LINK_FLAGS=-latomic")
|
||||
`())
|
||||
,@(if (or (target-arm32?)
|
||||
(target-ppc32?))
|
||||
'("-DTBB_TEST_COMPILE_FLAGS=-DTBB_TEST_LOW_WORKLOAD")
|
||||
`())
|
||||
"-DTBB_STRICT=OFF") ;; Don't fail on warnings
|
||||
'("-DTBB_TEST_COMPILE_FLAGS=-DTBB_TEST_LOW_WORKLOAD")
|
||||
`())
|
||||
"-DTBB_STRICT=OFF") ;; Don't fail on warnings
|
||||
#:phases
|
||||
(modify-phases %standard-phases
|
||||
,@(cond
|
||||
((target-arm32?)
|
||||
`((add-after 'unpack 'adjust-test-suite
|
||||
(lambda _
|
||||
(substitute* "test/CMakeLists.txt"
|
||||
;; Bus error, skipped on mips.
|
||||
((".*test_malloc_pools.*") ""))))))
|
||||
((target-ppc32?)
|
||||
`((add-after 'unpack 'adjust-test-suite
|
||||
(lambda _
|
||||
(substitute* "test/CMakeLists.txt"
|
||||
;; These tests hang forever.
|
||||
((".*test_function_node.*") "")
|
||||
((".*test_multifunction_node.*") "")
|
||||
((".*test_async_node.*") ""))))))
|
||||
(else '())))))
|
||||
((target-arm32?)
|
||||
`((add-after 'unpack 'adjust-test-suite
|
||||
(lambda _
|
||||
(substitute* "test/CMakeLists.txt"
|
||||
;; Bus error, skipped on mips.
|
||||
((".*test_malloc_pools.*") ""))))))
|
||||
((target-ppc32?)
|
||||
`((add-after 'unpack 'adjust-test-suite
|
||||
(lambda _
|
||||
(substitute* "test/CMakeLists.txt"
|
||||
;; These tests hang forever.
|
||||
((".*test_function_node.*") "")
|
||||
((".*test_multifunction_node.*") "")
|
||||
((".*test_async_node.*") ""))))))
|
||||
(else '())))))
|
||||
(home-page "https://www.threadingbuildingblocks.org")
|
||||
(synopsis "C++ library for parallel programming")
|
||||
(description
|
||||
|
@ -101,7 +101,9 @@ (define-public python-tbb
|
|||
(lambda _
|
||||
(substitute* "python/CMakeLists.txt"
|
||||
(("\\$\\{PYTHON_BUILD_WORK_DIR\\}/build")
|
||||
#$output))
|
||||
#$output)
|
||||
(("install --prefix.*-f" m)
|
||||
(string-append m " --root=/")))
|
||||
(substitute* "python/setup.py"
|
||||
(("extra_link_args=tbb_flag,")
|
||||
(string-append "extra_link_args=['-Wl,-rpath="
|
||||
|
|
|
@ -5,7 +5,7 @@
|
|||
;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
|
||||
;;; Copyright © 2015 David Thompson <davet@gnu.org>
|
||||
;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020, 2021 Leo Famulari <leo@famulari.name>
|
||||
;;; Copyright © 2016, 2017, 2019, 2021-2023 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2016, 2017, 2019, 2021-2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2016, 2017, 2018 Nikita <nikita@n0.is>
|
||||
;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||||
;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
|
||||
|
@ -15,7 +15,7 @@
|
|||
;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org>
|
||||
;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
|
||||
;;; Copyright © 2020, 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
|
||||
;;; Copyright © 2020, 2021, 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
;;; Copyright © 2020, 2021, 2023, 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
;;; Copyright © 2021 Solene Rapenne <solene@perso.pw>
|
||||
;;; Copyright © 2021 Brice Waegeneire <brice@waegenei.re>
|
||||
;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be>
|
||||
|
@ -200,7 +200,7 @@ (define-public gnutls
|
|||
(package
|
||||
(name "gnutls")
|
||||
(version "3.7.7")
|
||||
(replacement gnutls-3.8.1)
|
||||
(replacement gnutls-3.8.2)
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
;; Note: Releases are no longer on ftp.gnu.org since the
|
||||
|
@ -305,11 +305,11 @@ (define-public gnutls
|
|||
(define-deprecated/public-alias gnutls-latest gnutls)
|
||||
|
||||
;; Replacement for gnutls@3.7.7 to address GNUTLS-SA-2020-07-14 /
|
||||
;; CVE-2023-0361
|
||||
(define-public gnutls-3.8.1
|
||||
;; CVE-2023-0361 and GNUTLS-SA-2023-10-23 / CVE-2023-5981.
|
||||
(define gnutls-3.8.2
|
||||
(package
|
||||
(inherit gnutls)
|
||||
(version "3.8.1")
|
||||
(version "3.8.2")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnupg/gnutls/v"
|
||||
|
@ -318,20 +318,7 @@ (define-public gnutls-3.8.1
|
|||
(patches (search-patches "gnutls-skip-trust-store-test.patch"))
|
||||
(sha256
|
||||
(base32
|
||||
"1742jiigwsfhx7nj5rz7dwqr8d46npsph6b68j7siar0mqarx2xs"))))
|
||||
(arguments
|
||||
(if (target-hurd?)
|
||||
;; Fix reference to undefined 'PATH_MAX'. This is fixed in GnuTLS
|
||||
;; commit 3b6ec1e01de4e96d36276dfe34ee9e183f285264.
|
||||
(substitute-keyword-arguments (package-arguments gnutls)
|
||||
((#:phases phases #~%standard-phases)
|
||||
#~(modify-phases #$phases
|
||||
(add-after 'unpack 'set-path-max
|
||||
(lambda _
|
||||
(substitute* "lib/pathbuf.h"
|
||||
(("^#define GNUTLS_PATH_MAX PATH_MAX")
|
||||
"#define GNUTLS_PATH_MAX 8192\n")))))))
|
||||
(package-arguments gnutls)))))
|
||||
"0xzgmp1ck5ifvdki4jg29r278w2p1m3a0qz38g99v6zsdw0yarg7"))))))
|
||||
|
||||
(define-public gnutls/dane
|
||||
;; GnuTLS with build libgnutls-dane, implementing DNS-based
|
||||
|
@ -429,6 +416,8 @@ (define (target->openssl-target target)
|
|||
(cond
|
||||
((target-x86-32? target)
|
||||
"x86")
|
||||
((target-x32? target)
|
||||
"x32")
|
||||
((target-x86-64? target)
|
||||
"x86_64")
|
||||
((target-mips64el? target)
|
||||
|
|
|
@ -19,6 +19,7 @@
|
|||
|
||||
(define-module (gnu packages uucp)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages texinfo)
|
||||
#:use-module (guix licenses)
|
||||
#:use-module (guix packages)
|
||||
|
|
|
@ -107,6 +107,7 @@ (define-module (gnu packages version-control)
|
|||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-check)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages groff)
|
||||
#:use-module (gnu packages guile)
|
||||
#:use-module (gnu packages guile-xyz)
|
||||
|
|
|
@ -1657,14 +1657,14 @@ (define-public libva-utils
|
|||
(define-public ffmpeg
|
||||
(package
|
||||
(name "ffmpeg")
|
||||
(version "6.0")
|
||||
(version "6.1.1")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://ffmpeg.org/releases/ffmpeg-"
|
||||
version ".tar.xz"))
|
||||
(sha256
|
||||
(base32
|
||||
"10kh2f4y4isfqj4xpcqqnzk611jh89ywcjyjnq9c2jcv5p18ggjp"))))
|
||||
"0s7r2qv8gh2a3w568n9xxgcz0q8j5ww1jdsci1hm9f4l1yqg9146"))))
|
||||
(outputs '("out" "debug"))
|
||||
(build-system gnu-build-system)
|
||||
(inputs
|
||||
|
|
|
@ -6,6 +6,7 @@
|
|||
;;; Copyright © 2021 Mathieu Othacehe <othacehe@gnu.org>
|
||||
;;; Copyright © 2022 Kaelyn Takata <kaelyn.alexi@protonmail.com>
|
||||
;;; Copyright © 2022 dan <i@dan.games>
|
||||
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -270,7 +271,9 @@ (define-public vulkan-loader
|
|||
(dirname (dirname
|
||||
(search-input-directory
|
||||
%build-inputs "include/vulkan"))))
|
||||
"-DBUILD_TESTS=ON")
|
||||
#$@(if (%current-target-system)
|
||||
#~("-DBUILD_TESTS=OFF" "-DUSE_GAS=OFF")
|
||||
#~("-DBUILD_TESTS=ON")))
|
||||
#:phases
|
||||
#~(modify-phases %standard-phases
|
||||
(add-after 'unpack 'fix-pkg-config-file
|
||||
|
@ -299,7 +302,7 @@ (define-public vulkan-loader
|
|||
python
|
||||
wayland))
|
||||
(inputs
|
||||
(list vulkan-headers))
|
||||
(list vulkan-headers libxrandr))
|
||||
(home-page
|
||||
"https://github.com/KhronosGroup/Vulkan-Loader")
|
||||
(synopsis "Khronos official ICD loader and validation layers for Vulkan")
|
||||
|
|
|
@ -142,6 +142,7 @@ (define-module (gnu packages web)
|
|||
#:use-module (gnu packages gnunet)
|
||||
#:use-module (gnu packages gnupg)
|
||||
#:use-module (gnu packages golang)
|
||||
#:use-module (gnu packages golang-web)
|
||||
#:use-module (gnu packages gperf)
|
||||
#:use-module (gnu packages graphviz)
|
||||
#:use-module (gnu packages gtk)
|
||||
|
|
|
@ -216,7 +216,7 @@ (define-public libxfce4ui
|
|||
(define-public catfish
|
||||
(package
|
||||
(name "catfish")
|
||||
(version "4.16.4")
|
||||
(version "4.18.0")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "https://archive.xfce.org/src/apps/"
|
||||
|
@ -224,7 +224,7 @@ (define-public catfish
|
|||
"/catfish-" version ".tar.bz2"))
|
||||
(sha256
|
||||
(base32
|
||||
"1z5m9f4cj473n68rrhhbkq3x5df5k394qp4n27lqqyny6k2h2p3f"))))
|
||||
"16cbsnki7qragwhbfs3h0ja7xg8xlf59ajxhddqm0jkmrirrpbpx"))))
|
||||
(build-system python-build-system)
|
||||
(arguments
|
||||
'(#:phases
|
||||
|
@ -270,7 +270,7 @@ (define-public catfish
|
|||
(define-public elementary-xfce-icon-theme
|
||||
(package
|
||||
(name "elementary-xfce-icon-theme")
|
||||
(version "0.17")
|
||||
(version "0.18")
|
||||
(source (origin
|
||||
(method git-fetch)
|
||||
(uri
|
||||
|
@ -280,7 +280,7 @@ (define-public elementary-xfce-icon-theme
|
|||
(file-name (git-file-name name version))
|
||||
(sha256
|
||||
(base32
|
||||
"0jlawp6rg55w5cm4d7836r660i2pnc5gkzpdjsq7w5875i85arzm"))))
|
||||
"124bdgghkjkpcsfn9a2ad6zqy233pi9jqmv8w8a3ha6q3al2s11s"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
'(#:tests? #f ; no check target
|
||||
|
|
|
@ -1803,9 +1803,9 @@ (define-record-type* <guix-configuration>
|
|||
(chroot-directories guix-configuration-chroot-directories ;list of file-like/strings
|
||||
(default '()))
|
||||
(max-silent-time guix-configuration-max-silent-time ;integer
|
||||
(default 0))
|
||||
(default 3600))
|
||||
(timeout guix-configuration-timeout ;integer
|
||||
(default 0))
|
||||
(default (* 3600 24)))
|
||||
(log-compression guix-configuration-log-compression
|
||||
(default 'gzip))
|
||||
(discover? guix-configuration-discover?
|
||||
|
|
|
@ -61,6 +61,8 @@ (define-module (gnu services docker)
|
|||
oci-container-service-type
|
||||
oci-container-shepherd-service))
|
||||
|
||||
(define-maybe file-like)
|
||||
|
||||
(define-configuration docker-configuration
|
||||
(docker
|
||||
(file-like docker)
|
||||
|
@ -87,6 +89,9 @@ (define-configuration docker-configuration
|
|||
(environment-variables
|
||||
(list '())
|
||||
"Environment variables to set for dockerd")
|
||||
(config-file
|
||||
(maybe-file-like)
|
||||
"JSON configuration file to pass to dockerd")
|
||||
(no-serialization))
|
||||
|
||||
(define %docker-accounts
|
||||
|
@ -131,7 +136,8 @@ (define (docker-shepherd-service config)
|
|||
(enable-iptables? (docker-configuration-enable-iptables? config))
|
||||
(environment-variables (docker-configuration-environment-variables config))
|
||||
(proxy (docker-configuration-proxy config))
|
||||
(debug? (docker-configuration-debug? config)))
|
||||
(debug? (docker-configuration-debug? config))
|
||||
(config-file (docker-configuration-config-file config)))
|
||||
(shepherd-service
|
||||
(documentation "Docker daemon.")
|
||||
(provision '(dockerd))
|
||||
|
@ -144,6 +150,10 @@ (define (docker-shepherd-service config)
|
|||
(start #~(make-forkexec-constructor
|
||||
(list (string-append #$docker "/bin/dockerd")
|
||||
"-p" "/var/run/docker.pid"
|
||||
#$@(if (not (eq? config-file %unset-value))
|
||||
(list #~(string-append
|
||||
"--config-file=" #$config-file))
|
||||
'())
|
||||
#$@(if debug?
|
||||
'("--debug" "--log-level=debug")
|
||||
'())
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2013-2016, 2018-2023 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2013-2016, 2018-2024 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
|
||||
;;; Copyright © 2018 Carlo Zancanaro <carlo@zancanaro.id.au>
|
||||
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
||||
|
@ -371,17 +371,6 @@ (define config
|
|||
(use-modules (srfi srfi-34)
|
||||
(system repl error-handling))
|
||||
|
||||
(define (call-with-file file flags proc)
|
||||
(let ((port #f))
|
||||
(dynamic-wind
|
||||
(lambda ()
|
||||
(set! port (open file flags)))
|
||||
(lambda ()
|
||||
(proc port))
|
||||
(lambda ()
|
||||
(close-port port)
|
||||
(set! port #f)))))
|
||||
|
||||
;; There's code run from shepherd that uses 'call-with-input-file' &
|
||||
;; co.--e.g., the 'urandom-seed' service. Starting from Shepherd
|
||||
;; 0.9.2, users need to make sure not to leak non-close-on-exec file
|
||||
|
@ -389,12 +378,12 @@ (define (call-with-file file flags proc)
|
|||
;; standard bindings with O_CLOEXEC variants.
|
||||
(set! call-with-input-file
|
||||
(lambda (file proc)
|
||||
(call-with-file file (logior O_RDONLY O_CLOEXEC)
|
||||
proc)))
|
||||
(call-with-port (open file (logior O_RDONLY O_CLOEXEC))
|
||||
proc)))
|
||||
(set! call-with-output-file
|
||||
(lambda (file proc)
|
||||
(call-with-file file (logior O_WRONLY O_CREAT O_CLOEXEC)
|
||||
proc)))
|
||||
(call-with-port (open file (logior O_WRONLY O_CREAT O_CLOEXEC))
|
||||
proc)))
|
||||
|
||||
;; Specify the default environment visible to all the services.
|
||||
;; Without this statement, all the environment variables of PID 1
|
||||
|
|
|
@ -981,6 +981,11 @@ (define user-profile
|
|||
(lambda (pw)
|
||||
(string-append (passwd:dir pw) "/.guix-profile"))))
|
||||
|
||||
(define home-profile
|
||||
(and=> (getpw (getuid))
|
||||
(lambda (pw)
|
||||
(string-append (passwd:dir pw) "/.guix-home/profile"))))
|
||||
|
||||
;; If we are able to find the user's profile, we can add it to
|
||||
;; the search paths set below. We need to do this so that D-Bus
|
||||
;; can start services installed by the user. This allows
|
||||
|
@ -988,9 +993,13 @@ (define user-profile
|
|||
;; 'evolution') to work even if those services are only available
|
||||
;; in the user's profile. See <https://bugs.gnu.org/35267>.
|
||||
(define profiles
|
||||
(if user-profile
|
||||
(list user-profile system-profile)
|
||||
(list system-profile)))
|
||||
(append (if home-profile
|
||||
(list home-profile)
|
||||
'())
|
||||
(if user-profile
|
||||
(list user-profile)
|
||||
'())
|
||||
(list system-profile)))
|
||||
|
||||
(setenv "XDG_CONFIG_DIRS"
|
||||
(string-join (map (cut string-append <> "/etc/xdg") profiles)
|
||||
|
|
|
@ -1,5 +1,6 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2022 Mathieu Othacehe <othacehe@gnu.org>
|
||||
;;; Copyright © 2023, 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -21,6 +22,7 @@ (define-module (guix platforms x86)
|
|||
#:use-module (guix records)
|
||||
#:export (i686-linux
|
||||
x86_64-linux
|
||||
x86_64-linux-x32
|
||||
i686-mingw
|
||||
x86_64-mingw
|
||||
i586-gnu))
|
||||
|
@ -41,6 +43,14 @@ (define x86_64-linux
|
|||
(rust-target "x86_64-unknown-linux-gnu")
|
||||
(glibc-dynamic-linker "/lib/ld-linux-x86-64.so.2")))
|
||||
|
||||
(define x86_64-linux-x32
|
||||
(platform
|
||||
(target "x86_64-linux-gnux32")
|
||||
(system #f)
|
||||
(linux-architecture "x86_64")
|
||||
(rust-target "x86_64-unknown-linux-gnux32")
|
||||
(glibc-dynamic-linker "/lib/ld-linux-x32.so.2")))
|
||||
|
||||
(define i686-mingw
|
||||
(platform
|
||||
(target "i686-w64-mingw32")
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2012-2023 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2012-2024 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2013, 2018 Mark H Weaver <mhw@netris.org>
|
||||
;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org>
|
||||
;;; Copyright © 2014 Cyril Roelandt <tipecaml@gmail.com>
|
||||
|
@ -555,7 +555,7 @@ (define* (show-version-and-exit #:optional (command (car (command-line))))
|
|||
(leave-on-EPIPE
|
||||
(simple-format #t "~a (~a) ~a~%"
|
||||
command %guix-package-name %guix-version)
|
||||
(format #t "Copyright ~a 2023 ~a"
|
||||
(format #t "Copyright ~a 2024 ~a"
|
||||
;; TRANSLATORS: Translate "(C)" to the copyright symbol
|
||||
;; (C-in-a-circle), if this symbol is available in the user's
|
||||
;; locale. Otherwise, do not translate "(C)"; leave it as-is. */
|
||||
|
|
|
@ -7,7 +7,7 @@
|
|||
;;; Copyright © 2015 David Thompson <davet@gnu.org>
|
||||
;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com>
|
||||
;;; Copyright © 2018, 2020 Marius Bakke <marius@gnu.org>
|
||||
;;; Copyright © 2020, 2021 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2020, 2021, 2024 Efraim Flashner <efraim@flashner.co.il>
|
||||
;;; Copyright © 2020, 2021, 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
|
||||
;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com>
|
||||
;;; Copyright © 2021 Chris Marusich <cmmarusich@gmail.com>
|
||||
|
@ -97,6 +97,7 @@ (define-module (guix utils)
|
|||
target-x86-32?
|
||||
target-x86-64?
|
||||
target-x86?
|
||||
target-x32?
|
||||
target-arm32?
|
||||
target-aarch64?
|
||||
target-arm?
|
||||
|
@ -634,6 +635,8 @@ (define (gnu-triplet->nix-system triplet)
|
|||
(else triplet))))
|
||||
(cond ((string-match "^arm[^-]*-([^-]+-)?linux-gnueabihf" triplet)
|
||||
"armhf-linux")
|
||||
;; Otherwise it will show up as x86_64-linux... which isn't wrong.
|
||||
((string-match "x86_64-linux-gnux32" triplet) "x86_64-linux-gnux32")
|
||||
((string-match "^([^-]+)-([^-]+-)?linux-gnu.*" triplet)
|
||||
=>
|
||||
(lambda (m)
|
||||
|
@ -710,6 +713,13 @@ (define* (target-x86-64? #:optional (target (or (%current-target-system)
|
|||
architecture (x86_64)?"
|
||||
(string-prefix? "x86_64-" target))
|
||||
|
||||
(define* (target-x32? #:optional (target (or (%current-target-system)
|
||||
(%current-system))))
|
||||
"Is the architecture of TARGET a variant of Intel/AMD's 64-bit
|
||||
architecture (x86_64) using 32-bit data types?"
|
||||
(and (target-x86-64? target)
|
||||
(string-suffix? "gnux32" target)))
|
||||
|
||||
(define* (target-x86? #:optional (target (or (%current-target-system)
|
||||
(%current-system))))
|
||||
(or (target-x86-32? target) (target-x86-64? target)))
|
||||
|
|
|
@ -32,8 +32,8 @@ Settings::Settings()
|
|||
buildCores = 1;
|
||||
readOnlyMode = false;
|
||||
thisSystem = SYSTEM;
|
||||
maxSilentTime = 0;
|
||||
buildTimeout = 0;
|
||||
maxSilentTime = 3600;
|
||||
buildTimeout = 3600 * 24;
|
||||
useBuildHook = true;
|
||||
printBuildTrace = false;
|
||||
multiplexedBuildOutput = false;
|
||||
|
|
Loading…
Reference in a new issue