2015-01-31 05:29:04 -06:00
|
|
|
// Copyright 2015 The Rust Project Developers. See the COPYRIGHT
|
|
|
|
// file at the top-level directory of this distribution and at
|
|
|
|
// http://rust-lang.org/COPYRIGHT.
|
|
|
|
//
|
|
|
|
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
|
|
|
|
// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
|
|
|
|
// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
|
|
|
|
// option. This file may not be copied, modified, or distributed
|
|
|
|
// except according to those terms.
|
|
|
|
|
|
|
|
#![feature(core,unboxed_closures)]
|
|
|
|
|
2015-02-12 09:29:52 -06:00
|
|
|
use std::marker::PhantomData;
|
2015-01-31 05:29:04 -06:00
|
|
|
|
2015-10-07 17:11:25 -05:00
|
|
|
// An erroneous variant of `run-pass/unboxed_closures-infer-recursive-fn.rs`
|
2015-01-31 05:29:04 -06:00
|
|
|
// where we attempt to perform mutation in the recursive function. This fails to compile
|
|
|
|
// because it winds up requiring `FnMut` which enforces linearity.
|
|
|
|
|
|
|
|
struct YCombinator<F,A,R> {
|
|
|
|
func: F,
|
2015-02-12 09:29:52 -06:00
|
|
|
marker: PhantomData<(A,R)>,
|
2015-01-31 05:29:04 -06:00
|
|
|
}
|
|
|
|
|
|
|
|
impl<F,A,R> YCombinator<F,A,R> {
|
|
|
|
fn new(f: F) -> YCombinator<F,A,R> {
|
2015-02-12 09:29:52 -06:00
|
|
|
YCombinator { func: f, marker: PhantomData }
|
2015-01-31 05:29:04 -06:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
impl<A,R,F : FnMut(&mut FnMut(A) -> R, A) -> R> FnMut<(A,)> for YCombinator<F,A,R> {
|
|
|
|
extern "rust-call" fn call_mut(&mut self, (arg,): (A,)) -> R {
|
|
|
|
(self.func)(self, arg)
|
|
|
|
//~^ ERROR cannot borrow `*self` as mutable more than once at a time
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-03-11 09:08:33 -05:00
|
|
|
impl<A,R,F : FnMut(&mut FnMut(A) -> R, A) -> R> FnOnce<(A,)> for YCombinator<F,A,R> {
|
|
|
|
type Output = R;
|
|
|
|
extern "rust-call" fn call_once(mut self, args: (A,)) -> R {
|
|
|
|
self.call_mut(args)
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-01-31 05:29:04 -06:00
|
|
|
fn main() {
|
|
|
|
let mut counter = 0;
|
|
|
|
let factorial = |recur: &mut FnMut(u32) -> u32, arg: u32| -> u32 {
|
|
|
|
counter += 1;
|
|
|
|
if arg == 0 {1} else {arg * recur(arg-1)}
|
|
|
|
};
|
|
|
|
let mut factorial: YCombinator<_,u32,u32> = YCombinator::new(factorial);
|
|
|
|
let mut r = factorial(10);
|
|
|
|
assert_eq!(3628800, r);
|
|
|
|
}
|