From 172084bf5a47158805fa0efb4bfb31569d784ec7 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Wed, 17 May 2017 18:05:27 -0700 Subject: [PATCH] world-report: missing PORT in call to write-string --- src/runtime/world-report.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/runtime/world-report.scm b/src/runtime/world-report.scm index 30729f24d..2edea1b64 100644 --- a/src/runtime/world-report.scm +++ b/src/runtime/world-report.scm @@ -103,7 +103,7 @@ USA. (write-size "Heap: " 6 4) ; heap_alloc_limit - heap_start (newline port) (write-size "Free: " 6 5) ; heap_alloc_limit - Free - (write-string " ") + (write-string " " port) (write-free-bar status 32 port) (newline port) (let loop ((i 0) -- 2.25.1