diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2016-01-22 19:14:53 -0800 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2016-01-22 19:14:53 -0800 |
| commit | 6a03974c420bf2eb560d1fbcdaab8ebb6ef152d8 (patch) | |
| tree | d5251e4bb48f7a673a84164c11dfdbcdb7f2e984 | |
| parent | aaf61a535c73ea8631e1820df973fa585b046528 (diff) | |
| download | mu-6a03974c420bf2eb560d1fbcdaab8ebb6ef152d8.tar.gz | |
2591
| -rw-r--r-- | edit/001-editor.mu | 8 | ||||
| -rw-r--r-- | sandbox/001-editor.mu | 8 |
2 files changed, 14 insertions, 2 deletions
diff --git a/edit/001-editor.mu b/edit/001-editor.mu index c773a0ad..c83b7f3a 100644 --- a/edit/001-editor.mu +++ b/edit/001-editor.mu @@ -233,10 +233,16 @@ recipe clear-line-delimited screen:address:shared:screen, column:number, right:n local-scope load-ingredients space:character <- copy 32/space + bg-color:number, bg-color-found?:boolean <- next-ingredient + { + # default bg-color to black + break-if bg-color-found? + bg-color <- copy 0/black + } { done?:boolean <- greater-than column, right break-if done? - screen <- print screen, space + screen <- print screen, space, 0/color/unused, bg-color column <- add column, 1 loop } diff --git a/sandbox/001-editor.mu b/sandbox/001-editor.mu index c773a0ad..c83b7f3a 100644 --- a/sandbox/001-editor.mu +++ b/sandbox/001-editor.mu @@ -233,10 +233,16 @@ recipe clear-line-delimited screen:address:shared:screen, column:number, right:n local-scope load-ingredients space:character <- copy 32/space + bg-color:number, bg-color-found?:boolean <- next-ingredient + { + # default bg-color to black + break-if bg-color-found? + bg-color <- copy 0/black + } { done?:boolean <- greater-than column, right break-if done? - screen <- print screen, space + screen <- print screen, space, 0/color/unused, bg-color column <- add column, 1 loop } |