diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-11-21 10:19:34 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-11-21 10:19:34 -0800 |
commit | 136412d263cc241bf9dfbe46271547615e3ba03d (patch) | |
tree | 7d0e9a7eb900f5e61ef78e669b9459b2d082acd3 /sandbox/002-typing.mu | |
parent | 3f7eed6c600d6fb10ad6ae279f87541af69af9a2 (diff) | |
download | mu-136412d263cc241bf9dfbe46271547615e3ba03d.tar.gz |
2468 - overload print-character as just 'print'
Diffstat (limited to 'sandbox/002-typing.mu')
-rw-r--r-- | sandbox/002-typing.mu | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sandbox/002-typing.mu b/sandbox/002-typing.mu index bc47e2d8..2b446101 100644 --- a/sandbox/002-typing.mu +++ b/sandbox/002-typing.mu @@ -224,7 +224,7 @@ recipe insert-at-cursor editor:address:editor-data, c:character, screen:address: overflow?:boolean <- and at-bottom?, at-right? break-if overflow? move-cursor screen, save-row, save-column - print-character screen, c + print screen, c go-render? <- copy 0/false reply } @@ -246,7 +246,7 @@ recipe insert-at-cursor editor:address:editor-data, c:character, screen:address: currc:character <- get *curr, value:offset at-newline?:boolean <- equal currc, 10/newline break-if at-newline? - print-character screen, currc + print screen, currc curr-column <- add curr-column, 1 curr <- next curr loop @@ -1035,7 +1035,7 @@ recipe draw-horizontal screen:address:screen, row:number, x:number, right:number { continue?:boolean <- lesser-or-equal x, right # right is inclusive, to match editor-data semantics break-unless continue? - print-character screen, style, color, bg-color + print screen, style, color, bg-color x <- add x, 1 loop } |