From 6c69569a4c4ca3a23635d4d7a40f0fe557194619 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Wed, 28 Sep 2016 20:08:04 -0700 Subject: 3430 --- html/065duplex_list.mu.html | 68 +++++++++++++++++++-------------------------- 1 file changed, 28 insertions(+), 40 deletions(-) (limited to 'html/065duplex_list.mu.html') diff --git a/html/065duplex_list.mu.html b/html/065duplex_list.mu.html index 7cefee4d..430e9f71 100644 --- a/html/065duplex_list.mu.html +++ b/html/065duplex_list.mu.html @@ -44,7 +44,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color def push x:_elem, in:&:duplex-list:_elem -> in:&:duplex-list:_elem [ local-scope load-ingredients - result:&:duplex-list:_elem <- new {(duplex-list _elem): type} + result:&:duplex-list:_elem <- new {(duplex-list _elem): type} *result <- merge x, in, 0 { break-unless in @@ -121,7 +121,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color def insert x:_elem, in:&:duplex-list:_elem -> in:&:duplex-list:_elem [ local-scope load-ingredients - new-node:&:duplex-list:_elem <- new {(duplex-list _elem): type} + new-node:&:duplex-list:_elem <- new {(duplex-list _elem): type} *new-node <- put *new-node, value:offset, x # save old next before changing it next-node:&:duplex-list:_elem <- get *in, next:offset @@ -133,11 +133,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario inserting-into-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 + list <- push 4, list + list <- push 5, list run [ - local-scope - list:&:duplex-list:char <- push 3, 0 - list <- push 4, list - list <- push 5, list list2:&:duplex-list:char <- next list # inside list list2 <- insert 6, list2 # check structure like before @@ -170,11 +170,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario inserting-at-end-of-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 + list <- push 4, list + list <- push 5, list run [ - local-scope - list:&:duplex-list:char <- push 3, 0 - list <- push 4, list - list <- push 5, list list2:&:duplex-list:char <- next list # inside list list2 <- next list2 # now at end of list list2 <- insert 6, list2 @@ -208,11 +208,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario inserting-after-start-of-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 + list <- push 4, list + list <- push 5, list run [ - local-scope - list:&:duplex-list:char <- push 3, 0 - list <- push 4, list - list <- push 5, list list <- insert 6, list # check structure like before list2:&:duplex-list:char <- copy list @@ -274,11 +274,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario removing-from-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 + list <- push 4, list + list <- push 5, list run [ - local-scope - list:&:duplex-list:char <- push 3, 0 - list <- push 4, list - list <- push 5, list list2:&:duplex-list:char <- next list # second element list <- remove list2, list 10:bool/raw <- equal list2, 0 @@ -303,11 +303,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario removing-from-start-of-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 + list <- push 4, list + list <- push 5, list run [ - local-scope - list:&:duplex-list:char <- push 3, 0 - list <- push 4, list - list <- push 5, list list <- remove list, list # check structure like before list2:&:duplex-list:char <- copy list @@ -329,11 +329,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario removing-from-end-of-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 + list <- push 4, list + list <- push 5, list run [ - local-scope - list:&:duplex-list:char <- push 3, 0 - list <- push 4, list - list <- push 5, list # delete last element list2:&:duplex-list:char <- next list list2 <- next list2 @@ -360,9 +360,9 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color ] scenario removing-from-singleton-duplex-list [ + local-scope + list:&:duplex-list:char <- push 3, 0 run [ - local-scope - list:&:duplex-list:char <- push 3, 0 list <- remove list, list 1:num/raw <- copy list ] @@ -405,10 +405,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color list <- push 15, list list <- push 14, list list <- push 13, list - 1:&:duplex-list:char/raw <- copy list # save list run [ - local-scope - list:&:duplex-list:char <- copy 1:&:duplex-list:char/raw # restore list # delete 16 onwards # first pointer: to the third element list2:&:duplex-list:char <- next list @@ -439,10 +436,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color list <- push 15, list list <- push 14, list list <- push 13, list - 1:&:duplex-list:char/raw <- copy list # save list run [ - local-scope - list:&:duplex-list:char <- copy 1:&:duplex-list:char/raw # restore list # delete 15, 16 and 17 # start pointer: to the second element list2:&:duplex-list:char <- next list @@ -474,10 +468,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color list:&:duplex-list:char <- push 15, 0 list <- push 14, list list <- push 13, list - 1:&:duplex-list:char/raw <- copy list # save list run [ - local-scope - list:&:duplex-list:char <- copy 1:&:duplex-list:char/raw # restore list # delete between first and second element (i.e. nothing) list2:&:duplex-list:char <- next list remove-between list, list2 @@ -507,10 +498,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color list <- push 15, list list <- push 14, list list <- push 13, list - 1:&:duplex-list:char/raw <- copy list # save list run [ - local-scope - list:&:duplex-list:char <- copy 1:&:duplex-list:char/raw # restore list # remove the third element and beyond list2:&:duplex-list:char <- next list remove-between list2, 0 -- cgit 1.4.1-2-gfad0