viewing logs

job succeeded

veritas

time taken
6 seconds
started at
Mon Jul 21 11:03:11 2025
updated at
Mon Jul 21 11:03:17 2025
log uuid
2e5b8154-7f8d-4749-b347-0a8c2c874d06
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 66d87c6..a487730
Fast-forward
 Makefile                     |  2 +-
 README.org                   |  9 ++++-
 src/veritas/runner.scm       | 95 ++++++++++++++++++++++++++++++++++++++++++++
 test/veritas/unit/simple.scm |  4 +-
 4 files changed, 106 insertions(+), 4 deletions(-)
 create mode 100644 src/veritas/runner.scm

-> running command: cd /etc/byggsteg/job-clone/veritas/trunk && git log --name-status HEAD^..HEAD
commit a4877305b80442175a7bf7aca19b55b55c273131
Author: Josep Bigorra <jjbigorra@gmail.com>
Date:   Mon Jul 21 11:02:45 2025 +0200

    add custom runner

M	Makefile
M	README.org
A	src/veritas/runner.scm
M	test/veritas/unit/simple.scm

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

[INFO] 2025-07-21 11:03:12+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) 7f1d8d7e1aa0>
#<procedure spec ()>
+----------------------------------------------+
[? suite] List Manipulation Tests
  [? 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] List Concatenation
    [?? assert] Concatenate two non-empty lists
    ? pass - expected: (1 2 3 4 5), sut: (1 2 3 4 5)
    [?? assert] Concatenate empty list with non-empty
    ? pass - expected: (a b), sut: (a b)
    [?? assert] Concatenate non-empty list with empty
    ? pass - expected: (x y), sut: (x y)
    [?? assert] Concatenate two empty lists
    ? pass - expected: (), sut: ()
  [? test] Get First Element
    [?? assert] First element of a symbol list
    ? pass - expected: a, sut: a
    [?? assert] First element of an empty list should be #f
    ? pass - expected: #f, sut: #f
    [?? assert] First element of a number list
    ? pass - expected: 1, sut: 1
+----------------------------------------------+
[? suite] Basic Suite
  [? test] Basic Numeric Tests
    ? pass - expected: 1, sut: 1
    [?? assert] checks if addition works
    ? pass - expected: 4, sut: 4
    ? pass - expected: 0, sut: 0
    ? pass - expected: 1, sut: 1
  [? test] Check that function calls work
    ? pass - expected: 42, sut: 42
  [? test] Basic Boolean Tests
    [?? assert] should succeed on checking that false is false
    ? pass - expected: #f, sut: #f
+----------------------------------------------+
[? suite] Predicate Tests
  [? test] List Predicates
    [?? assert] Non-empty list should not be null
    ? pass - expected: #f, sut: #f
    [?? assert] Empty list should not be a pair
    ? pass - expected: #f, sut: #f
    [?? assert] Pair should be a pair
    ? pass - expected: #t, sut: #t
    [?? assert] Empty list should be null
    ? pass - expected: #t, sut: #t
  [? test] Even Number Checks
    [?? assert] 0 should be even
    ? pass - expected: #t, sut: #t
    [?? assert] 4 should be even
    ? pass - expected: #t, sut: #t
    [?? assert] 1 should not be even
    ? pass - expected: #f, sut: #f
    [?? assert] 7 should not be even
    ? pass - expected: #f, sut: #f
+----------------------------------------------+
[? suite] Error Handling Tests
  [? 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)
+----------------------------------------------+
[? suite] Complex Data Structure Tests
  [? test] Vector Operations
    [?? assert] Vector length
    ? pass - expected: 3, sut: 3
    [?? assert] Vector ref at index 0
    ? pass - expected: 1, sut: 1
    [?? assert] Vector ref at index 1
    ? pass - expected: 2, sut: 2
  [? test] Association List Lookups
    [?? assert] Lookup 'age' in alist
    ? pass - expected: 30, sut: 30
    [?? assert] Lookup non-existent key should be #f
    ? pass - expected: #f, sut: #f
    [?? assert] Lookup 'name' in alist
    ? pass - expected: Alice, sut: Alice
+----------------------------------------------+
[? suite] str
  [? test] String Operation Tests
    ? pass - expected: #f, sut: #f
    ? pass - expected: #t, sut: #t
    ? pass - expected: hello world, sut: hello world
?? info - ran 6 test suites in: 0 seconds, 16714 microseconds
? debug - assertion-results: (#t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t #t)make[1]: Leaving directory '/etc/byggsteg/job-clone/veritas/trunk'