Fix wrongly scoped pipe variable

Author: GearsDatapacks

compiler-core/src/erlang.rs

@@ -2211,6 +2211,8 @@ fn pipeline<'a>(
         echo(name, location, env)
     };
 
+    let vars = env.current_scope_vars.clone();
+
     let mut prev_local_var_name = None;
     for a in all_assignments {
         match a.value.as_ref() {
@@ -2243,6 +2245,8 @@ fn pipeline<'a>(
         _ => documents.push(expr(finally, env)),
     }
 
+    env.current_scope_vars = vars;
+
     documents.to_doc()
 }
 

compiler-core/src/erlang/tests/pipes.rs

@@ -79,7 +79,7 @@ fn pipe_in_record_update() {
 fn id(x) {
   x
 }
-        
+
 pub fn main(x) {
   X(..x, a: 1 |> id)
 }"
@@ -93,7 +93,7 @@ fn pipe_in_eq() {
         "fn id(x) {
   x
 }
-        
+
 pub fn main() {
     1 == 1 |> id
 }"
@@ -135,3 +135,17 @@ pub fn two(a, b) {
 "#
     );
 }
+
+#[test]
+fn multiple_pipes() {
+    assert_erl!(
+        "
+pub fn main() {
+  1 |> x |> x
+  2 |> x |> x
+}
+
+fn x(x) { x }
+"
+    );
+}

compiler-core/src/erlang/tests/snapshots/gleam_core__erlang__tests__pipes__multiple_pipes.snap

@@ -0,0 +1,34 @@
+---
+source: compiler-core/src/erlang/tests/pipes.rs
+expression: "\npub fn main() {\n  1 |> x |> x\n  2 |> x |> x\n}\n\nfn x(x) { x }\n"
+---
+----- SOURCE CODE
+
+pub fn main() {
+  1 |> x |> x
+  2 |> x |> x
+}
+
+fn x(x) { x }
+
+
+----- COMPILED ERLANG
+-module(my@mod).
+-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
+-define(FILEPATH, "project/test/my/mod.gleam").
+-export([main/0]).
+
+-file("project/test/my/mod.gleam", 7).
+-spec x(J) -> J.
+x(X) ->
+    X.
+
+-file("project/test/my/mod.gleam", 2).
+-spec main() -> integer().
+main() ->
+    _pipe = 1,
+    _pipe@1 = x(_pipe),
+    x(_pipe@1),
+    _pipe@2 = 2,
+    _pipe@3 = x(_pipe@2),
+    x(_pipe@3).

compiler-core/src/erlang/tests/snapshots/gleam_core__erlang__tests__pipes__pipe_in_call.snap

@@ -37,5 +37,5 @@ main() ->
             _pipe@1 = 1,
             two(_pipe@1, 2)
         end,
-        _pipe@1
+        _pipe
     ).

compiler-core/src/erlang/tests/snapshots/gleam_core__erlang__tests__pipes__pipe_in_eq.snap

@@ -1,14 +1,12 @@
 ---
 source: compiler-core/src/erlang/tests/pipes.rs
-assertion_line: 92
-expression: "fn id(x) {\n  x\n}\n        \npub fn main() {\n    1 == 1 |> id\n}"
-snapshot_kind: text
+expression: "fn id(x) {\n  x\n}\n\npub fn main() {\n    1 == 1 |> id\n}"
 ---
 ----- SOURCE CODE
 fn id(x) {
   x
 }
-        
+
 pub fn main() {
     1 == 1 |> id
 }

compiler-core/src/erlang/tests/snapshots/gleam_core__erlang__tests__pipes__pipe_in_record_update.snap

@@ -1,8 +1,6 @@
 ---
 source: compiler-core/src/erlang/tests/pipes.rs
-assertion_line: 74
-expression: "pub type X {\n  X(a: Int, b: Int)\n}\n\nfn id(x) {\n  x\n}\n        \npub fn main(x) {\n  X(..x, a: 1 |> id)\n}"
-snapshot_kind: text
+expression: "pub type X {\n  X(a: Int, b: Int)\n}\n\nfn id(x) {\n  x\n}\n\npub fn main(x) {\n  X(..x, a: 1 |> id)\n}"
 ---
 ----- SOURCE CODE
 pub type X {
@@ -12,7 +10,7 @@ pub type X {
 fn id(x) {
   x
 }
-        
+
 pub fn main(x) {
   X(..x, a: 1 |> id)
 }