about summary refs log tree commit diff stats
path: root/065duplex_list.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-10-05 16:43:21 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-10-05 16:44:11 -0700
commitfb5470bc5a25960a0ee1b0757bffe59131978e56 (patch)
treefd260952bf772b9ab145d14323baee609894586c /065duplex_list.mu
parent22a2524048157bfbd65ccf1bf66a89808ba83e0e (diff)
downloadmu-fb5470bc5a25960a0ee1b0757bffe59131978e56.tar.gz
2241 - back to type-checking get-address
Now duplex-list is fully non-generic and only works with characters. But
we'll fix that in a bit..
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 3cf01c47..15aa6a71 100644
--- a/065duplex_list.mu
+++ b/065duplex_list.mu
@@ -6,13 +6,13 @@ container duplex-list [
   prev:address:duplex-list
 ]
 
-# result:address:duplex-list <- push-duplex x:location, in:address:duplex-list
+# result:address:duplex-list <- push-duplex x:character , in:address:duplex-list
 recipe push-duplex [
   local-scope
-  x:location <- next-ingredient
+  x:character <- next-ingredient
   in:address:duplex-list <- next-ingredient
   result:address:duplex-list <- new duplex-list:type
-  val:address:location <- get-address *result, value:offset
+  val:address:character <- get-address *result, value:offset
   *val <- copy x
   next:address:address:duplex-list <- get-address *result, next:offset
   *next <- copy in
@@ -91,14 +91,14 @@ scenario duplex-list-handling [
   ]
 ]
 
-# l:address:duplex-list <- insert-duplex x:location, in:address:duplex-list
+# l:address:duplex-list <- insert-duplex x:character, in:address:duplex-list
 # Inserts 'x' after 'in'. Returns some pointer into the list.
 recipe insert-duplex [
   local-scope
-  x:location <- next-ingredient
+  x:character <- next-ingredient
   in:address:duplex-list <- next-ingredient
   new-node:address:duplex-list <- new duplex-list:type
-  val:address:location <- get-address *new-node, value:offset
+  val:address:character <- get-address *new-node, value:offset
   *val <- copy x
   next-node:address:duplex-list <- get *in, next:offset
   # in.next = new-node