diff options
| author | Munyoki Kilyungi | 2023-07-21 17:41:30 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2023-07-31 13:06:41 +0300 |
| commit | 8eeaf169b2a92a8cc1594a7202e66a5ec66ae372 (patch) | |
| tree | ff329e50b3b9928fa371a9b4b956c2445584faa8 /dump | |
| parent | 241cf2eef260a1c02434bae945645c9f3befaa7e (diff) | |
| download | gn-transform-databases-8eeaf169b2a92a8cc1594a7202e66a5ec66ae372.tar.gz | |
Convert subject into a string if it's a symbol
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
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) |