diff options
| author | Dariqq <dariqq@posteo.net> | 2025-12-27 08:45:24 +0000 |
|---|---|---|
| committer | Sharlatan Hellseher <sharlatanus@gmail.com> | 2026-08-08 23:01:42 +0100 |
| commit | d62469f1878026eb82630f3f787e69cc34449a03 (patch) | |
| tree | f1f66d2614d92a532edc398ffad88edc28c1f20b /tests | |
| parent | c47f65bb512734fc5adae8773a3b8f35b4f7fa84 (diff) | |
build: toml: Allow lowercase z as time zone offset.
ABNF is case insensitive.
* guix/build/toml.scm: (time-offset): Add "z" as valid offset.
(eval-date): Adjust.
Relatest-to: guix/guix!5156
Change-Id: Ia7676c5201195ed44f629a678eb3f2966cf79860
Reviewed-by: Ludovic Courtès <ludo@gnu.org>
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/toml.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/toml.scm b/tests/toml.scm index a86c50eb1b1..b261856fcdf 100644 --- a/tests/toml.scm +++ b/tests/toml.scm | |||
| @@ -261,11 +261,13 @@ bool2 = false")) | |||
| 261 | `(("odt1" . ,(make-date #f 0 32 7 27 5 1979 0)) | 261 | `(("odt1" . ,(make-date #f 0 32 7 27 5 1979 0)) |
| 262 | ("odt2" . ,(make-date #f 0 32 0 27 5 1979 (* -7 60 60))) | 262 | ("odt2" . ,(make-date #f 0 32 0 27 5 1979 (* -7 60 60))) |
| 263 | ("odt3" . ,(make-date 999999 0 32 0 27 5 1979 (* 7 60 60))) | 263 | ("odt3" . ,(make-date 999999 0 32 0 27 5 1979 (* 7 60 60))) |
| 264 | ("odt4" . ,(make-date #f 0 32 7 27 5 1979 0))) | 264 | ("odt4" . ,(make-date #f 0 32 7 27 5 1979 0)) |
| 265 | ("odt5" . ,(make-date #f 0 32 7 27 5 1979 0))) | ||
| 265 | (parse-toml "odt1 = 1979-05-27T07:32:00Z | 266 | (parse-toml "odt1 = 1979-05-27T07:32:00Z |
| 266 | odt2 = 1979-05-27T00:32:00-07:00 | 267 | odt2 = 1979-05-27T00:32:00-07:00 |
| 267 | odt3 = 1979-05-27T00:32:00.999999+07:00 | 268 | odt3 = 1979-05-27T00:32:00.999999+07:00 |
| 268 | odt4 = 1979-05-27 07:32:00Z")) | 269 | odt4 = 1979-05-27 07:32:00Z |
| 270 | odt5 = 1979-05-27 07:32:00z")) | ||
| 269 | 271 | ||
| 270 | (test-equal "parse-toml: Local date-time" | 272 | (test-equal "parse-toml: Local date-time" |
| 271 | `(("ldt1" . ,(make-date #f 0 32 7 27 5 1979 #f)) | 273 | `(("ldt1" . ,(make-date #f 0 32 7 27 5 1979 #f)) |
