From 1161e769e33e692bba48ea359725357c939612da Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Wed, 2 Oct 2024 02:13:27 +0100 Subject: reader: Support coercion to number. * ravanan/reader.scm (coerce-type): Support coercion to number. --- ravanan/reader.scm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/ravanan/reader.scm b/ravanan/reader.scm index 6ca36bc..99276bb 100644 --- a/ravanan/reader.scm +++ b/ravanan/reader.scm @@ -280,4 +280,6 @@ each association list of the returned vector of association lists. If ((member val (list "true" "yes")) #t) ((member val (list "false" "no")) #f) (else (error "Unable to coerce value to type" val type)))) + ((number) + (string->number val)) (else val))) -- cgit v1.2.3