---

yaml
---
r: 31732
b: refs/heads/dist-snap
c: bc6ba6b
h: refs/heads/master
v: v3

Author: eholk

[refs]

@@ -7,6 +7,6 @@ refs/tags/release-0.1: 1f5c5126e96c79d22cb7862f75304136e204f105
 refs/heads/ndm: f3868061cd7988080c30d6d5bf352a5a5fe2460b
 refs/heads/try2: d0c6ce338884ee21843f4b40bf6bf18d222ce5df
 refs/heads/incoming: d9317a174e434d4c99fc1a37fd7dc0d2f5328d37
-refs/heads/dist-snap: 802ea5d57e8cd4cd12e1a0e25c446b90be4a6a06
+refs/heads/dist-snap: bc6ba6b09174fdd1feaee1ce011572ba6eb1986a
 refs/tags/release-0.2: c870d2dffb391e14efb05aa27898f1f6333a9596
 refs/tags/release-0.3: b5f0d0f648d9a6153664837026ba1be43d3e2503

branches/dist-snap/src/test/run-pass/pipe-presentation-examples.rs

@@ -0,0 +1,169 @@
+// Examples from Eric's internship final presentation.
+//
+// Code is easier to write in emacs, and it's good to be sure all the
+// code samples compile (or not) as they should.
+
+import double_buffer::client::*;
+import double_buffer::give_buffer;
+
+macro_rules! select_if {
+    {
+        $index:expr,
+        $count:expr,
+        $port:path => [
+            $($message:path$(($($x: ident),+))dont_type_this*
+              -> $next:ident $e:expr),+
+        ],
+        $( $ports:path => [
+            $($messages:path$(($($xs: ident),+))dont_type_this*
+              -> $nexts:ident $es:expr),+
+        ], )*
+    } => {
+        log_syntax!{select_if1};
+        if $index == $count {
+            match move pipes::try_recv($port) {
+              $(some($message($($(copy $x,)+)* next)) => {
+                // FIXME (#2329) we really want move out of enum here.
+                let $next = unsafe { let x <- *ptr::addr_of(next); x };
+                $e
+              })+
+              _ => fail
+            }
+        } else {
+            select_if!{
+                $index,
+                $count + 1,
+                $( $ports => [
+                    $($messages$(($($xs),+))dont_type_this*
+                      -> $nexts $es),+
+                ], )*
+            }
+        }
+    };
+
+    {
+        $index:expr,
+        $count:expr,
+    } => {
+        log_syntax!{select_if2};
+        fail
+    }
+}
+
+macro_rules! select {
+    {
+        $( $port:path => {
+            $($message:path$(($($x: ident),+))dont_type_this*
+              -> $next:ident $e:expr),+
+        } )+
+    } => {
+        let index = pipes::selecti([$(($port).header()),+]/_);
+        log_syntax!{select};
+        log_syntax!{
+        select_if!{index, 0, $( $port => [
+            $($message$(($($x),+))dont_type_this* -> $next $e),+
+        ], )+}
+        };
+        select_if!{index, 0, $( $port => [
+            $($message$(($($x),+))dont_type_this* -> $next $e),+
+        ], )+}
+    }
+}
+
+// Types and protocols
+struct Buffer {
+    foo: ();
+
+    drop { }
+}
+
+proto! double_buffer {
+    acquire:send {
+        request -> wait_buffer
+    }
+
+    wait_buffer:recv {
+        give_buffer(Buffer) -> release
+    }
+
+    release:send {
+        release(Buffer) -> acquire
+    }
+}
+
+// Code examples
+fn render(_buffer: &Buffer) {
+    // A dummy function.
+}
+
+fn draw_frame(+channel: double_buffer::client::acquire) {
+    let channel = request(channel);
+    select! {
+        channel => {
+            give_buffer(buffer) -> channel {
+                render(&buffer);
+                release(channel, move buffer)
+            }
+        }
+    };
+}
+
+fn draw_two_frames(+channel: double_buffer::client::acquire) {
+    let channel = request(channel);
+    let channel = select! {
+        channel => {
+            give_buffer(buffer) -> channel {
+                render(&buffer);
+                release(channel, move buffer)
+            }
+        }
+    };
+    let channel = request(channel);
+    select! {
+        channel => {
+            give_buffer(buffer) -> channel {
+                render(&buffer);
+                release(channel, move buffer)
+            }
+        }
+    };
+}
+
+#[cfg(bad1)]
+fn draw_two_frames_bad1(+channel: double_buffer::client::acquire) {
+    let channel = request(channel);
+    let channel = select! {
+        channel => {
+            give_buffer(buffer) -> channel {
+                render(&buffer);
+                channel
+            }
+        }
+    };
+    let channel = request(channel);
+    select! {
+        channel => {
+            give_buffer(buffer) -> channel {
+                render(&buffer);
+                release(channel, move buffer)
+            }
+        }
+    };
+}
+
+#[cfg(bad2)]
+fn draw_two_frames_bad2(+channel: double_buffer::client::acquire) {
+    let channel = request(channel);
+    select! {
+        channel => {
+            give_buffer(buffer) -> channel {
+                render(&buffer);
+                release(channel, move buffer);
+                render(&buffer);
+                release(channel, move buffer);
+            }
+        }
+    };
+}
+
+fn main() { }