From 711fa643bfe81d998f529bdc9d33fa419f3e73e9 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Mon, 13 Feb 2017 15:46:08 -0800 Subject: [PATCH] null --- brag/brag/support.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/brag/brag/support.rkt b/brag/brag/support.rkt index e956e8f..232fbf4 100755 --- a/brag/brag/support.rkt +++ b/brag/brag/support.rkt @@ -63,7 +63,7 @@ (provide apply-lexer) (define (apply-lexer lexer val) (for/list ([t (in-port lexer (if (string? val) (open-input-string val) val))]) - t)) + t)) (provide apply-tokenizer-maker (rename-out [apply-tokenizer-maker apply-tokenizer])) @@ -82,7 +82,7 @@ (srcloc-token-token tok)] [else tok])) (or (eof-object? val) (void? val))))]) - token)) + token)) (provide apply-colorer) (define (apply-colorer colorer port-or-string)