diff options
author | Munyoki Kilyungi | 2023-08-09 17:26:23 +0300 |
---|---|---|
committer | Munyoki Kilyungi | 2023-08-09 17:26:23 +0300 |
commit | 9b5ea8f0d7f4d968c7dd4feedcde0288d554f9f0 (patch) | |
tree | b098cd077ffb9cc8f87c17266a1da5077176666e | |
parent | e4ef2dc1c3bc0169b2dcad37d3a56373b66f8902 (diff) | |
download | gn-transform-databases-9b5ea8f0d7f4d968c7dd4feedcde0288d554f9f0.tar.gz |
Add new line before dump title
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
-rw-r--r-- | dump/special-forms.scm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/dump/special-forms.scm b/dump/special-forms.scm index ad3296e..99cebee 100644 --- a/dump/special-forms.scm +++ b/dump/special-forms.scm @@ -435,7 +435,7 @@ must be remedied." (_ (error "Invalid predicate clause:" predicate-clause)))) #'(predicate-clauses ...)))) (when dump-documentation? - (format #t "## '~a'~%~%" (syntax->datum #'name)) + (format #t "~%## '~a'~%~%" (syntax->datum #'name)) #,(syntax-case #'schema-triples-clause (schema-triples) ((schema-triples (triple-subject triple-predicate triple-object) ...) #`(begin @@ -448,8 +448,7 @@ must be remedied." (list 'triple-object ...)) (format #t "```")))) (_ (error "Invalid schema triples clause:" #'schema-triples-clause))) - (format #t " -## Generated Triples: + (format #t "## Generated Triples: The following SQL query was executed: |