mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

	Commit message (Expand)	Author	Age	Files	Lines
*	5704	Kartik Agaram	2019-10-19	1	-0/+2
*	5485 - promote SubX to top-level	Kartik Agaram	2019-07-27	1	-4/+30
*	4252	Kartik Agaram	2018-06-06	1	-2/+2
*	4061	Kartik K. Agaram	2017-10-13	1	-4/+4
*	4010	Kartik K. Agaram	2017-10-04	1	-16/+16
*	3966	Kartik K. Agaram	2017-07-09	1	-1/+1
*	3965 - get rid of the teardown() function	Kartik K. Agaram	2017-07-09	1	-6/+2
*	3557	Kartik K. Agaram	2016-10-22	1	-4/+4
*	3414	Kartik K. Agaram	2016-09-24	1	-1/+1
*	3297 - run unit tests before scenarios	Kartik K. Agaram	2016-09-05	1	-0/+3
*	3273	Kartik K. Agaram	2016-08-28	1	-7/+9
*	3272	Kartik K. Agaram	2016-08-28	1	-0/+3
*	3270	Kartik K. Agaram	2016-08-28	1	-0/+5
*	3027	Kartik K. Agaram	2016-06-02	1	-1/+1
*	2935	Kartik K. Agaram	2016-05-07	1	-2/+2
*	2609 - run $browse-trace on old runs	Kartik K. Agaram	2015-11-29	1	-0/+1
*	1342	Kartik K. Agaram	2015-05-11	1	-8/+8
*	1330	Kartik K. Agaram	2015-05-10	1	-0/+5
*	1294	Kartik K. Agaram	2015-05-06	1	-5/+5
*	1276 - make C++ version the default	Kartik K. Agaram	2015-05-05	1	-0/+121

# new type to help incrementally scan arrays container stream:_elem [ index:num data:&:@:_elem ] def new-stream s:&:@:_elem -> result:&:stream:_elem [ local-scope load-ingredients result <- new {(stream _elem): type} *result <- put *result, index:offset, 0 *result <- put *result, data:offset, s ] def rewind in:&:stream:_elem -> in:&:stream:_elem [ local-scope load-ingredients *in <- put *in, index:offset, 0 ] def read in:&:stream:_elem -> result:_elem, empty?:bool, in:&:stream:_elem [ local-scope load-ingredients empty? <- copy 0/false idx:num <- get *in, index:offset s:&:@:_elem <- get *in, data:offset len:num <- length *s at-end?:bool <- greater-or-equal idx len { break-unless at-end? empty-result:&:_elem <- new _elem:type return *empty-result, 1/true } result <- index *s, idx idx <- add idx, 1 *in <- put *in, index:offset, idx ] def peek in:&:stream:_elem -> result:_elem, empty?:bool [ local-scope load-ingredients empty?:bool <- copy 0/false idx:num <- get *in, index:offset s:&:@:_elem <- get *in, data:offset len:num <- length *s at-end?:bool <- greater-or-equal idx len { break-unless at-end? empty-result:&:_elem <- new _elem:type return *empty-result, 1/true } result <- index *s, idx ] def read-line in:&:stream:char -> result:text, in:&:stream:char [ local-scope load-ingredients idx:num <- get *in, index:offset s:text <- get *in, data:offset next-idx:num <- find-next s, 10/newline, idx result <- copy-range s, idx, next-idx idx <- add next-idx, 1 # skip newline # write back *in <- put *in, index:offset, idx ] def end-of-stream? in:&:stream:_elem -> result:bool [ local-scope load-ingredients idx:num <- get *in, index:offset s:&:@:_elem <- get *in, data:offset len:num <- length *s result <- greater-or-equal idx, len ]