From 814333e288a75af10fc39b8ca8d8eefcb855fb25 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Wed, 27 Jul 2016 22:20:12 -0700 Subject: 3155 --- 066stream.mu | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to '066stream.mu') diff --git a/066stream.mu b/066stream.mu index ce0b1788..75685fd0 100644 --- a/066stream.mu +++ b/066stream.mu @@ -25,7 +25,7 @@ def read in:address:stream -> result:character, in:address:stream [ s:address:array:character <- get *in, data:offset len:number <- length *s at-end?:boolean <- greater-or-equal idx len - reply-if at-end?, 0/nul, in + return-if at-end?, 0/nul, in result <- index *s, idx idx <- add idx, 1 *in <- put *in, index:offset, idx @@ -38,7 +38,7 @@ def peek in:address:stream -> result:character [ s:address:array:character <- get *in, data:offset len:number <- length *s at-end?:boolean <- greater-or-equal idx len - reply-if at-end?, 0/nul + return-if at-end?, 0/nul result <- index *s, idx ] -- cgit 1.4.1-2-gfad0