From 8eeaf169b2a92a8cc1594a7202e66a5ec66ae372 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Fri, 21 Jul 2023 17:41:30 +0300 Subject: Convert subject into a string if it's a symbol Signed-off-by: Munyoki Kilyungi --- dump/special-forms.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'dump') diff --git a/dump/special-forms.scm b/dump/special-forms.scm index fe9dbe6..948ebba 100644 --- a/dump/special-forms.scm +++ b/dump/special-forms.scm @@ -467,7 +467,9 @@ The above query results to triples that have the form: (for-each (match-lambda ((predicate . object) (format #t "~a -> ~a -> ~a ~%" - #,(field->datum #'subject) + (if (symbol? #,(field->datum #'subject)) + (symbol->string #,(field->datum #'subject)) + #,(field->datum #'subject)) predicate (if (symbol? object) (symbol->string object) -- cgit v1.2.3