diff options
Diffstat (limited to 'dump')
| -rw-r--r-- | dump/special-forms.scm | 4 |
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) |