Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fix ^2 X ^2 (Util)

  • Loading branch information...
commit 212ba5ba67b3952dcd004e1b1b0263f8c3276a0d 1 parent af607ad
@sorear authored
Showing with 4 additions and 0 deletions.
  1. +2 −0  lib/Builtins.cs
  2. +2 −0  test2.pl
View
2  lib/Builtins.cs
@@ -1817,6 +1817,7 @@ class CrossSource: ItemSource {
public static Frame MEZip(Frame th, bool with, Variable[] pcl) {
Frame fr = th.MakeChild(null, CommonMEMap_I, Kernel.AnyP);
+ Kernel.SetTopFrame(fr);
fr.lexi0 = 0;
fr.lex2 = ExtractWith(with, ref pcl);
fr.lex0 = new ZipSource(pcl);
@@ -1826,6 +1827,7 @@ class CrossSource: ItemSource {
public static Frame MECross(Frame th, bool with, Variable[] pcl) {
Frame fr = th.MakeChild(null, CommonMEMap_I, Kernel.AnyP);
+ Kernel.SetTopFrame(fr);
fr.lexi0 = 0;
fr.lex2 = ExtractWith(with, ref pcl);
fr.lex0 = new CrossSource(pcl);
View
2  test2.pl
@@ -180,6 +180,8 @@
is foo([1,2,4]), 3, '@y is copy works with non-flatteny values';
}
+lives_ok { ^2 X ^2 }, 'X works on Ranges';
+
#is $?ORIG.substr(0,5), '# vim', '$?ORIG works';
# {
Please sign in to comment.
Something went wrong with that request. Please try again.