From 0be3bea14158e2b8e24e25edd00ecca63d3f8787 Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Wed, 14 Nov 2018 08:19:01 +0100
Subject: [PATCH] mes: Remove copy of make-string.

* mes/module/mes/guile.mes (make-string): Remove copy.
---
 mes/module/mes/guile.mes | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/mes/module/mes/guile.mes b/mes/module/mes/guile.mes
index 28c4b49a..30c9b1dd 100644
--- a/mes/module/mes/guile.mes
+++ b/mes/module/mes/guile.mes
@@ -46,9 +46,6 @@
                                                         (else (error (format #f "not supported: handle-delim=~a" handle-delim))))
                (cons c (loop (read-char port)))))))))
 
-(define (make-string n . fill)
-  (list->string (apply make-list n fill)))
-
 (define (object->string x . rest)
   (with-output-to-string
     (lambda () ((if (pair? rest) (car rest) write) x))))