;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2017 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-base16)
  #:use-module (guix base16)
  #:use-module (srfi srfi-1)
  #:use-module (srfi srfi-64)
  #:use-module (rnrs bytevectors))

(test-begin "base16")

(test-assert "bytevector->base16-string->bytevector"
  (every (lambda (bv)
           (equal? (base16-string->bytevector
                    (bytevector->base16-string bv))
                   bv))
         (map string->utf8 '("" "f" "fo" "foo" "foob" "fooba" "foobar"))))

(test-end "base16")
uix/tree/tests/upstream.scm?id=637a9c3b264fe8eb76b6ed9f104b635d95632be6'>tree</a><a href='/guix/commit/tests/upstream.scm?id=637a9c3b264fe8eb76b6ed9f104b635d95632be6'>commit</a><a href='/guix/diff/tests/upstream.scm?id=637a9c3b264fe8eb76b6ed9f104b635d95632be6'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/upstream.scm'>
<input type='hidden' name='id' value='637a9c3b264fe8eb76b6ed9f104b635d95632be6'/><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=637a9c3b264fe8eb76b6ed9f104b635d95632be6'>root</a>/<a href='/guix/log/tests?id=637a9c3b264fe8eb76b6ed9f104b635d95632be6'>tests</a>/<a href='/guix/log/tests/upstream.scm?id=637a9c3b264fe8eb76b6ed9f104b635d95632be6'>upstream.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/tests/upstream.scm?id=637a9c3b264fe8eb76b6ed9f104b635d95632be6&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-01-05 21:17:58 +0100'>2022-01-05</span></td><td><a href='/guix/commit/tests/upstream.scm?id=6226df77ee7448ba4eae05c14aa2ba9721f28bb4'>tests: Add failing tests for changed-inputs on new style inputs.</a><span class='msg-avail'>...<span class='msg-tooltip'>* tests/upstream.scm ("changed-inputs returns changes to plain input list",
"changed-inputs returns changes to all plain input lists"): New tests.
</span></span></td><td>Ricardo Wurmus</td></tr>
<tr><td><span title='2022-01-05 21:17:54 +0100'>2022-01-05</span></td><td><a href='/guix/commit/tests/upstream.scm?id=a6bf1c108ef3b0d63d6d6070b90093bc8f434734'>tests: Add tests for changed-inputs on old-style inputs.</a><span class='msg-avail'>...<span class='msg-tooltip'>All these tests pass, because they only test the old-style input alists with
labels.

* tests/upstream.scm ("changed-inputs returns no changes",
"changed-inputs returns changes to labelled input list",
"changed-inputs returns changes to all labelled input lists"): New tests.
</span></span></td><td>Ricardo Wurmus</td></tr>
a2a84d7bba1cae58b71c9c9af73aa'>daemon: Rename 'NIX_STATE_DIR' and 'NIX_DB_DIR' environment variables.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://bugs.gnu.org/22459&gt;.
Reported by Jeff Mickey &lt;j@codemac.net&gt;.

* guix/config.scm.in (%state-directory): Change NIX_STATE_DIR to
GUIX_STATE_DIRECTORY.
(%store-database-directory): Change NIX_DB_DIR to
GUIX_DATABASE_DIRECTORY.
* nix/libstore/globals.cc (Settings::processEnvironment): Likewise.
* guix/self.scm (make-config.scm): Likewise.
* build-aux/build-self.scm (make-config.scm): Likewise.
* build-aux/test-env.in: Likewise.
* tests/derivations.scm ("derivation #:leaked-env-vars"): Likewise.
* tests/guix-build.sh (GUIX_DAEMON_SOCKET): Likewise.
* tests/guix-daemon.sh (socket): Likewise.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-05-13 23:16:16 +0200'>2018-05-13</span></td><td><a href='/guix/commit/build-aux/test-env.in?id=9e7b87ddc51c640c529d445e350c3d6ef43e301d'>build: 'test-env' does not 'guix download' non-existent files.</a><span class='msg-avail'>...<span class='msg-tooltip'>Reported by uniq10.

* build-aux/test-env.in: Check whether FILE exists before invoking 'guix
download'.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2018-04-22 23:50:49 +0200'>2018-04-22</span></td><td><a href='/guix/commit/build-aux/test-env.in?id=479c0e3f60f54e3c3a02f71efeb49119e20d2a96'>build: Fix possible race condition in 'test-env'.</a><span class='msg-avail'>...<span class='msg-tooltip'>Reported by Mark H Weaver &lt;mhw@netris.org&gt;.

* build-aux/test-env.in: Add 'guile' invocation before 'guix download'
invocation to make sure 'guix-daemon' is listening.
</span></span></td><td>Ludovic Courtès</td></tr>