From db1fe350b547a5db9e4928b86ec314015c25a736 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Tue, 25 Apr 2017 15:36:58 -0700 Subject: [PATCH] microcode/makegen/makegen.scm: Revert recent change. 9.2 has a different write-string. Use the deprecated write-substring just a little longer. --- src/microcode/makegen/makegen.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/microcode/makegen/makegen.scm b/src/microcode/makegen/makegen.scm index 24770606b..c12246011 100644 --- a/src/microcode/makegen/makegen.scm +++ b/src/microcode/makegen/makegen.scm @@ -188,7 +188,7 @@ USA. (let ((n (read-substring! buffer 0 4096 input))) (if (> n 0) (begin - (write-string buffer output 0 n) + (write-substring buffer 0 n output) (loop))))))))) (define (maybe-update-dependencies deps-filename source-files) -- 2.25.1