From 136412d263cc241bf9dfbe46271547615e3ba03d Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sat, 21 Nov 2015 10:19:34 -0800 Subject: 2468 - overload print-character as just 'print' --- sandbox/003-shortcuts.mu | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'sandbox/003-shortcuts.mu') diff --git a/sandbox/003-shortcuts.mu b/sandbox/003-shortcuts.mu index 9c46c927..b3676efb 100644 --- a/sandbox/003-shortcuts.mu +++ b/sandbox/003-shortcuts.mu @@ -118,13 +118,13 @@ recipe delete-before-cursor editor:address:editor-data, screen:address:screen -> currc:character <- get *curr, value:offset at-newline?:boolean <- equal currc, 10/newline break-if at-newline? - screen <- print-character screen, currc + screen <- print screen, currc curr-column <- add curr-column, 1 curr <- next curr loop } # we're guaranteed not to be at the right margin - screen <- print-character screen, 32/space + screen <- print screen, 32/space go-render? <- copy 0/false ] @@ -358,13 +358,13 @@ recipe delete-at-cursor editor:address:editor-data, screen:address:screen -> edi currc:character <- get *curr, value:offset at-newline?:boolean <- equal currc, 10/newline break-if at-newline? - screen <- print-character screen, currc + screen <- print screen, currc curr-column <- add curr-column, 1 curr <- next curr loop } # we're guaranteed not to be at the right margin - screen <- print-character screen, 32/space + screen <- print screen, 32/space go-render? <- copy 0/false ] -- cgit 1.4.1-2-gfad0