From bc6436927640603675e2e700007f53c5ab213869 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Tue, 28 Jul 2015 14:33:22 -0700 Subject: 1868 - start using naked literals everywhere First step to reducing typing burden. Next step: inferring types. --- 066stream.mu | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to '066stream.mu') diff --git a/066stream.mu b/066stream.mu index 7bdf36a5..4c77319a 100644 --- a/066stream.mu +++ b/066stream.mu @@ -8,7 +8,7 @@ recipe new-stream [ local-scope result:address:stream <- new stream:type i:address:number <- get-address result:address:stream/deref, index:offset - i:address:number/deref <- copy 0:literal + i:address:number/deref <- copy 0 d:address:address:array:character <- get-address result:address:stream/deref, data:offset d:address:address:array:character/deref <- next-ingredient reply result:address:stream @@ -18,7 +18,7 @@ recipe rewind-stream [ local-scope in:address:stream <- next-ingredient x:address:number <- get-address in:address:stream/deref, index:offset - x:address:number/deref <- copy 0:literal + x:address:number/deref <- copy 0 reply in:address:stream/same-as-arg:0 ] @@ -27,9 +27,9 @@ recipe read-line [ in:address:stream <- next-ingredient idx:address:number <- get-address in:address:stream/deref, index:offset s:address:array:character <- get in:address:stream/deref, data:offset - next-idx:number <- find-next s:address:array:character, 10:literal/newline, idx:address:number/deref + next-idx:number <- find-next s:address:array:character, 10/newline, idx:address:number/deref result:address:array:character <- string-copy s:address:array:character, idx:address:number/deref, next-idx:number - idx:address:number/deref <- add next-idx:number, 1:literal # skip newline + idx:address:number/deref <- add next-idx:number, 1 # skip newline reply result:address:array:character ] -- cgit 1.4.1-2-gfad0