1209 - channels painlessly ported over

I've made some tweaks to the arc version. In/out params should be
identical; it was ugly that the in param was a pointer but the out
wasn't.

Still need to check the /same-as-ingredient property.

1 files changed, 92 insertions, 0 deletions

diff --git a/cpp/.traces/channel-initialization b/cpp/.traces/channel-initialization
new file mode 100644
index 00000000..764f83ab
--- /dev/null
+++ b/cpp/.traces/channel-initialization
@@ -0,0 +1,92 @@
+parse/0: instruction: 108
+parse/0:   ingredient: {name: "3", value: 0, type: 0, properties: ["3": "literal", "capacity": ]}
+parse/0:   product: {name: "1", value: 0, type: 2-10, properties: ["1": "address":"channel"]}
+parse/0: instruction: 19
+parse/0:   ingredient: {name: "1", value: 0, type: 2-10, properties: ["1": "address":"channel", "deref": ]}
+parse/0:   ingredient: {name: "first-full", value: 0, type: 0, properties: ["first-full": "offset"]}
+parse/0:   product: {name: "2", value: 0, type: 1, properties: ["2": "integer"]}
+parse/0: instruction: 19
+parse/0:   ingredient: {name: "1", value: 0, type: 2-10, properties: ["1": "address":"channel", "deref": ]}
+parse/0:   ingredient: {name: "first-free", value: 0, type: 0, properties: ["first-free": "offset"]}
+parse/0:   product: {name: "3", value: 0, type: 1, properties: ["3": "integer"]}
+name/0: element first-full of type channel is at offset 0
+name/0: element first-free of type channel is at offset 1
+after-brace/0: recipe test-channel-initialization
+after-brace/0: init-channel ...
+after-brace/0: get ...
+after-brace/0: get ...
+new/0: routine allocated memory from 1000 to 101000
+schedule/0: test-channel-initialization
+run/0: instruction test-channel-initialization/0
+run/0: instruction init-channel/0
+mem/0: array size is 30
+mem/0: new alloc: 1000
+run/0: instruction init-channel/1
+mem/0: new alloc: 1030
+mem/0: storing 1030 in location 1002
+run/0: instruction init-channel/2
+run/0: ingredient 0 is result
+mem/0: location 1002 is 1030
+run/0: ingredient 1 is first-full
+run/0: address to copy is 1030
+run/0: product 0 is 1030
+mem/0: storing 1030 in location 1003
+run/0: instruction init-channel/3
+run/0: ingredient 0 is 0
+mem/0: location 1003 is 1030
+mem/0: storing 0 in location 1030
+run/0: instruction init-channel/4
+run/0: ingredient 0 is result
+mem/0: location 1002 is 1030
+run/0: ingredient 1 is first-free
+run/0: address to copy is 1031
+run/0: product 0 is 1031
+mem/0: storing 1031 in location 1004
+run/0: instruction init-channel/5
+run/0: ingredient 0 is 0
+mem/0: location 1004 is 1031
+mem/0: storing 0 in location 1031
+run/0: instruction init-channel/6
+run/0: product 0 is 3
+mem/0: storing 3 in location 1005
+run/0: instruction init-channel/7
+run/0: ingredient 0 is capacity
+mem/0: location 1005 is 3
+run/0: ingredient 1 is 1
+run/0: product 0 is 4
+mem/0: storing 4 in location 1005
+run/0: instruction init-channel/8
+run/0: ingredient 0 is result
+mem/0: location 1002 is 1030
+run/0: ingredient 1 is data
+run/0: address to copy is 1032
+run/0: product 0 is 1032
+mem/0: storing 1032 in location 1006
+run/0: instruction init-channel/9
+mem/0: location 1005 is 4
+mem/0: array size is 4
+mem/0: new alloc: 1033
+mem/0: location 1006 is 1032
+mem/0: storing 1033 in location 1032
+run/0: instruction init-channel/10
+mem/0: location 1002 is 1030
+run/0: result 0 is 1030
+mem/0: storing 1030 in location 1
+run/0: instruction test-channel-initialization/1
+run/0: ingredient 0 is 1
+mem/0: location 1 is 1030
+run/0: ingredient 1 is first-full
+run/0: address to copy is 1030
+run/0: its type is 1
+mem/0: location 1030 is 0
+run/0: product 0 is 0
+mem/0: storing 0 in location 2
+run/0: instruction test-channel-initialization/2
+run/0: ingredient 0 is 1
+mem/0: location 1 is 1030
+run/0: ingredient 1 is first-free
+run/0: address to copy is 1031
+run/0: its type is 1
+mem/0: location 1031 is 0
+run/0: product 0 is 0
+mem/0: storing 0 in location 3