about summary refs log tree commit diff stats
path: root/065duplex_list.mu
diff options
context:
space:
mode:
Diffstat (limited to '065duplex_list.mu')
-rw-r--r--065duplex_list.mu12
1 files changed, 6 insertions, 6 deletions
diff --git a/065duplex_list.mu b/065duplex_list.mu
index ff588120..02e1462d 100644
--- a/065duplex_list.mu
+++ b/065duplex_list.mu
@@ -8,7 +8,7 @@ container duplex-list [
 
 # result:address:duplex-list <- push-duplex x:location, in:address:duplex-list
 recipe push-duplex [
-  default-space:address:array:location <- new location:type, 30:literal
+  new-default-space
   x:location <- next-ingredient
   in:address:duplex-list <- next-ingredient
   result:address:duplex-list <- new duplex-list:type
@@ -24,7 +24,7 @@ recipe push-duplex [
 
 # result:location <- first-duplex in:address:duplex-list
 recipe first-duplex [
-  default-space:address:array:location <- new location:type, 30:literal
+  new-default-space
   in:address:duplex-list <- next-ingredient
   reply-unless in:address:duplex-list, 0:literal
   result:location <- get in:address:duplex-list/deref, value:offset
@@ -33,7 +33,7 @@ recipe first-duplex [
 
 # result:address:duplex-list <- next-duplex in:address:duplex-list
 recipe next-duplex [
-  default-space:address:array:location <- new location:type, 30:literal
+  new-default-space
   in:address:duplex-list <- next-ingredient
   reply-unless in:address:duplex-list, 0:literal
   result:address:duplex-list <- get in:address:duplex-list/deref, next:offset
@@ -42,7 +42,7 @@ recipe next-duplex [
 
 # result:address:duplex-list <- prev-duplex in:address:duplex-list
 recipe prev-duplex [
-  default-space:address:array:location <- new location:type, 30:literal
+  new-default-space
   in:address:duplex-list <- next-ingredient
   reply-unless in:address:duplex-list, 0:literal
   result:address:duplex-list <- get in:address:duplex-list/deref, prev:offset
@@ -95,7 +95,7 @@ scenario duplex-list-handling [
 # l:address:duplex-list <- insert-duplex x:location, in:address:duplex-list
 # Inserts 'x' after 'in'. Returns some pointer into the list.
 recipe insert-duplex [
-  default-space:address:array:location <- new location:type, 30:literal
+  new-default-space
   x:location <- next-ingredient
   in:address:duplex-list <- next-ingredient
   new-node:address:duplex-list <- new duplex-list:type
@@ -237,7 +237,7 @@ scenario inserting-after-start-of-duplex-list [
 # Returns null if and only if list is empty. Beware: in that case any pointers
 # to the head are now invalid.
 recipe remove-duplex [
-  default-space:address:array:location <- new location:type, 30:literal
+  new-default-space
   in:address:duplex-list <- next-ingredient
   # if 'in' is null, return
   reply-unless in:address:duplex-list, in:address:duplex-list