From 0660dd10d203cba4069b48d00d02ec9935a916f0 Mon Sep 17 00:00:00 2001
From: Florian Diebold <flodiebold@gmail.com>
Date: Sun, 15 Mar 2020 14:37:30 +0100
Subject: Fix performance problem

---
 crates/ra_mbe/src/mbe_expander.rs | 67 +++++++++++++++++++++------------------
 crates/ra_mbe/src/tests.rs        |  2 +-
 2 files changed, 37 insertions(+), 32 deletions(-)

(limited to 'crates')

diff --git a/crates/ra_mbe/src/mbe_expander.rs b/crates/ra_mbe/src/mbe_expander.rs
index 5fb8414b3..1328e4349 100644
--- a/crates/ra_mbe/src/mbe_expander.rs
+++ b/crates/ra_mbe/src/mbe_expander.rs
@@ -11,40 +11,45 @@ use rustc_hash::FxHashMap;
 use crate::{ExpandError, ExpandResult};
 
 pub(crate) fn expand(rules: &crate::MacroRules, input: &tt::Subtree) -> ExpandResult<tt::Subtree> {
-    let (mut result, mut unmatched_tokens, mut unmatched_patterns, mut err) = (
-        tt::Subtree::default(),
-        usize::max_value(),
-        usize::max_value(),
-        Some(ExpandError::NoMatchingRule),
-    );
-    for rule in &rules.rules {
-        let ((res, tokens, patterns), e) = expand_rule(rule, input);
-        if e.is_none() {
+    expand_rules(&rules.rules, input)
+}
+
+fn expand_rules(rules: &[crate::Rule], input: &tt::Subtree) -> ExpandResult<tt::Subtree> {
+    let mut match_: Option<(matcher::Match, &crate::Rule)> = None;
+    let mut err = Some(ExpandError::NoMatchingRule);
+    for rule in rules {
+        let (new_match, bindings_err) = matcher::match_(&rule.lhs, input);
+        if bindings_err.is_none() {
             // if we find a rule that applies without errors, we're done
-            return (res, None);
+            eprintln!("match without errors: {:?}", new_match);
+            let (res, transcribe_err) = transcriber::transcribe(&rule.rhs, &new_match.bindings);
+            eprintln!("transcribe_err = {:?}", transcribe_err);
+            if transcribe_err.is_none() {
+                return (res, None);
+            }
         }
         // use the rule if we matched more tokens, or had fewer patterns left
-        if tokens < unmatched_tokens || tokens == unmatched_tokens && patterns < unmatched_patterns
-        {
-            result = res;
-            err = e;
-            unmatched_tokens = tokens;
-            unmatched_patterns = patterns;
+        if let Some((prev_match, _)) = &match_ {
+            if new_match.unmatched_tokens < prev_match.unmatched_tokens
+                || new_match.unmatched_tokens == prev_match.unmatched_tokens
+                    && new_match.unmatched_patterns < prev_match.unmatched_patterns
+                || err.is_some() && bindings_err.is_none()
+            {
+                match_ = Some((new_match, rule));
+                err = bindings_err;
+            }
+        } else {
+            match_ = Some((new_match, rule));
+            err = bindings_err;
         }
     }
-    (result, err)
-}
-
-fn expand_rule(
-    rule: &crate::Rule,
-    input: &tt::Subtree,
-) -> ExpandResult<(tt::Subtree, usize, usize)> {
-    let (match_result, bindings_err) = matcher::match_(&rule.lhs, input);
-    let (res, transcribe_err) = transcriber::transcribe(&rule.rhs, &match_result.bindings);
-    (
-        (res, match_result.unmatched_tokens, match_result.unmatched_patterns),
-        bindings_err.or(transcribe_err),
-    )
+    if let Some((match_, rule)) = match_ {
+        // if we got here, there was no match without errors
+        let (result, transcribe_err) = transcriber::transcribe(&rule.rhs, &match_.bindings);
+        (result, err.or(transcribe_err))
+    } else {
+        (tt::Subtree::default(), err)
+    }
 }
 
 /// The actual algorithm for expansion is not too hard, but is pretty tricky.
@@ -167,7 +172,7 @@ mod tests {
         let (invocation_tt, _) =
             ast_to_token_tree(&macro_invocation.token_tree().unwrap()).unwrap();
 
-        let expanded = expand_rule(&rules.rules[0], &invocation_tt);
-        ((expanded.0).0, expanded.1)
+        let expanded = expand_rules(&rules.rules, &invocation_tt);
+        (expanded.0, expanded.1)
     }
 }
diff --git a/crates/ra_mbe/src/tests.rs b/crates/ra_mbe/src/tests.rs
index 4d3140fa9..faf88c1b1 100644
--- a/crates/ra_mbe/src/tests.rs
+++ b/crates/ra_mbe/src/tests.rs
@@ -1663,5 +1663,5 @@ fn test_expand_bad_literal() {
         macro_rules! foo { ($i:literal) => {}; }
     "#,
     )
-    .assert_expand_err(r#"foo!(&k");"#, &ExpandError::NoMatchingRule);
+    .assert_expand_err(r#"foo!(&k");"#, &ExpandError::BindingError("".to_string()));
 }
-- 
cgit v1.2.3