src/librustc_expand/mbe/macro_check.rs

   1 //! Checks that meta-variables in macro definition are correctly declared and used.
   2 //!
   3 //! # What is checked
   4 //!
   5 //! ## Meta-variables must not be bound twice
   6 //!
   7 //! ```
   8 //! macro_rules! foo { ($x:tt $x:tt) => { $x }; }
   9 //! ```
  10 //!
  11 //! This check is sound (no false-negative) and complete (no false-positive).
  12 //!
  13 //! ## Meta-variables must not be free
  14 //!
  15 //! ```
  16 //! macro_rules! foo { () => { $x }; }
  17 //! ```
  18 //!
  19 //! This check is also done at macro instantiation but only if the branch is taken.
  20 //!
  21 //! ## Meta-variables must repeat at least as many times as their binder
  22 //!
  23 //! ```
  24 //! macro_rules! foo { ($($x:tt)*) => { $x }; }
  25 //! ```
  26 //!
  27 //! This check is also done at macro instantiation but only if the branch is taken.
  28 //!
  29 //! ## Meta-variables must repeat with the same Kleene operators as their binder
  30 //!
  31 //! ```
  32 //! macro_rules! foo { ($($x:tt)+) => { $($x)* }; }
  33 //! ```
  34 //!
  35 //! This check is not done at macro instantiation.
  36 //!
  37 //! # Disclaimer
  38 //!
  39 //! In the presence of nested macros (a macro defined in a macro), those checks may have false
  40 //! positives and false negatives. We try to detect those cases by recognizing potential macro
  41 //! definitions in RHSes, but nested macros may be hidden through the use of particular values of
  42 //! meta-variables.
  43 //!
  44 //! ## Examples of false positive
  45 //!
  46 //! False positives can come from cases where we don't recognize a nested macro, because it depends
  47 //! on particular values of meta-variables. In the following example, we think both instances of
  48 //! `$x` are free, which is a correct statement if `$name` is anything but `macro_rules`. But when
  49 //! `$name` is `macro_rules`, like in the instantiation below, then `$x:tt` is actually a binder of
  50 //! the nested macro and `$x` is bound to it.
  51 //!
  52 //! ```
  53 //! macro_rules! foo { ($name:ident) => { $name! bar { ($x:tt) => { $x }; } }; }
  54 //! foo!(macro_rules);
  55 //! ```
  56 //!
  57 //! False positives can also come from cases where we think there is a nested macro while there
  58 //! isn't. In the following example, we think `$x` is free, which is incorrect because `bar` is not
  59 //! a nested macro since it is not evaluated as code by `stringify!`.
  60 //!
  61 //! ```
  62 //! macro_rules! foo { () => { stringify!(macro_rules! bar { () => { $x }; }) }; }
  63 //! ```
  64 //!
  65 //! ## Examples of false negative
  66 //!
  67 //! False negatives can come from cases where we don't recognize a meta-variable, because it depends
  68 //! on particular values of meta-variables. In the following examples, we don't see that if `$d` is
  69 //! instantiated with `$` then `$d z` becomes `$z` in the nested macro definition and is thus a free
  70 //! meta-variable. Note however, that if `foo` is instantiated, then we would check the definition
  71 //! of `bar` and would see the issue.
  72 //!
  73 //! ```
  74 //! macro_rules! foo { ($d:tt) => { macro_rules! bar { ($y:tt) => { $d z }; } }; }
  75 //! ```
  76 //!
  77 //! # How it is checked
  78 //!
  79 //! There are 3 main functions: `check_binders`, `check_occurrences`, and `check_nested_macro`. They
  80 //! all need some kind of environment.
  81 //!
  82 //! ## Environments
  83 //!
  84 //! Environments are used to pass information.
  85 //!
  86 //! ### From LHS to RHS
  87 //!
  88 //! When checking a LHS with `check_binders`, we produce (and use) an environment for binders,
  89 //! namely `Binders`. This is a mapping from binder name to information about that binder: the span
  90 //! of the binder for error messages and the stack of Kleene operators under which it was bound in
  91 //! the LHS.
  92 //!
  93 //! This environment is used by both the LHS and RHS. The LHS uses it to detect duplicate binders.
  94 //! The RHS uses it to detect the other errors.
  95 //!
  96 //! ### From outer macro to inner macro
  97 //!
  98 //! When checking the RHS of an outer macro and we detect a nested macro definition, we push the
  99 //! current state, namely `MacroState`, to an environment of nested macro definitions. Each state
 100 //! stores the LHS binders when entering the macro definition as well as the stack of Kleene
 101 //! operators under which the inner macro is defined in the RHS.
 102 //!
 103 //! This environment is a stack representing the nesting of macro definitions. As such, the stack of
 104 //! Kleene operators under which a meta-variable is repeating is the concatenation of the stacks
 105 //! stored when entering a macro definition starting from the state in which the meta-variable is
 106 //! bound.
 107 use crate::mbe::{KleeneToken, TokenTree};
 108
 109 use rustc_data_structures::fx::FxHashMap;
 110 use rustc_session::lint::builtin::META_VARIABLE_MISUSE;
 111 use rustc_session::parse::ParseSess;
 112 use rustc_span::symbol::{kw, sym};
 113 use rustc_span::{symbol::Ident, MultiSpan, Span};
 114 use syntax::ast::NodeId;
 115 use syntax::token::{DelimToken, Token, TokenKind};
 116
 117 use smallvec::SmallVec;
 118
 119 /// Stack represented as linked list.
 120 ///
 121 /// Those are used for environments because they grow incrementally and are not mutable.
 122 enum Stack<'a, T> {
 123     /// Empty stack.
 124     Empty,
 125     /// A non-empty stack.
 126     Push {
 127         /// The top element.
 128         top: T,
 129         /// The previous elements.
 130         prev: &'a Stack<'a, T>,
 131     },
 132 }
 133
 134 impl<'a, T> Stack<'a, T> {
 135     /// Returns whether a stack is empty.
 136     fn is_empty(&self) -> bool {
 137         match *self {
 138             Stack::Empty => true,
 139             _ => false,
 140         }
 141     }
 142
 143     /// Returns a new stack with an element of top.
 144     fn push(&'a self, top: T) -> Stack<'a, T> {
 145         Stack::Push { top, prev: self }
 146     }
 147 }
 148
 149 impl<'a, T> Iterator for &'a Stack<'a, T> {
 150     type Item = &'a T;
 151
 152     // Iterates from top to bottom of the stack.
 153     fn next(&mut self) -> Option<&'a T> {
 154         match *self {
 155             Stack::Empty => None,
 156             Stack::Push { ref top, ref prev } => {
 157                 *self = prev;
 158                 Some(top)
 159             }
 160         }
 161     }
 162 }
 163
 164 impl From<&Stack<'_, KleeneToken>> for SmallVec<[KleeneToken; 1]> {
 165     fn from(ops: &Stack<'_, KleeneToken>) -> SmallVec<[KleeneToken; 1]> {
 166         let mut ops: SmallVec<[KleeneToken; 1]> = ops.cloned().collect();
 167         // The stack is innermost on top. We want outermost first.
 168         ops.reverse();
 169         ops
 170     }
 171 }
 172
 173 /// Information attached to a meta-variable binder in LHS.
 174 struct BinderInfo {
 175     /// The span of the meta-variable in LHS.
 176     span: Span,
 177     /// The stack of Kleene operators (outermost first).
 178     ops: SmallVec<[KleeneToken; 1]>,
 179 }
 180
 181 /// An environment of meta-variables to their binder information.
 182 type Binders = FxHashMap<Ident, BinderInfo>;
 183
 184 /// The state at which we entered a macro definition in the RHS of another macro definition.
 185 struct MacroState<'a> {
 186     /// The binders of the branch where we entered the macro definition.
 187     binders: &'a Binders,
 188     /// The stack of Kleene operators (outermost first) where we entered the macro definition.
 189     ops: SmallVec<[KleeneToken; 1]>,
 190 }
 191
 192 /// Checks that meta-variables are used correctly in a macro definition.
 193 ///
 194 /// Arguments:
 195 /// - `sess` is used to emit diagnostics and lints
 196 /// - `node_id` is used to emit lints
 197 /// - `span` is used when no spans are available
 198 /// - `lhses` and `rhses` should have the same length and represent the macro definition
 199 pub(super) fn check_meta_variables(
 200     sess: &ParseSess,
 201     node_id: NodeId,
 202     span: Span,
 203     lhses: &[TokenTree],
 204     rhses: &[TokenTree],
 205 ) -> bool {
 206     if lhses.len() != rhses.len() {
 207         sess.span_diagnostic.span_bug(span, "length mismatch between LHSes and RHSes")
 208     }
 209     let mut valid = true;
 210     for (lhs, rhs) in lhses.iter().zip(rhses.iter()) {
 211         let mut binders = Binders::default();
 212         check_binders(sess, node_id, lhs, &Stack::Empty, &mut binders, &Stack::Empty, &mut valid);
 213         check_occurrences(sess, node_id, rhs, &Stack::Empty, &binders, &Stack::Empty, &mut valid);
 214     }
 215     valid
 216 }
 217
 218 /// Checks `lhs` as part of the LHS of a macro definition, extends `binders` with new binders, and
 219 /// sets `valid` to false in case of errors.
 220 ///
 221 /// Arguments:
 222 /// - `sess` is used to emit diagnostics and lints
 223 /// - `node_id` is used to emit lints
 224 /// - `lhs` is checked as part of a LHS
 225 /// - `macros` is the stack of possible outer macros
 226 /// - `binders` contains the binders of the LHS
 227 /// - `ops` is the stack of Kleene operators from the LHS
 228 /// - `valid` is set in case of errors
 229 fn check_binders(
 230     sess: &ParseSess,
 231     node_id: NodeId,
 232     lhs: &TokenTree,
 233     macros: &Stack<'_, MacroState<'_>>,
 234     binders: &mut Binders,
 235     ops: &Stack<'_, KleeneToken>,
 236     valid: &mut bool,
 237 ) {
 238     match *lhs {
 239         TokenTree::Token(..) => {}
 240         // This can only happen when checking a nested macro because this LHS is then in the RHS of
 241         // the outer macro. See ui/macros/macro-of-higher-order.rs where $y:$fragment in the
 242         // LHS of the nested macro (and RHS of the outer macro) is parsed as MetaVar(y) Colon
 243         // MetaVar(fragment) and not as MetaVarDecl(y, fragment).
 244         TokenTree::MetaVar(span, name) => {
 245             if macros.is_empty() {
 246                 sess.span_diagnostic.span_bug(span, "unexpected MetaVar in lhs");
 247             }
 248             // There are 3 possibilities:
 249             if let Some(prev_info) = binders.get(&name) {
 250                 // 1. The meta-variable is already bound in the current LHS: This is an error.
 251                 let mut span = MultiSpan::from_span(span);
 252                 span.push_span_label(prev_info.span, "previous declaration".into());
 253                 buffer_lint(sess, span, node_id, "duplicate matcher binding");
 254             } else if get_binder_info(macros, binders, name).is_none() {
 255                 // 2. The meta-variable is free: This is a binder.
 256                 binders.insert(name, BinderInfo { span, ops: ops.into() });
 257             } else {
 258                 // 3. The meta-variable is bound: This is an occurrence.
 259                 check_occurrences(sess, node_id, lhs, macros, binders, ops, valid);
 260             }
 261         }
 262         // Similarly, this can only happen when checking a toplevel macro.
 263         TokenTree::MetaVarDecl(span, name, _kind) => {
 264             if !macros.is_empty() {
 265                 sess.span_diagnostic.span_bug(span, "unexpected MetaVarDecl in nested lhs");
 266             }
 267             if let Some(prev_info) = get_binder_info(macros, binders, name) {
 268                 // Duplicate binders at the top-level macro definition are errors. The lint is only
 269                 // for nested macro definitions.
 270                 sess.span_diagnostic
 271                     .struct_span_err(span, "duplicate matcher binding")
 272                     .span_label(span, "duplicate binding")
 273                     .span_label(prev_info.span, "previous binding")
 274                     .emit();
 275                 *valid = false;
 276             } else {
 277                 binders.insert(name, BinderInfo { span, ops: ops.into() });
 278             }
 279         }
 280         TokenTree::Delimited(_, ref del) => {
 281             for tt in &del.tts {
 282                 check_binders(sess, node_id, tt, macros, binders, ops, valid);
 283             }
 284         }
 285         TokenTree::Sequence(_, ref seq) => {
 286             let ops = ops.push(seq.kleene);
 287             for tt in &seq.tts {
 288                 check_binders(sess, node_id, tt, macros, binders, &ops, valid);
 289             }
 290         }
 291     }
 292 }
 293
 294 /// Returns the binder information of a meta-variable.
 295 ///
 296 /// Arguments:
 297 /// - `macros` is the stack of possible outer macros
 298 /// - `binders` contains the current binders
 299 /// - `name` is the name of the meta-variable we are looking for
 300 fn get_binder_info<'a>(
 301     mut macros: &'a Stack<'a, MacroState<'a>>,
 302     binders: &'a Binders,
 303     name: Ident,
 304 ) -> Option<&'a BinderInfo> {
 305     binders.get(&name).or_else(|| macros.find_map(|state| state.binders.get(&name)))
 306 }
 307
 308 /// Checks `rhs` as part of the RHS of a macro definition and sets `valid` to false in case of
 309 /// errors.
 310 ///
 311 /// Arguments:
 312 /// - `sess` is used to emit diagnostics and lints
 313 /// - `node_id` is used to emit lints
 314 /// - `rhs` is checked as part of a RHS
 315 /// - `macros` is the stack of possible outer macros
 316 /// - `binders` contains the binders of the associated LHS
 317 /// - `ops` is the stack of Kleene operators from the RHS
 318 /// - `valid` is set in case of errors
 319 fn check_occurrences(
 320     sess: &ParseSess,
 321     node_id: NodeId,
 322     rhs: &TokenTree,
 323     macros: &Stack<'_, MacroState<'_>>,
 324     binders: &Binders,
 325     ops: &Stack<'_, KleeneToken>,
 326     valid: &mut bool,
 327 ) {
 328     match *rhs {
 329         TokenTree::Token(..) => {}
 330         TokenTree::MetaVarDecl(span, _name, _kind) => {
 331             sess.span_diagnostic.span_bug(span, "unexpected MetaVarDecl in rhs")
 332         }
 333         TokenTree::MetaVar(span, name) => {
 334             check_ops_is_prefix(sess, node_id, macros, binders, ops, span, name);
 335         }
 336         TokenTree::Delimited(_, ref del) => {
 337             check_nested_occurrences(sess, node_id, &del.tts, macros, binders, ops, valid);
 338         }
 339         TokenTree::Sequence(_, ref seq) => {
 340             let ops = ops.push(seq.kleene);
 341             check_nested_occurrences(sess, node_id, &seq.tts, macros, binders, &ops, valid);
 342         }
 343     }
 344 }
 345
 346 /// Represents the processed prefix of a nested macro.
 347 #[derive(Clone, Copy, PartialEq, Eq)]
 348 enum NestedMacroState {
 349     /// Nothing that matches a nested macro definition was processed yet.
 350     Empty,
 351     /// The token `macro_rules` was processed.
 352     MacroRules,
 353     /// The tokens `macro_rules!` were processed.
 354     MacroRulesNot,
 355     /// The tokens `macro_rules!` followed by a name were processed. The name may be either directly
 356     /// an identifier or a meta-variable (that hopefully would be instantiated by an identifier).
 357     MacroRulesNotName,
 358     /// The keyword `macro` was processed.
 359     Macro,
 360     /// The keyword `macro` followed by a name was processed.
 361     MacroName,
 362     /// The keyword `macro` followed by a name and a token delimited by parentheses was processed.
 363     MacroNameParen,
 364 }
 365
 366 /// Checks `tts` as part of the RHS of a macro definition, tries to recognize nested macro
 367 /// definitions, and sets `valid` to false in case of errors.
 368 ///
 369 /// Arguments:
 370 /// - `sess` is used to emit diagnostics and lints
 371 /// - `node_id` is used to emit lints
 372 /// - `tts` is checked as part of a RHS and may contain macro definitions
 373 /// - `macros` is the stack of possible outer macros
 374 /// - `binders` contains the binders of the associated LHS
 375 /// - `ops` is the stack of Kleene operators from the RHS
 376 /// - `valid` is set in case of errors
 377 fn check_nested_occurrences(
 378     sess: &ParseSess,
 379     node_id: NodeId,
 380     tts: &[TokenTree],
 381     macros: &Stack<'_, MacroState<'_>>,
 382     binders: &Binders,
 383     ops: &Stack<'_, KleeneToken>,
 384     valid: &mut bool,
 385 ) {
 386     let mut state = NestedMacroState::Empty;
 387     let nested_macros = macros.push(MacroState { binders, ops: ops.into() });
 388     let mut nested_binders = Binders::default();
 389     for tt in tts {
 390         match (state, tt) {
 391             (
 392                 NestedMacroState::Empty,
 393                 &TokenTree::Token(Token { kind: TokenKind::Ident(name, false), .. }),
 394             ) => {
 395                 if name == sym::macro_rules {
 396                     state = NestedMacroState::MacroRules;
 397                 } else if name == kw::Macro {
 398                     state = NestedMacroState::Macro;
 399                 }
 400             }
 401             (
 402                 NestedMacroState::MacroRules,
 403                 &TokenTree::Token(Token { kind: TokenKind::Not, .. }),
 404             ) => {
 405                 state = NestedMacroState::MacroRulesNot;
 406             }
 407             (
 408                 NestedMacroState::MacroRulesNot,
 409                 &TokenTree::Token(Token { kind: TokenKind::Ident(..), .. }),
 410             ) => {
 411                 state = NestedMacroState::MacroRulesNotName;
 412             }
 413             (NestedMacroState::MacroRulesNot, &TokenTree::MetaVar(..)) => {
 414                 state = NestedMacroState::MacroRulesNotName;
 415                 // We check that the meta-variable is correctly used.
 416                 check_occurrences(sess, node_id, tt, macros, binders, ops, valid);
 417             }
 418             (NestedMacroState::MacroRulesNotName, &TokenTree::Delimited(_, ref del))
 419             | (NestedMacroState::MacroName, &TokenTree::Delimited(_, ref del))
 420                 if del.delim == DelimToken::Brace =>
 421             {
 422                 let legacy = state == NestedMacroState::MacroRulesNotName;
 423                 state = NestedMacroState::Empty;
 424                 let rest =
 425                     check_nested_macro(sess, node_id, legacy, &del.tts, &nested_macros, valid);
 426                 // If we did not check the whole macro definition, then check the rest as if outside
 427                 // the macro definition.
 428                 check_nested_occurrences(
 429                     sess,
 430                     node_id,
 431                     &del.tts[rest..],
 432                     macros,
 433                     binders,
 434                     ops,
 435                     valid,
 436                 );
 437             }
 438             (
 439                 NestedMacroState::Macro,
 440                 &TokenTree::Token(Token { kind: TokenKind::Ident(..), .. }),
 441             ) => {
 442                 state = NestedMacroState::MacroName;
 443             }
 444             (NestedMacroState::Macro, &TokenTree::MetaVar(..)) => {
 445                 state = NestedMacroState::MacroName;
 446                 // We check that the meta-variable is correctly used.
 447                 check_occurrences(sess, node_id, tt, macros, binders, ops, valid);
 448             }
 449             (NestedMacroState::MacroName, &TokenTree::Delimited(_, ref del))
 450                 if del.delim == DelimToken::Paren =>
 451             {
 452                 state = NestedMacroState::MacroNameParen;
 453                 nested_binders = Binders::default();
 454                 check_binders(
 455                     sess,
 456                     node_id,
 457                     tt,
 458                     &nested_macros,
 459                     &mut nested_binders,
 460                     &Stack::Empty,
 461                     valid,
 462                 );
 463             }
 464             (NestedMacroState::MacroNameParen, &TokenTree::Delimited(_, ref del))
 465                 if del.delim == DelimToken::Brace =>
 466             {
 467                 state = NestedMacroState::Empty;
 468                 check_occurrences(
 469                     sess,
 470                     node_id,
 471                     tt,
 472                     &nested_macros,
 473                     &nested_binders,
 474                     &Stack::Empty,
 475                     valid,
 476                 );
 477             }
 478             (_, ref tt) => {
 479                 state = NestedMacroState::Empty;
 480                 check_occurrences(sess, node_id, tt, macros, binders, ops, valid);
 481             }
 482         }
 483     }
 484 }
 485
 486 /// Checks the body of nested macro, returns where the check stopped, and sets `valid` to false in
 487 /// case of errors.
 488 ///
 489 /// The token trees are checked as long as they look like a list of (LHS) => {RHS} token trees. This
 490 /// check is a best-effort to detect a macro definition. It returns the position in `tts` where we
 491 /// stopped checking because we detected we were not in a macro definition anymore.
 492 ///
 493 /// Arguments:
 494 /// - `sess` is used to emit diagnostics and lints
 495 /// - `node_id` is used to emit lints
 496 /// - `legacy` specifies whether the macro is legacy
 497 /// - `tts` is checked as a list of (LHS) => {RHS}
 498 /// - `macros` is the stack of outer macros
 499 /// - `valid` is set in case of errors
 500 fn check_nested_macro(
 501     sess: &ParseSess,
 502     node_id: NodeId,
 503     legacy: bool,
 504     tts: &[TokenTree],
 505     macros: &Stack<'_, MacroState<'_>>,
 506     valid: &mut bool,
 507 ) -> usize {
 508     let n = tts.len();
 509     let mut i = 0;
 510     let separator = if legacy { TokenKind::Semi } else { TokenKind::Comma };
 511     loop {
 512         // We expect 3 token trees: `(LHS) => {RHS}`. The separator is checked after.
 513         if i + 2 >= n
 514             || !tts[i].is_delimited()
 515             || !tts[i + 1].is_token(&TokenKind::FatArrow)
 516             || !tts[i + 2].is_delimited()
 517         {
 518             break;
 519         }
 520         let lhs = &tts[i];
 521         let rhs = &tts[i + 2];
 522         let mut binders = Binders::default();
 523         check_binders(sess, node_id, lhs, macros, &mut binders, &Stack::Empty, valid);
 524         check_occurrences(sess, node_id, rhs, macros, &binders, &Stack::Empty, valid);
 525         // Since the last semicolon is optional for legacy macros and decl_macro are not terminated,
 526         // we increment our checked position by how many token trees we already checked (the 3
 527         // above) before checking for the separator.
 528         i += 3;
 529         if i == n || !tts[i].is_token(&separator) {
 530             break;
 531         }
 532         // We increment our checked position for the semicolon.
 533         i += 1;
 534     }
 535     i
 536 }
 537
 538 /// Checks that a meta-variable occurrence is valid.
 539 ///
 540 /// Arguments:
 541 /// - `sess` is used to emit diagnostics and lints
 542 /// - `node_id` is used to emit lints
 543 /// - `macros` is the stack of possible outer macros
 544 /// - `binders` contains the binders of the associated LHS
 545 /// - `ops` is the stack of Kleene operators from the RHS
 546 /// - `span` is the span of the meta-variable to check
 547 /// - `name` is the name of the meta-variable to check
 548 fn check_ops_is_prefix(
 549     sess: &ParseSess,
 550     node_id: NodeId,
 551     macros: &Stack<'_, MacroState<'_>>,
 552     binders: &Binders,
 553     ops: &Stack<'_, KleeneToken>,
 554     span: Span,
 555     name: Ident,
 556 ) {
 557     let macros = macros.push(MacroState { binders, ops: ops.into() });
 558     // Accumulates the stacks the operators of each state until (and including when) the
 559     // meta-variable is found. The innermost stack is first.
 560     let mut acc: SmallVec<[&SmallVec<[KleeneToken; 1]>; 1]> = SmallVec::new();
 561     for state in &macros {
 562         acc.push(&state.ops);
 563         if let Some(binder) = state.binders.get(&name) {
 564             // This variable concatenates the stack of operators from the RHS of the LHS where the
 565             // meta-variable was defined to where it is used (in possibly nested macros). The
 566             // outermost operator is first.
 567             let mut occurrence_ops: SmallVec<[KleeneToken; 2]> = SmallVec::new();
 568             // We need to iterate from the end to start with outermost stack.
 569             for ops in acc.iter().rev() {
 570                 occurrence_ops.extend_from_slice(ops);
 571             }
 572             ops_is_prefix(sess, node_id, span, name, &binder.ops, &occurrence_ops);
 573             return;
 574         }
 575     }
 576     buffer_lint(sess, span.into(), node_id, &format!("unknown macro variable `{}`", name));
 577 }
 578
 579 /// Returns whether `binder_ops` is a prefix of `occurrence_ops`.
 580 ///
 581 /// The stack of Kleene operators of a meta-variable occurrence just needs to have the stack of
 582 /// Kleene operators of its binder as a prefix.
 583 ///
 584 /// Consider $i in the following example:
 585 ///
 586 ///     ( $( $i:ident = $($j:ident),+ );* ) => { $($( $i += $j; )+)* }
 587 ///
 588 /// It occurs under the Kleene stack ["*", "+"] and is bound under ["*"] only.
 589 ///
 590 /// Arguments:
 591 /// - `sess` is used to emit diagnostics and lints
 592 /// - `node_id` is used to emit lints
 593 /// - `span` is the span of the meta-variable being check
 594 /// - `name` is the name of the meta-variable being check
 595 /// - `binder_ops` is the stack of Kleene operators for the binder
 596 /// - `occurrence_ops` is the stack of Kleene operators for the occurrence
 597 fn ops_is_prefix(
 598     sess: &ParseSess,
 599     node_id: NodeId,
 600     span: Span,
 601     name: Ident,
 602     binder_ops: &[KleeneToken],
 603     occurrence_ops: &[KleeneToken],
 604 ) {
 605     for (i, binder) in binder_ops.iter().enumerate() {
 606         if i >= occurrence_ops.len() {
 607             let mut span = MultiSpan::from_span(span);
 608             span.push_span_label(binder.span, "expected repetition".into());
 609             let message = &format!("variable '{}' is still repeating at this depth", name);
 610             buffer_lint(sess, span, node_id, message);
 611             return;
 612         }
 613         let occurrence = &occurrence_ops[i];
 614         if occurrence.op != binder.op {
 615             let mut span = MultiSpan::from_span(span);
 616             span.push_span_label(binder.span, "expected repetition".into());
 617             span.push_span_label(occurrence.span, "conflicting repetition".into());
 618             let message = "meta-variable repeats with different Kleene operator";
 619             buffer_lint(sess, span, node_id, message);
 620             return;
 621         }
 622     }
 623 }
 624
 625 fn buffer_lint(sess: &ParseSess, span: MultiSpan, node_id: NodeId, message: &str) {
 626     sess.buffer_lint(&META_VARIABLE_MISUSE, span, node_id, message);
 627 }