viewing logs

job succeeded

veritas

time taken
7 seconds
started at
Tue Jul 22 13:50:56 2025
updated at
Tue Jul 22 13:51:03 2025
log uuid
8bbc36f1-2fb6-45c7-89fb-da97d09580c1
inspect the job's lambda expression
(lambda()
  `((task . "make-test")
    (project . "veritas")
    (branch-name . "trunk")            
    (clone-url . "https://codeberg.org/jjba23/veritas.git")))
    

starting new job...

-> running command: cd /etc/byggsteg/job-clone/veritas/trunk && uname -a
Linux wolk-jjba 6.15.5-gnu #1 SMP PREEMPT_DYNAMIC 1 x86_64 GNU/Linux

-> running command: cd /etc/byggsteg/job-clone/veritas/trunk && git pull
Updating 8420251..a87df1f
Fast-forward
 README.org | 14 ++++++--------
 1 file changed, 6 insertions(+), 8 deletions(-)

-> running command: cd /etc/byggsteg/job-clone/veritas/trunk && git log --name-status HEAD^..HEAD
commit a87df1f1240c2eb18f739f24f9e93b52bbb5aeec
Author: Josep Bigorra <jjbigorra@gmail.com>
Date:   Tue Jul 22 13:50:36 2025 +0200

     ??

M	README.org

-> running command: cd /etc/byggsteg/job-clone/veritas/trunk && make test
make[1]: Entering directory '/etc/byggsteg/job-clone/veritas/trunk'

[INFO] 2025-07-22 13:50:57+02:00 - formatting all Scheme files
find . -maxdepth 8 -name "*.scm" -type f -exec guix style -f {} \;
guix shell -m manifest.scm -- \
	guile --fresh-auto-compile -L ./src \
	-L ./test \
	-c '((@ (veritas runner) run-unit-tests))'

scanning directories for unit tests...
scanning present working directory for unit tests...

found unit tests: (simple.scm)

#<directory (veritas unit simple) 7fc741ecea00>
#<procedure spec ()>
  [? test] No Error on Valid Division
    [?? assert] Valid division result
    ? pass - expected: 5, sut: 5
    [?? assert] Should not signal error on valid division
    ? pass - success running without errors
  [? test] Division by Zero Error
    [?? assert] Should signal error on division by zero
    ? pass - success catching error: misc-error: (#f Division by zero () #f)
  [? test] Basic Numeric Tests
    ? pass - expected: 0, sut: 0
    [?? assert] checks if addition works
    ? pass - expected: 4, sut: 4
    ? pass - expected: 1, sut: 1
    ? pass - expected: 1, sut: 1
  [? test] Check that function calls work
    ? pass - expected: 42, sut: 42
  [? test] some test without suite
    ? pass - expected: 1, sut: 1
  [? test] String Operation Tests
    ? pass - expected: hello world, sut: hello world
    ? pass - expected: #t, sut: #t
    ? pass - expected: #f, sut: #f
  [? test] Get First Element
    [?? assert] First element of a number list
    ? pass - expected: 1, sut: 1
    [?? assert] First element of an empty list should be #f
    ? pass - expected: #f, sut: #f
    [?? assert] First element of a symbol list
    ? pass - expected: a, sut: a
  [? test] List Concatenation
    [?? assert] Concatenate two non-empty lists
    ? pass - expected: (1 2 3 4 5), sut: (1 2 3 4 5)
    [?? assert] Concatenate non-empty list with empty
    ? pass - expected: (x y), sut: (x y)
    [?? assert] Concatenate empty list with non-empty
    ? pass - expected: (a b), sut: (a b)
    [?? assert] Concatenate two empty lists
    ? pass - expected: (), sut: ()
  [? test] List Length
    [?? assert] Length of empty list
    ? pass - expected: 0, sut: 0
    [?? assert] Length of list with 3 elements
    ? pass - expected: 3, sut: 3
    [?? assert] Length of list with one element
    ? pass - expected: 1, sut: 1
  [? test] Even Number Checks
    [?? assert] 1 should not be even
    ? pass - expected: #f, sut: #f
    [?? assert] 7 should not be even
    ? pass - expected: #f, sut: #f
    [?? assert] 4 should be even
    ? pass - expected: #t, sut: #t
    [?? assert] 0 should be even
    ? pass - expected: #t, sut: #t
  [? test] List Predicates
    [?? assert] Empty list should not be a pair
    ? pass - expected: #f, sut: #f
    [?? assert] Non-empty list should not be null
    ? pass - expected: #f, sut: #f
    [?? assert] Empty list should be null
    ? pass - expected: #t, sut: #t
    [?? assert] Pair should be a pair
    ? pass - expected: #t, sut: #t
  [? test] Association List Lookups
    [?? assert] Lookup 'age' in alist
    ? pass - expected: 30, sut: 30
    [?? assert] Lookup 'name' in alist
    ? pass - expected: Alice, sut: Alice
    [?? assert] Lookup non-existent key should be #f
    ? pass - expected: #f, sut: #f
  [? test] Vector Operations
    [?? assert] Vector ref at index 1
    ? pass - expected: 2, sut: 2
    [?? assert] Vector ref at index 0
    ? pass - expected: 1, sut: 1
    [?? assert] Vector length
    ? pass - expected: 3, sut: 3
?? info - ran 7 test suites in: 0 seconds, 21680 microsecondsmake[1]: Leaving directory '/etc/byggsteg/job-clone/veritas/trunk'