src/test/run-pass/macro-stmt.rs

   1 // Copyright 2012-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 // ignore-pretty - token trees can't pretty print
  12
  13 #![feature(macro_rules)]
  14
  15 macro_rules! myfn(
  16     ( $f:ident, ( $( $x:ident ),* ), $body:block ) => (
  17         fn $f( $( $x : int),* ) -> int $body
  18     )
  19 )
  20
  21 myfn!(add, (a,b), { return a+b; } )
  22
  23 pub fn main() {
  24
  25     macro_rules! mylet(
  26         ($x:ident, $val:expr) => (
  27             let $x = $val;
  28         )
  29     );
  30
  31     mylet!(y, 8i*2);
  32     assert_eq!(y, 16i);
  33
  34     myfn!(mult, (a,b), { a*b } );
  35
  36     assert_eq!(mult(2, add(4,4)), 16);
  37
  38     macro_rules! actually_an_expr_macro (
  39         () => ( 16i )
  40     )
  41
  42     assert_eq!({ actually_an_expr_macro!() }, 16i);
  43
  44 }