From 91610795155d24b730944056695598753b9d214f Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 27 Nov 2015 11:34:27 -0800 Subject: 2477 --- 070text.mu | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to '070text.mu') diff --git a/070text.mu b/070text.mu index 40243496..2b0e41b7 100644 --- a/070text.mu +++ b/070text.mu @@ -224,8 +224,7 @@ scenario buffer-append-handles-backspace [ ] ] -# result:address:array:character <- integer-to-decimal-text n:number -recipe integer-to-decimal-text n:number -> result:address:array:character [ +recipe to-text n:number -> result:address:array:character [ local-scope load-ingredients # is n zero? @@ -304,7 +303,7 @@ recipe buffer-to-array in:address:buffer -> result:address:array:character [ scenario integer-to-decimal-digit-zero [ run [ - 1:address:array:character/raw <- integer-to-decimal-text 0 + 1:address:array:character/raw <- to-text 0 2:array:character/raw <- copy *1:address:array:character/raw ] memory-should-contain [ @@ -314,7 +313,7 @@ scenario integer-to-decimal-digit-zero [ scenario integer-to-decimal-digit-positive [ run [ - 1:address:array:character/raw <- integer-to-decimal-text 234 + 1:address:array:character/raw <- to-text 234 2:array:character/raw <- copy *1:address:array:character/raw ] memory-should-contain [ @@ -324,7 +323,7 @@ scenario integer-to-decimal-digit-positive [ scenario integer-to-decimal-digit-negative [ run [ - 1:address:array:character/raw <- integer-to-decimal-text -1 + 1:address:array:character/raw <- to-text -1 2:array:character/raw <- copy *1:address:array:character/raw ] memory-should-contain [ -- cgit 1.4.1-2-gfad0