diff options
Diffstat (limited to '')
-rw-r--r-- | module/util.scm | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/module/util.scm b/module/util.scm index 76877d10..62523167 100644 --- a/module/util.scm +++ b/module/util.scm @@ -79,12 +79,6 @@ -(define-public upstring->symbol (compose string->symbol string-upcase)) - -(define-public symbol-upcase (compose string->symbol string-upcase symbol->string)) - -(define-public symbol-downcase (compose string->symbol string-downcase symbol->string)) - (define-syntax for (syntax-rules (in) ((for (<var> <vars> ...) in <collection> b1 body ...) @@ -326,9 +320,6 @@ (if (> i (string-length str)) str (string-take str i))) -(define-public (as-string s) - (if (symbol? s) (symbol->string s) s)) - (define-public (as-symb s) (if (string? s) (string->symbol s) s)) |