2018-08-30 07:18:55 -05:00
|
|
|
// run-pass
|
2019-05-21 22:52:47 -05:00
|
|
|
|
2018-09-25 16:51:35 -05:00
|
|
|
#![allow(unused_mut)]
|
2019-05-21 22:52:47 -05:00
|
|
|
|
|
|
|
// Check that when `?` is followed by what looks like a Kleene operator (?, +, and *)
|
|
|
|
// then that `?` is not interpreted as a separator. In other words, `$(pat)?+` matches `pat +`
|
|
|
|
// or `+` but does not match `pat` or `pat ? pat`.
|
2018-01-29 16:26:11 -06:00
|
|
|
|
2018-08-16 02:36:11 -05:00
|
|
|
// edition:2018
|
2018-06-15 21:49:00 -05:00
|
|
|
|
2018-01-18 21:17:27 -06:00
|
|
|
macro_rules! foo {
|
2019-05-21 22:52:47 -05:00
|
|
|
// Check for `?`.
|
|
|
|
($($a:ident)? ? $num:expr) => {
|
|
|
|
foo!($($a)? ; $num);
|
|
|
|
};
|
|
|
|
// Check for `+`.
|
|
|
|
($($a:ident)? + $num:expr) => {
|
|
|
|
foo!($($a)? ; $num);
|
|
|
|
};
|
|
|
|
// Check for `*`.
|
|
|
|
($($a:ident)? * $num:expr) => {
|
|
|
|
foo!($($a)? ; $num);
|
|
|
|
};
|
|
|
|
// Check for `;`, not a kleene operator.
|
|
|
|
($($a:ident)? ; $num:expr) => {
|
2018-01-29 16:26:11 -06:00
|
|
|
let mut x = 0;
|
|
|
|
|
|
|
|
$(
|
|
|
|
x += $a;
|
2019-05-21 22:52:47 -05:00
|
|
|
)?
|
2018-01-29 16:26:11 -06:00
|
|
|
|
|
|
|
assert_eq!(x, $num);
|
2019-05-21 22:52:47 -05:00
|
|
|
};
|
2018-01-18 21:17:27 -06:00
|
|
|
}
|
|
|
|
|
|
|
|
pub fn main() {
|
2018-01-29 16:26:11 -06:00
|
|
|
let a = 1;
|
|
|
|
|
2019-05-21 22:52:47 -05:00
|
|
|
// Accept 0 repetitions.
|
2018-01-29 16:26:11 -06:00
|
|
|
foo!( ; 0);
|
2019-05-21 22:52:47 -05:00
|
|
|
foo!( + 0);
|
|
|
|
foo!( * 0);
|
|
|
|
foo!( ? 0);
|
|
|
|
|
|
|
|
// Accept 1 repetition.
|
2018-01-29 16:26:11 -06:00
|
|
|
foo!(a ; 1);
|
2019-05-21 22:52:47 -05:00
|
|
|
foo!(a + 1);
|
|
|
|
foo!(a * 1);
|
|
|
|
foo!(a ? 1);
|
2018-01-18 21:17:27 -06:00
|
|
|
}
|