aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMasaya Tojo <masaya@tojo.tokyo>2024-03-25 02:16:32 +0900
committerMasaya Tojo <masaya@tojo.tokyo>2024-03-25 02:17:18 +0900
commit2ba326becc1c9546cf028a8ddb0ff8307c6e4eff (patch)
tree67c0b465d7e2638c43acd0e0ef8518d24061bc33
parenta58d7a372d5dd306455495ca46a1d126633dd581 (diff)
Add newlines for readablity.
-rw-r--r--readers/article.rkt2
1 files changed, 2 insertions, 0 deletions
diff --git a/readers/article.rkt b/readers/article.rkt
index 8f06b95..687adcc 100644
--- a/readers/article.rkt
+++ b/readers/article.rkt
@@ -12,8 +12,10 @@
(call/cc
(lambda ([k : (-> String Nothing)])
(unless (hash? jse) (k "must be a hash"))
+
(define id (hash-ref jse 'id (thunk (k "id not found"))))
(unless (string? id) (k "id must be a string"))
+
(define timestamp
(let ([timestamp (hash-ref jse 'timestamp (thunk (k "timestamp not found")))])
(unless (string? timestamp) (k "timestamp must be a string"))