1 files changed, 2 insertions, 1 deletions
diff --git a/070text.mu b/070text.mu
index 56291b75..a37e8a6e 100644
--- a/070text.mu
+++ b/070text.mu
@@ -297,7 +297,8 @@ recipe to-text n:number -> result:address:shared:array:character [
   # add sign
   {
     break-unless negate-result:boolean
-    tmp <- append tmp, 45  # '-'
+    minus:character <- copy 45/-
+    tmp <- append tmp, minus
   }
   # reverse buffer into text result
   len:number <- get *tmp, length:offset