diff options
| author | Munyoki Kilyungi | 2023-07-18 16:26:59 +0300 |
|---|---|---|
| committer | Munyoki Kilyungi | 2023-07-21 14:36:40 +0300 |
| commit | b90ed6c6e89a2a8d1d4a3c9eba7abb9606df2b16 (patch) | |
| tree | 227b59f1b4346de5bceb0e7bb4aca17e80631f99 /dump/special-forms.scm | |
| parent | fe4355cc0ea5c0adb4eca5a8094b6793ede9f699 (diff) | |
| download | gn-transform-databases-b90ed6c6e89a2a8d1d4a3c9eba7abb9606df2b16.tar.gz | |
Convert symbol to a string when show-casing triples in doc
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'dump/special-forms.scm')
| -rw-r--r-- | dump/special-forms.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/dump/special-forms.scm b/dump/special-forms.scm index cf591e9..738c48c 100644 --- a/dump/special-forms.scm +++ b/dump/special-forms.scm @@ -476,7 +476,10 @@ The above query results to triples that have the form: ((predicate . object) (format #t "~a -> ~a -> ~a ~%" #,(field->datum #'subject) - predicate object))) + predicate + (if (symbol? object) + (symbol->string object) + object)))) (map-alist '() #,@(field->datum #'(predicate-clauses ...)))) |