aboutsummaryrefslogtreecommitdiff
path: root/dump
diff options
context:
space:
mode:
Diffstat (limited to 'dump')
-rw-r--r--dump/special-forms.scm4
1 files changed, 3 insertions, 1 deletions
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)