From af336c444f4fe9d8a1677a200f40748ce5f24a26 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Thu, 14 May 2015 12:06:16 -0700 Subject: 1368 - alias carriage-return and newline CRLF still shows as two newlines, though. Cross that bridge when we get to it. The new chessboard test is still hanging, though. --- 071print.mu | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to '071print.mu') diff --git a/071print.mu b/071print.mu index 411c8319..ac8ae57c 100644 --- a/071print.mu +++ b/071print.mu @@ -67,7 +67,7 @@ recipe print-character [ max-row:number <- subtract height:number, 1:literal # special-case: newline { - newline?:boolean <- equal c:character, 13:literal + newline?:boolean <- equal c:character, 10:literal/newlin #? $print c:character, [ ], newline?:boolean, [ #? 1 #? ] #? 1 break-unless newline?:boolean @@ -153,7 +153,7 @@ scenario print-newline-character [ #? $start-tracing #? 3 1:address:screen <- init-fake-screen 3:literal/width, 2:literal/height 1:address:screen <- print-character 1:address:screen, 97:literal # 'a' - 1:address:screen <- print-character 1:address:screen, 13:literal/newline + 1:address:screen <- print-character 1:address:screen, 10:literal/newline 2:number <- get 1:address:screen/deref, cursor-row:offset 3:number <- get 1:address:screen/deref, cursor-column:offset 4:address:array:character <- get 1:address:screen/deref, data:offset -- cgit 1.4.1-2-gfad0