From 3f7eed6c600d6fb10ad6ae279f87541af69af9a2 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sat, 21 Nov 2015 10:01:12 -0800 Subject: 2467 - rename 'string' to 'text' everywhere Not entirely happy with this. Maybe we'll find a better name. But at least it's an improvement. One part I *am* happy with is renaming string-replace to replace, string-append to append, etc. Overdue, now that we have static dispatch. --- edit/004-programming-environment.mu | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'edit/004-programming-environment.mu') diff --git a/edit/004-programming-environment.mu b/edit/004-programming-environment.mu index 0915fb33..51dd2362 100644 --- a/edit/004-programming-environment.mu +++ b/edit/004-programming-environment.mu @@ -34,7 +34,7 @@ recipe new-programming-environment screen:address:screen, initial-recipe-content assert button-on-screen?, [screen too narrow for menu] screen <- move-cursor screen, 0/row, button-start run-button:address:array:character <- new [ run (F4) ] - print-string screen, run-button, 255/white, 161/reddish + print screen, run-button, 255/white, 161/reddish # dotted line down the middle divider:number, _ <- divide-with-remainder width, 2 draw-vertical screen, divider, 1/top, height, 9482/vertical-dotted @@ -381,7 +381,7 @@ recipe render-all screen:address:screen, env:address:programming-environment-dat assert button-on-screen?, [screen too narrow for menu] screen <- move-cursor screen, 0/row, button-start run-button:address:array:character <- new [ run (F4) ] - print-string screen, run-button, 255/white, 161/reddish + print screen, run-button, 255/white, 161/reddish # dotted line down the middle trace 11, [app], [render divider] divider:number, _ <- divide-with-remainder width, 2 @@ -450,9 +450,9 @@ recipe update-cursor screen:address:screen, recipes:address:editor-data, current screen <- move-cursor screen, cursor-row, cursor-column ] -# print a string 's' to 'editor' in 'color' starting at 'row' +# print a text 's' to 'editor' in 'color' starting at 'row' # clear rest of last line, move cursor to next line -recipe render-string screen:address:screen, s:address:array:character, left:number, right:number, color:number, row:number -> row:number, screen:address:screen [ +recipe render screen:address:screen, s:address:array:character, left:number, right:number, color:number, row:number -> row:number, screen:address:screen [ local-scope load-ingredients reply-unless s @@ -510,8 +510,8 @@ recipe render-string screen:address:screen, s:address:array:character, left:numb move-cursor screen, row, left ] -# like 'render-string' but with colorization for comments like in the editor -recipe render-code-string screen:address:screen, s:address:array:character, left:number, right:number, row:number -> row:number, screen:address:screen [ +# like 'render' for texts, but with colorization for comments like in the editor +recipe render-code screen:address:screen, s:address:array:character, left:number, right:number, row:number -> row:number, screen:address:screen [ local-scope load-ingredients reply-unless s @@ -528,7 +528,7 @@ recipe render-code-string screen:address:screen, s:address:array:character, left done? <- greater-or-equal row, screen-height break-if done? c:character <- index *s, i - # only line different from render-string + # only line different from render { # at right? wrap. at-right?:boolean <- equal column, right -- cgit 1.4.1-2-gfad0