Repository: gleam-lang/gleam (rust)

Issue:
extract variable does not insert `_` for first arg when extracting from a pipe
```gleam
dict.get(d, key)
|> result.unwrap(0)
```
on the `unwrap` yields
```gleam
  let value = result.unwrap(0)
  dict.get(d, key)
  |> value
```
which does not compile. Should be `value = result.unwrap(_, 0)`.

Pull request:
Make sure a pipeline step cannot be extracted as a variable
This PR closes #4134

Patch:
diff --git a/CHANGELOG.md b/CHANGELOG.md
index d50956ef1..d84a68802 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -162,3 +162,7 @@
 - Fixed a typo in the error message when trying to import a test module into an
   application module.
   ([John Strunk](https://github.com/jrstrunk))
+
+- Fixed a bug where the "Extract variable" code action would erroneously extract
+  a pipeline step as a variable.
+  ([Giacomo Cavalieri](https://github.com/giacomocavalieri))
diff --git a/compiler-core/src/language_server/code_action.rs b/compiler-core/src/language_server/code_action.rs
index a6285f248..dbf7a197b 100644
--- a/compiler-core/src/language_server/code_action.rs
+++ b/compiler-core/src/language_server/code_action.rs
@@ -2696,10 +2696,12 @@ pub struct ExtractVariable<'a> {
     latest_statement: Option<SrcSpan>,
 }
 
-#[derive(PartialEq, Eq, Copy, Clone)]
+#[derive(PartialEq, Eq, Copy, Clone, Debug)]
 enum ExtractVariablePosition {
     InsideCaptureBody,
     TopLevelStatement,
+    /// This is when we're on the call on the right hand side of a pipe `|>`
+    PipelineCall,
 }
 
 impl<'a> ExtractVariable<'a> {
@@ -2753,6 +2755,23 @@ impl<'a> ExtractVariable<'a> {
             .push_to(&mut action);
         action
     }
+
+    fn at_position<F>(&mut self, position: ExtractVariablePosition, fun: F)
+    where
+        F: Fn(&mut Self),
+    {
+        self.at_optional_position(Some(position), fun);
+    }
+
+    fn at_optional_position<F>(&mut self, position: Option<ExtractVariablePosition>, fun: F)
+    where
+        F: Fn(&mut Self),
+    {
+        let previous_position = self.position;
+        self.position = position;
+        fun(self);
+        self.position = previous_position;
+    }
 }
 
 impl<'ast> ast::visit::Visit<'ast> for ExtractVariable<'ast> {
@@ -2764,10 +2783,28 @@ impl<'ast> ast::visit::Visit<'ast> for ExtractVariable<'ast> {
             self.latest_statement = Some(stmt.location());
         }
 
-        let previous_position = self.position;
-        self.position = Some(ExtractVariablePosition::TopLevelStatement);
-        ast::visit::visit_typed_statement(self, stmt);
-        self.position = previous_position;
+        self.at_position(ExtractVariablePosition::TopLevelStatement, |this| {
+            ast::visit::visit_typed_statement(this, stmt);
+        });
+    }
+
+    fn visit_typed_expr_pipeline(
+        &mut self,
+        _location: &'ast SrcSpan,
+        assignments: &'ast [ast::TypedPipelineAssignment],
+        finally: &'ast TypedExpr,
+    ) {
+        // When visiting the assignments or the final pipeline call we want to
+        // keep track of out position so that we can avoid extracting those.
+        for assignment in assignments {
+            self.at_position(ExtractVariablePosition::PipelineCall, |this| {
+                this.visit_typed_pipeline_assignment(assignment);
+            });
+        }
+
+        self.at_position(ExtractVariablePosition::PipelineCall, |this| {
+            this.visit_typed_expr(finally)
+        });
     }
 
     fn visit_typed_expr(&mut self, expr: &'ast TypedExpr) {
@@ -2786,32 +2823,37 @@ impl<'ast> ast::visit::Visit<'ast> for ExtractVariable<'ast> {
         // // into:
         //
         // pub fn main() {
-        //   let value = 1
-        //   let wibble = value
+        //   let int = 1
+        //   let wibble = int
         // }
         // ```
         //
         // Not all that useful!
         //
-        if self.position != Some(ExtractVariablePosition::TopLevelStatement)
-            && within(self.params.range, expr_range)
-        {
-            match expr {
-                // We don't extract variables, they're already good.
-                // And we don't extract module selects by themselves but always
-                // want to consider those as part of a function call.
-                TypedExpr::Var { .. } | TypedExpr::ModuleSelect { .. } => (),
-                _ => {
-                    self.selected_expression = Some(expr_location);
-                    self.statement_before_selected_expression = self.latest_statement;
+        match self.position {
+            Some(
+                ExtractVariablePosition::TopLevelStatement | ExtractVariablePosition::PipelineCall,
+            ) => (),
+
+            None | Some(ExtractVariablePosition::InsideCaptureBody) => {
+                if within(self.params.range, expr_range) {
+                    match expr {
+                        // We don't extract variables, they're already good.
+                        // And we don't extract module selects by themselves but always
+                        // want to consider those as part of a function call.
+                        TypedExpr::Var { .. } | TypedExpr::ModuleSelect { .. } => (),
+                        _ => {
+                            self.selected_expression = Some(expr_location);
+                            self.statement_before_selected_expression = self.latest_statement;
+                        }
+                    }
                 }
             }
-        }
+        };
 
-        let previous_position = self.position;
-        self.position = None;
-        ast::visit::visit_typed_expr(self, expr);
-        self.position = previous_position;
+        self.at_optional_position(None, |this| {
+            ast::visit::visit_typed_expr(this, expr);
+        });
     }
 
     fn visit_typed_expr_fn(
@@ -2823,8 +2865,7 @@ impl<'ast> ast::visit::Visit<'ast> for ExtractVariable<'ast> {
         body: &'ast Vec1<TypedStatement>,
         return_annotation: &'ast Option<ast::TypeAst>,
     ) {
-        let previous_position = self.position;
-        self.position = match kind {
+        let position = match kind {
             // If a fn is a capture `int.wibble(1, _)` its body will consist of
             // just a single expression statement. When visiting we must record
             // we're inside a capture body.
@@ -2833,8 +2874,18 @@ impl<'ast> ast::visit::Visit<'ast> for ExtractVariable<'ast> {
                 self.position
             }
         };
-        ast::visit::visit_typed_expr_fn(self, location, type_, kind, args, body, return_annotation);
-        self.position = previous_position;
+
+        self.at_optional_position(position, |this| {
+            ast::visit::visit_typed_expr_fn(
+                this,
+                location,
+                type_,
+                kind,
+                args,
+                body,
+                return_annotation,
+            );
+        });
     }
 
     // We don't want to offer the action if the cursor is over some invalid


Test patch:
diff --git a/compiler-core/src/language_server/tests/action.rs b/compiler-core/src/language_server/tests/action.rs
index a2596dfd9..b0fbe13af 100644
--- a/compiler-core/src/language_server/tests/action.rs
+++ b/compiler-core/src/language_server/tests/action.rs
@@ -4030,6 +4030,38 @@ fn extract_variable_does_not_extract_a_variable() {
     );
 }
 
+#[test]
+fn extract_variable_does_not_extract_an_entire_pipeline_step() {
+    assert_no_code_actions!(
+        EXTRACT_VARIABLE,
+        r#"pub fn main() {
+    [1, 2, 3]
+    |> map(todo)
+    |> map(todo)
+}
+
+fn map(list, fun) { todo }
+"#,
+        find_position_of("map").to_selection()
+    );
+}
+
+#[test]
+fn extract_variable_does_not_extract_the_last_pipeline_step() {
+    assert_no_code_actions!(
+        EXTRACT_VARIABLE,
+        r#"pub fn main() {
+    [1, 2, 3]
+    |> map(todo)
+    |> map(todo)
+}
+
+fn map(list, fun) { todo }
+"#,
+        find_position_of("map").to_selection()
+    );
+}
+
 #[test]
 fn extract_variable_2() {
     assert_code_action!(