diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-05-14 12:29:21 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-05-14 12:29:26 -0700 |
commit | 1b1dcddf54aba23c1b462c936004150c17ac3a1a (patch) | |
tree | 7559b39a78a46ced0752d783a7e3ec15e7407934 /071print.mu | |
parent | af336c444f4fe9d8a1677a200f40748ce5f24a26 (diff) | |
download | mu-1b1dcddf54aba23c1b462c936004150c17ac3a1a.tar.gz |
1369
Delete comment-out marker from inside mu strings. Have to do this manually for now.
Diffstat (limited to '071print.mu')
-rw-r--r-- | 071print.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/071print.mu b/071print.mu index ac8ae57c..94b645d3 100644 --- a/071print.mu +++ b/071print.mu @@ -68,7 +68,7 @@ recipe print-character [ # special-case: newline { newline?:boolean <- equal c:character, 10:literal/newlin -#? $print c:character, [ ], newline?:boolean, [ #? 1 +#? $print c:character, [ ], newline?:boolean, [ #? ] #? 1 break-unless newline?:boolean { @@ -180,7 +180,7 @@ recipe clear-line [ # space over the entire line #? $start-tracing #? 1 { -#? $print column:address:number/deref, [ #? 1 +#? $print column:address:number/deref, [ #? ] #? 1 done?:boolean <- greater-or-equal column:address:number/deref, n:number break-if done?:boolean @@ -267,10 +267,10 @@ recipe cursor-down [ at-bottom?:boolean <- greater-or-equal row:address:number/deref, height:number break-if at-bottom?:boolean # row = row+1 -#? $print [AAA: ], row:address:number, [ -> ], row:address:number/deref, [ #? 1 +#? $print [AAA: ], row:address:number, [ -> ], row:address:number/deref, [ #? ] #? 1 row:address:number/deref <- add row:address:number/deref, 1:literal -#? $print [BBB: ], row:address:number, [ -> ], row:address:number/deref, [ #? 1 +#? $print [BBB: ], row:address:number, [ -> ], row:address:number/deref, [ #? ] #? 1 #? $start-tracing #? 1 } |