;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
;;;
;;; 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/>.

(define-module (test-sets)
  #:use-module (guix sets)
  #:use-module (srfi srfi-1)
  #:use-module (srfi srfi-26)
  #:use-module (srfi srfi-64))


(test-begin "sets")

(test-assert "set-contains?"
  (let* ((lst (iota 123))
         (set (list->set lst)))
    (and (every (cut set-contains? set <>)
                lst)
         (not (set-contains? set -1)))))

(test-assert "set->list"
  (let* ((lst (iota 123))
         (set (list->set lst)))
    (lset= = lst (set->list set))))

(test-assert "set-union"
  (let* ((a  (list 'a))
         (b  (list 'b))
         (s1 (setq a))
         (s2 (setq b))
         (s3 (set-union s1 s2)))
    (and (set-contains? s3 a)
         (set-contains? s3 b))))

(test-end)
63f45c44de39356b84dc0'>commit</a><a href='/guix/diff/gnu/packages/python-compression.scm?id=dc09170a54cefc876bd63f45c44de39356b84dc0'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/python-compression.scm'>
<input type='hidden' name='id' value='dc09170a54cefc876bd63f45c44de39356b84dc0'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=dc09170a54cefc876bd63f45c44de39356b84dc0'>root</a>/<a href='/guix/log/gnu?id=dc09170a54cefc876bd63f45c44de39356b84dc0'>gnu</a>/<a href='/guix/log/gnu/packages?id=dc09170a54cefc876bd63f45c44de39356b84dc0'>packages</a>/<a href='/guix/log/gnu/packages/python-compression.scm?id=dc09170a54cefc876bd63f45c44de39356b84dc0'>python-compression.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/python-compression.scm?id=dc09170a54cefc876bd63f45c44de39356b84dc0&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2024-07-19 00:44:55 +0300'>2024-07-19</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=afc102537ab2384801429829fe2654fe226a73aa'>gnu: rust-zstd-sys-2: Unbundle zstd.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/crates-io.scm (rust-zstd-sys-2)[source]: Add snippet to
remove bundled zstd.
[native-inputs]: Add pkg-config.
[inputs]: Add zstd:lib.
(rust-parquet2-0.17, rust-polars-io-0.37, rust-polars-pipe-0.37,
rust-zip-0.6, rust-zstd-0.13, rust-zstd-safe-7)[native-inputs]: Add
pkg-config.
[inputs]: Add zstd:lib.
* gnu/packages/crates-web.scm (rust-tower-http-0.5)[native-inputs]: Add
pkg-config.
[inputs]: Add zstd:lib.
* gnu/packages/python-compression.scm (python-cramjam)
[native-inputs]: Add pkg-config.
[inputs]: Add zstd:lib.

Change-Id: Iccb160aa7099c141567c415237ab9662448a4e93
</span></span></td><td>Efraim Flashner</td></tr>
<tr><td><span title='2024-05-30 18:23:46 +0400'>2024-05-30</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=ea221e3ede70a56ae24c7254647c183ef234644d'>gnu: python-ewah-bool-utils: Update to 1.2.0.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-compression.scm (python-ewah-bool-utils): Update to 1.2.0.

Change-Id: I7bc50249f2d7e97c64d23054ad176cf0e4af6258
Signed-off-by: Andrew Tropin &lt;andrew@trop.in&gt;
</span></span></td><td>Sharlatan Hellseher</td></tr>
<tr><td><span title='2024-04-06 23:27:36 +0100'>2024-04-06</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=79bab7853b9956c5c785868c889e1019f9708ed9'>gnu: Add python-zipstream-ng.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-xyz.scm (python-zipstream-ng): New variable.

Change-Id: Idf0c0d471aa1eda45cf649874f6a79b6b9a7937b
Signed-off-by: Sharlatan Hellseher &lt;sharlatanus@gmail.com&gt;
</span></span></td><td>TakeV</td></tr>
<tr><td><span title='2024-03-29 15:08:11 +0000'>2024-03-29</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=18ac6a247ca213d8ec52db3d6623ecf9120f6e20'>gnu: Add python-ewah-bool-utils.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-compression.scm (python-ewah-bool-utils): New variable.

Change-Id: Ib9730d599f66bc2b864bfd305135e367f89ba9dd
</span></span></td><td>Sharlatan Hellseher</td></tr>
<tr><td><span title='2024-03-29 15:08:06 +0000'>2024-03-29</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=a2894745a5feaf9adb20c3f7a8f1e5ba78d41f16'>gnu: python-blosc: Simplify package.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-compression.scm (python-blosc) [arguments]
&lt;#:phases&gt;: Swap to simple lambda in 'find-blosc phase as it already
uses this-package-input procedure.

Change-Id: I4d3219d9575b9573b0c384b067855fa927f122da
</span></span></td><td>Sharlatan Hellseher</td></tr>
<tr><td><span title='2024-03-29 15:08:06 +0000'>2024-03-29</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=8b00d81dd3d93fdfb37115cac282ae1b1ad0343b'>gnu: python-blosc: Move to python-compression.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-xyz.scm (python-blosc): Move from here ...
* gnu/packages/python-compression.scm: ... to here.

Change-Id: Ieed1b399602d0ba64b065d1c03ef0855ac52f71e
</span></span></td><td>Sharlatan Hellseher</td></tr>
<tr><td><span title='2024-03-03 08:08:16 +0000'>2024-03-03</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=bdecacafecaba982b58c7b5120bdcf2966fb517f'>gnu: Add python-cramjam.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-compression.scm (python-cramjam): New variable.

Signed-off-by: Sharlatan Hellseher &lt;sharlatanus@gmail.com&gt;
</span></span></td><td>Troy Figiel</td></tr>
<tr><td><span title='2024-01-09 10:19:43 +0100'>2024-01-09</span></td><td><a href='/guix/commit/gnu/packages/python-compression.scm?id=755a995710db9c23a50c62963874fab57f9509ee'>gnu: Add python-python-snappy.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/python-compression.scm (python-python-snappy): New variable.
</span></span></td><td>Troy Figiel</td></tr>