src/test/run-pass/vec-matching-fold.rs

   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 fn foldl<T,U:Clone>(values: &[T],
  12                     initial: U,
  13                     function: |partial: U, element: &T| -> U)
  14                     -> U {
  15     match values {
  16         [ref head, ..tail] =>
  17             foldl(tail, function(initial, head), function),
  18         [] => initial.clone()
  19     }
  20 }
  21
  22 fn foldr<T,U:Clone>(values: &[T],
  23                     initial: U,
  24                     function: |element: &T, partial: U| -> U)
  25                     -> U {
  26     match values {
  27         [..head, ref tail] =>
  28             foldr(head, function(tail, initial), function),
  29         [] => initial.clone()
  30     }
  31 }
  32
  33 pub fn main() {
  34     let x = [1i, 2, 3, 4, 5];
  35
  36     let product = foldl(x, 1i, |a, b| a * *b);
  37     assert_eq!(product, 120);
  38
  39     let sum = foldr(x, 0i, |a, b| *a + b);
  40     assert_eq!(sum, 15);
  41 }