Skip to content

Commit 72cdbfc

Browse files
committed
---
yaml --- r: 101275 b: refs/heads/snap-stage3 c: 999d55d h: refs/heads/master i: 101273: 72deea7 101271: 3d68890 v: v3
1 parent 4ad66b2 commit 72cdbfc

File tree

2 files changed

+30
-1
lines changed

2 files changed

+30
-1
lines changed

[refs]

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
---
22
refs/heads/master: e3b1f3c443c048913e2d573fcc5a9c2be3484a78
33
refs/heads/snap-stage1: e33de59e47c5076a89eadeb38f4934f58a3618a6
4-
refs/heads/snap-stage3: 2cb83fdd7ea4e76d4b1c830a97480521cc405625
4+
refs/heads/snap-stage3: 999d55d5f6e229b8c1118ac35c8cbf3b9c59e3a1
55
refs/heads/try: a97642026c18a624ff6ea01075dd9550f8ed07ff
66
refs/tags/release-0.1: 1f5c5126e96c79d22cb7862f75304136e204f105
77
refs/heads/ndm: f3868061cd7988080c30d6d5bf352a5a5fe2460b
Lines changed: 29 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,29 @@
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+
}

0 commit comments

Comments
 (0)