viewing logs
job succeeded
kracht
- time taken
- 5 seconds
- started at
- Fri Aug 29 09:28:37 2025
- updated at
- Fri Aug 29 09:28:42 2025
- log uuid
6d97bc57-7b8c-4a14-9564-64126417707a
inspect the job's lambda expression
(lambda()
`((task . ("maak-test" "maak-deploy"))
(project . "kracht")
(branch-name . "trunk")
(clone-url . "https://codeberg.org/jjba23/kracht.git")
(env . ((VERITAS_REPORTER . monotone-reporter)))))
starting new job...
-> running command: cd /etc/byggsteg/job-clone/kracht/trunk && git reset --hard && git pull
HEAD is now at 4951a6f ???? docs: README
From https://codeberg.org/jjba23/kracht
4951a6f..6e28450 trunk -> origin/trunk
* [new tag] v0.2.13 -> v0.2.13
Updating 4951a6f..6e28450
Fast-forward
src/kracht/prelude.scm | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
-> running command: cd /etc/byggsteg/job-clone/kracht/trunk && uname -a
Linux wolk-jjba 6.15.9-gnu #1 SMP PREEMPT_DYNAMIC 1 x86_64 GNU/Linux
-> running command: cd /etc/byggsteg/job-clone/kracht/trunk && git log --name-status HEAD^..HEAD
commit 6e284502a2b34d3c2b3e0a0d3092bf29aabdb8bb
Author: Josep Bigorra <jjbigorra@gmail.com>
Date: Fri Aug 29 09:28:38 2025 +0200
??? feature: Add more re-exports and add flatten-list
M src/kracht/prelude.scm
-> running command: cd /etc/byggsteg/job-clone/kracht/trunk && maak test
scanning directories for unit tests...
scanning present working directory for unit tests...
found unit tests: (prelude-spec.scm)
running unit tests from file: prelude-spec.scm, entrypoint: spec
1 + 1 = 2 and 2 + 2 = 4
[INFO] 3 + 3 = 6 and 4 + 4 = 8
[INFO] 5 + 5 = 10 and 6 + 6 = 12
[ERROR] fake message: something totally expected
warning! could not decode pair (): wrong-type-arg: (car Wrong type argument in position 1 (expecting pair): ~S (()) (()))
warning! could not decode pair (key-only): wrong-type-arg: (car Wrong type argument in position 1 (expecting pair): ~S (()) (()))
warning! could not decode pair (key1): wrong-type-arg: (car Wrong type argument in position 1 (expecting pair): ~S (()) (()))
warning! could not decode pair (key2): wrong-type-arg: (car Wrong type argument in position 1 (expecting pair): ~S (()) (()))
warning! could not decode pair (b): wrong-type-arg: (car Wrong type argument in position 1 (expecting pair): ~S (()) (()))
------------------------------------------
[suite] Another test suite
[test] Round-trip tests
[assert] Escape then unescape
[pass] expect: Hello, it's a "test" with ?????., got: Hello, it's a "test" with ?????.
[assert] Unescape then escape (for chars in alist)
[pass] expect: 'áéíóú", got: 'áéíóú"
[assert] Unescape then escape (assuming valid entities)
[pass] expect: <div>'test'</div>, got: <div>'test'</div>
[assert] Example sentence
[pass] expect: Ol?, m?ndo! Isto ? um teste., got: Ol?, m?ndo! Isto ? um teste.
[test] html-unescape tests
[assert] Example sentence unescaped
[pass] expect: ?l?, m?ndo! Isto ? um teste., got: ?l?, m?ndo! Isto ? um teste.
[assert] Multiple entity occurrences
[pass] expect: It's a "quote"., got: It's a "quote".
[assert] String with no entities
[pass] expect: Hello, World!, got: Hello, World!
[assert] Accented A entity
[pass] expect: ?, got: ?
[assert] Single quot entity
[pass] expect: ", got: "
[assert] Mix of entities
[pass] expect: He's a "guy"., got: He's a "guy".
[assert] Accented a entity
[pass] expect: ?, got: ?
[assert] Single apos entity
[pass] expect: ', got: '
[assert] Empty string
[pass] expect: , got:
[assert] C-cedilla entity
[pass] expect: ?, got: ?
[test] log tests
[assert] log-message behaves as expected
[pass] expect: #t, got: #t
[assert] log-error behaves as expected
[pass] expect: #t, got: #t
[assert] log behaves as expected
[pass] expect: #t, got: #t
[assert] log-info behaves as expected
[pass] expect: #t, got: #t
[test] html-escape tests
[assert] Accented E
[pass] expect: É, got: É
[assert] Accented u
[pass] expect: ú, got: ú
[assert] Example sentence escaped
[pass] expect: Ólá, múndo! Isto é um teste., got: Ólá, múndo! Isto é um teste.
[assert] Empty string
[pass] expect: , got:
[assert] String with multiple occurrences
[pass] expect: He said, "It's a beautiful day!", got: He said, "It's a beautiful day!"
[assert] Multiple accents
[pass] expect: Árvore é bonita, got: Árvore é bonita
[assert] Accented U
[pass] expect: Ú, got: Ú
[assert] Accented O
[pass] expect: Ó, got: Ó
[assert] Accented o
[pass] expect: ó, got: ó
[assert] N-tilde
[pass] expect: ñ, got: ñ
[assert] Accented i
[pass] expect: í, got: í
[assert] C-cedilla
[pass] expect: ç, got: ç
[assert] Double quote
[pass] expect: ", got: "
[assert] String with no special characters
[pass] expect: Hello, World!, got: Hello, World!
[assert] Accented I
[pass] expect: Í, got: Í
[assert] Single quote
[pass] expect: ', got: '
[assert] Mix of quotes
[pass] expect: He's a "guy"., got: He's a "guy".
[test] sha tests
[assert] get-short-commit-sha works as expected
[pass] expect: #t, got: #t
------------------------------------------
[suite] Prelude test suite
[test] assoc-ref-or-empty-str tests
[assert] key not found
[pass] expect: , got:
[assert] key is first element
[pass] expect: value, got: value
[assert] key found - non-string value
[pass] expect: 2, got: 2
[assert] key found - string value
[pass] expect: hello, got: hello
[assert] empty alist
[pass] expect: , got:
[assert] key is last element
[pass] expect: value, got: value
[test] string-drop tests
[assert] string-drop-first-last two chars
[pass] expect: ab, got: ab
[assert] string-drop-first-last single char
[pass] expect: a, got: a
[assert] string-drop-first-last normal case
[pass] expect: ell, got: ell
[assert] string-drop-first-last-line empty input
[pass] expect: , got:
[assert] string-drop-first-last empty string
[pass] expect: , got:
[assert] string-drop-first-last-line single line
[pass] expect: , got:
[assert] string-drop-first-last-line two lines
[pass] expect: , got:
[assert] string-drop-first-last-line normal case
[pass] expect: middle line, got: middle line
[test] alist-from-url-encoded-body
[assert] backslash character (%5C)
[pass] expect: ((winpath . C:\Users\)), got: ((winpath . C:\Users\))
[assert] single key value pair
[pass] expect: ((name . John Doe)), got: ((name . John Doe))
[assert] empty body
[pass] expect: (), got: ()
[assert] space character (%20)
[pass] expect: ((message . hello world)), got: ((message . hello world))
[assert] comma character (%2C)
[pass] expect: ((list . a,b,c)), got: ((list . a,b,c))
[assert] equals sign character (%3D)
[pass] expect: ((equation . x=y)), got: ((equation . x=y))
[assert] square brackets characters (%5B, %5D)
[pass] expect: ((array . [1,2])), got: ((array . [1,2]))
[assert] colon character (%3A)
[pass] expect: ((protocol . http:)), got: ((protocol . http:))
[assert] multiple encoded characters in one value
[pass] expect: ((complex . a&b=c?d e)), got: ((complex . a&b=c?d e))
[assert] slash character (%2F)
[pass] expect: ((path . /usr/local)), got: ((path . /usr/local))
[assert] exclamation mark character (%21)
[pass] expect: ((warning . danger!)), got: ((warning . danger!))
[assert] at symbol character (%40)
[pass] expect: ((email . test@example.com)), got: ((email . test@example.com))
[assert] duplicate keys
[pass] expect: ((item . apple) (item . orange)), got: ((item . apple) (item . orange))
[assert] single key, no equals sign
[pass] expect: ((key-only . )), got: ((key-only . ))
[assert] ampersand character (%26)
[pass] expect: ((data . one&two)), got: ((data . one&two))
[assert] question mark character (%3F)
[pass] expect: ((query . what?)), got: ((query . what?))
[assert] parentheses characters (%28, %29)
[pass] expect: ((func . f(x))), got: ((func . f(x)))
[assert] mixed valid and malformed pairs
[pass] expect: ((a . 1) (b . ) (c . 3)), got: ((a . 1) (b . ) (c . 3))
[assert] value with no key (unlikely but possible from split)
[pass] expect: (( . value)), got: (( . value))
[assert] dollar sign character (%24)
[pass] expect: ((amount . $100)), got: ((amount . $100))
[assert] multiple key-value pairs
[pass] expect: ((name . Jane Doe) (age . 30)), got: ((name . Jane Doe) (age . 30))
[assert] unicode characters (e.g., '?' - %C3%A9 in UTF-8)
[pass] expect: ((name . fianc?)), got: ((name . fianc?))
[assert] key with no value
[pass] expect: ((key . )), got: ((key . ))
[assert] empty key and empty value
[pass] expect: (), got: ();;; note: source file ./src/kracht/prelude.scm
;;; newer than compiled /gnu/store/3hf3hs4cj4347gkhj7xr9vbpkc7hpp89-profile/lib/guile/3.0/site-ccache/kracht/prelude.go
;;; note: source file ./src/kracht/prelude.scm
;;; newer than compiled /root/.cache/guile/ccache/3.0-LE-8-4.7/etc/byggsteg/job-clone/kracht/trunk/src/kracht/prelude.scm.go
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;; or pass the --no-auto-compile argument to disable.
;;; compiling ./src/kracht/prelude.scm
;;; compiled /root/.cache/guile/ccache/3.0-LE-8-4.7/etc/byggsteg/job-clone/kracht/trunk/src/kracht/prelude.scm.go
WARNING: (veritas unit prelude-spec): `log-info' imported from both (veritas veritas) and (kracht prelude)
WARNING: (veritas unit prelude-spec): `log-error' imported from both (veritas veritas) and (kracht prelude)
[assert] multiple keys, no equals sign
[pass] expect: ((key1 . ) (key2 . )), got: ((key1 . ) (key2 . ))
[assert] plus sign (%2B) - often used for space, but distinct from actual '+'
[pass] expect: ((code . a+b)), got: ((code . a+b))
[assert] hash/pound sign character (%23)
[pass] expect: ((tag . #important)), got: ((tag . #important))
[assert] curly braces characters (%7B, %7D)
[pass] expect: ((json . {data})), got: ((json . {data}))
[assert] semicolon character (%3B)
[pass] expect: ((cookie . id;user)), got: ((cookie . id;user))
[assert] keys and values with special characters (URL-encoded)
[pass] expect: ((param_1 . value with spaces) (param/2 . another_value!)), got: ((param_1 . value with spaces) (param/2 . another_value!))
[test] empty-string? tests
[assert] empty-string? with non-empty string
[pass] expect: #f, got: #f
[assert] empty-string? with whitespace
[pass] expect: #f, got: #f
[assert] empty-string? with empty string
[pass] expect: #t, got: #t
[test] non-empty-string? tests
[assert] non-empty-string? with #f
[pass] expect: #f, got: #f
[assert] non-empty-string? with whitespace
[pass] expect: #t, got: #t
[assert] non-empty-string? with empty string
[pass] expect: #f, got: #f
[assert] non-empty-string? with #t
[pass] expect: #t, got: #t
[assert] non-empty-string? with non-empty string
[pass] expect: #t, got: #t
[info] ran 2 tasks in: 0 seconds, 23404 microseconds
finished running tests
[1m[INFO][2025-08-29 09:28:39+0200] Start loading tasks from file: /etc/byggsteg/job-clone/kracht/trunk/maak.scm[0m
[1m[INFO][2025-08-29 09:28:39+0200] Start executing user tasks: (test)[0m
[1m[INFO][2025-08-29 09:28:39+0200] Start task: test
[0m
[1m[INFO][2025-08-29 09:28:39+0200] Calling procedure: test[0m
[1m[INFO][2025-08-29 09:28:39+0200] Run project's tests.[0m
-> running command: cd /etc/byggsteg/job-clone/kracht/trunk && sudo maak deploy
'doc/api/index.texi' is verwijderd
map 'doc/api' is verwijderd
map 'doc' is verwijderd
API documentation saved to doc/api
;;; note: source file /etc/byggsteg/job-clone/kracht/trunk/src/kracht/prelude.scm
;;; newer than compiled /root/.cache/guile/ccache/3.0-LE-8-4.6/etc/byggsteg/job-clone/kracht/trunk/src/kracht/prelude.scm.go
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;; or pass the --no-auto-compile argument to disable.
;;; compiling /etc/byggsteg/job-clone/kracht/trunk/src/kracht/prelude.scm
;;; compiled /root/.cache/guile/ccache/3.0-LE-8-4.6/etc/byggsteg/job-clone/kracht/trunk/src/kracht/prelude.scm.go
index.texi: warning: een 'title'-commando en '@top' vereisen een titel
hernoemd './index' -> './doc/api-dist'
'/srv/http/jointhefreeworld.org/api-docs/kracht/kracht_005fprelude.html' is verwijderd
'/srv/http/jointhefreeworld.org/api-docs/kracht/API.html' is verwijderd
map '/srv/http/jointhefreeworld.org/api-docs/kracht' is verwijderd
mkdir: map '/srv/http/jointhefreeworld.org/api-docs/kracht' is aangemaakt
hernoemd 'doc/api-dist/API.html' -> '/srv/http/jointhefreeworld.org/api-docs/kracht/API.html'
hernoemd 'doc/api-dist/kracht_005fprelude.html' -> '/srv/http/jointhefreeworld.org/api-docs/kracht/kracht_005fprelude.html'
map 'doc/api-dist' is verwijderd
'doc/api/index.texi' is verwijderd
map 'doc/api' is verwijderd
map 'doc' is verwijderd
[1m[INFO][2025-08-29 09:28:40+0200] Start loading tasks from file: /etc/byggsteg/job-clone/kracht/trunk/maak.scm[0m
[1m[INFO][2025-08-29 09:28:40+0200] Start executing user tasks: (deploy)[0m
[1m[INFO][2025-08-29 09:28:40+0200] Start task: deploy
[0m
[1m[INFO][2025-08-29 09:28:40+0200] Calling procedure: deploy[0m
[1m[INFO][2025-08-29 09:28:40+0200] Generate documentation for the project and publish to web directory.[0m