File tree Expand file tree Collapse file tree 2 files changed +30
-1
lines changed
branches/snap-stage3/src/test/run-pass Expand file tree Collapse file tree 2 files changed +30
-1
lines changed Original file line number Diff line number Diff line change 1
1
---
2
2
refs/heads/master: e3b1f3c443c048913e2d573fcc5a9c2be3484a78
3
3
refs/heads/snap-stage1: e33de59e47c5076a89eadeb38f4934f58a3618a6
4
- refs/heads/snap-stage3: 2cb83fdd7ea4e76d4b1c830a97480521cc405625
4
+ refs/heads/snap-stage3: 999d55d5f6e229b8c1118ac35c8cbf3b9c59e3a1
5
5
refs/heads/try: a97642026c18a624ff6ea01075dd9550f8ed07ff
6
6
refs/tags/release-0.1: 1f5c5126e96c79d22cb7862f75304136e204f105
7
7
refs/heads/ndm: f3868061cd7988080c30d6d5bf352a5a5fe2460b
Original file line number Diff line number Diff line change
1
+ // Copyright 2014 The Rust Project Developers. See the COPYRIGHT
2
+ // file at the top-level directory of this distribution and at
3
+ // http://rust-lang.org/COPYRIGHT.
4
+ //
5
+ // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
6
+ // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
7
+ // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
8
+ // option. This file may not be copied, modified, or distributed
9
+ // except according to those terms.
10
+
11
+ #[ deriving( Clone ) ]
12
+ enum Noun
13
+ {
14
+ Atom ( int ) ,
15
+ Cell ( ~Noun , ~Noun )
16
+ }
17
+
18
+ fn fas ( n : & Noun ) -> Noun
19
+ {
20
+ match n
21
+ {
22
+ & Cell ( ~Atom ( 2 ) , ~Cell ( ref a, _) ) => ( * * a) . clone ( ) ,
23
+ _ => fail ! ( "Invalid fas pattern" )
24
+ }
25
+ }
26
+
27
+ pub fn main ( ) {
28
+ fas ( & Cell ( ~Atom ( 2 ) , ~Cell ( ~Atom ( 2 ) , ~Atom ( 3 ) ) ) ) ;
29
+ }
You can’t perform that action at this time.
0 commit comments