diff options
Diffstat (limited to 'syntax-highlight.scm')
| -rw-r--r-- | syntax-highlight.scm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/syntax-highlight.scm b/syntax-highlight.scm index 8aba7db..6a15dab 100644 --- a/syntax-highlight.scm +++ b/syntax-highlight.scm @@ -27,15 +27,10 @@ #:use-module (srfi srfi-11) #:use-module (srfi srfi-26) #:use-module (srfi srfi-41) + #:use-module (syntax-highlight utils) #:export (highlight highlights->sxml)) -(define (string->stream str) - "Convert the string STR into a stream of characters." - (stream-map (lambda (i) - (string-ref str i)) - (stream-range 0 (string-length str)))) - (define* (highlight highlighter #:optional (stream (current-input-port))) "Apply HIGHLIGHTER, a syntax highlighting procedure, to STREAM. STREAM may be an open port, string, or SRFI-41 character stream. If |