diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-11-27 11:34:27 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-11-27 11:34:27 -0800 |
commit | 91610795155d24b730944056695598753b9d214f (patch) | |
tree | 2d4782c2f7c8891246afcdea608afcacd9093eee /070text.mu | |
parent | c0f43700384b149d9fa1e089600c01a81c7a851e (diff) | |
download | mu-91610795155d24b730944056695598753b9d214f.tar.gz |
2477
Diffstat (limited to '070text.mu')
-rw-r--r-- | 070text.mu | 9 |
1 files changed, 4 insertions, 5 deletions
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 [ |