[GR-18163] Fix Kernel#eval with non-Ruby shebang

PullRequest: truffleruby/4323
(cherry picked from commit 5669d84)

CHANGELOG.md

@@ -45,6 +45,7 @@ Compatibility:
 * Fix `rb_set_errinfo` and `rb_errinfo` and store an error separately from `$!` (#2890, @andrykonchin).
 * Fix `rb_mutex_synchronize` to not wrap/unwrap result value (#3624, @andrykonchin).
 * Add `StringIO#set_encoding_by_bom` method (#3632, @andrykonchin).
+* Fix `Kernel#eval` to ignore shebang with non-Ruby interpreter (#3623, @andrykonchin).
 
 Performance:
 

spec/ruby/core/kernel/eval_spec.rb

@@ -274,6 +274,26 @@ class EvalSpecs
     eval("").should == nil
   end
 
+  context "with shebang" do
+    it "ignores shebang with ruby interpreter" do
+      pid = eval(<<~CODE.b)
+        #!/usr/bin/env ruby
+        Process.pid
+      CODE
+
+      pid.should == Process.pid
+    end
+
+    it "ignores shebang with non-ruby interpreter" do
+      pid = eval(<<~CODE.b)
+        #!/usr/bin/env puma
+        Process.pid
+      CODE
+
+      pid.should == Process.pid
+    end
+  end
+
   # See language/magic_comment_spec.rb for more magic comments specs
   describe "with a magic encoding comment" do
     it "uses the magic comment encoding for the encoding of literal strings" do

src/main/c/yarp/src/prism.c

@@ -21467,7 +21467,7 @@ pm_parser_init(pm_parser_t *parser, const uint8_t *source, size_t size, const pm
             pm_parser_warn_shebang_carriage_return(parser, parser->start, length);
             if (newline != NULL) parser->encoding_comment_start = newline + 1;
             search_shebang = false;
-        } else {
+        } else if (!parser->parsing_eval) { // See https://github.com/ruby/prism/pull/2952
             search_shebang = true;
         }
     }