diff options
Diffstat (limited to 'module/calp/util.scm')
-rw-r--r-- | module/calp/util.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/calp/util.scm b/module/calp/util.scm index 25c753dc..7c176c50 100644 --- a/module/calp/util.scm +++ b/module/calp/util.scm @@ -533,6 +533,9 @@ (define-public ->string ->str) +(define-public (->quoted-string any) + (with-output-to-string (lambda () (write any)))) + (define-public (path-append . strings) (fold (lambda (s done) (string-append |