From 44bab2e4b4c8252b20c848108fa7bf9e33e2b26a Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Mon, 14 Mar 2016 13:00:21 -0700
Subject: 2782 - directly use string literals everywhere

---
 074list.mu | 9 ++-------
 1 file changed, 2 insertions(+), 7 deletions(-)

(limited to '074list.mu')

diff --git a/074list.mu b/074list.mu
index 856c5e9c..6cb7a9a1 100644
--- a/074list.mu
+++ b/074list.mu
@@ -83,11 +83,7 @@ def to-buffer in:address:shared:list:_elem, buf:address:shared:buffer -> buf:add
   next:address:shared:list:_elem <- rest in
   nextn:number <- copy next
   return-unless next
-  space:character <- copy 32/space
-  buf <- append buf, space:character
-  s:address:shared:array:character <- new [-> ]
-  n:number <- length *s
-  buf <- append buf, s
+  buf <- append buf, [ -> ]
   # and recurse
   remaining:number, optional-ingredient-found?:boolean <- next-ingredient
   {
@@ -104,8 +100,7 @@ def to-buffer in:address:shared:list:_elem, buf:address:shared:buffer -> buf:add
     return
   }
   # past recursion depth; insert ellipses and stop
-  s:address:shared:array:character <- new [...]
-  append buf, s
+  append buf, [...]
 ]
 
 scenario stash-on-list-converts-to-text [
-- 
cgit 1.4.1-2-gfad0