Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

bag operation fails and leaks internal state #6243

Closed
p6rt opened this issue May 13, 2017 · 7 comments
Closed

bag operation fails and leaks internal state #6243

p6rt opened this issue May 13, 2017 · 7 comments
Labels
regression Issue did not exist previously testneeded

Comments

@p6rt
Copy link

p6rt commented May 13, 2017

Migrated from rt.perl.org#131303 (status was 'resolved')

Searchable as RT131303$

@p6rt
Copy link
Author

p6rt commented May 13, 2017

From @dogbert17

# the system
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -v
This is Rakudo version 2017.04.3-238-g50d5ac327 built on MoarVM version 2017.04-64-g6d5ea042
implementing Perl 6.c.

# the problem
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -e 'say bag(<a a b c a d>) (-) bag(<a a b c c>) == bag(<a d>)'
P6opaque​: get_boxed_ref could not unbox for the representation '20' of type Scalar
  in block <unit> at -e line 1

# Alexdaniel++ quickly dug up the following
12​:15​:17 +bisectable6 | AlexDaniel, Bisecting by exit code (old=2015.12 new=50d5ac3). Old exit code​: 0
12​:15​:26 +bisectable6 | AlexDaniel, bisect log​: https://gist.github.com/ea9b1f5cafac02e57b9a7d2d3eb01b8c
12​:15​:26 +bisectable6 | AlexDaniel, (2017-05-11) rakudo/rakudo@788e6de 

@p6rt
Copy link
Author

p6rt commented May 13, 2017

From @lizmat

Argh. This is waiting for the refactor of (-) . Looking at how quickly I can do this while at the PTS.

On 13 May 2017, at 12​:27, Jan-Olof Hendig (via RT) <perl6-bugs-followup@​perl.org> wrote​:

# New Ticket Created by Jan-Olof Hendig
# Please include the string​: [perl #​131303]
# in the subject line of all future correspondence about this issue.
# <URL​: https://rt-archive.perl.org/perl6/Ticket/Display.html?id=131303 >

# the system
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -v
This is Rakudo version 2017.04.3-238-g50d5ac327 built on MoarVM version 2017.04-64-g6d5ea042
implementing Perl 6.c.

# the problem
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -e 'say bag(<a a b c a d>) (-) bag(<a a b c c>) == bag(<a d>)'
P6opaque​: get_boxed_ref could not unbox for the representation '20' of type Scalar
in block <unit> at -e line 1

# Alexdaniel++ quickly dug up the following
12​:15​:17 +bisectable6 | AlexDaniel, Bisecting by exit code (old=2015.12 new=50d5ac3). Old exit code​: 0
12​:15​:26 +bisectable6 | AlexDaniel, bisect log​: https://gist.github.com/ea9b1f5cafac02e57b9a7d2d3eb01b8c
12​:15​:26 +bisectable6 | AlexDaniel, (2017-05-11) rakudo/rakudo@788e6de 

@p6rt
Copy link
Author

p6rt commented May 13, 2017

The RT System itself - Status changed from 'new' to 'open'

@p6rt
Copy link
Author

p6rt commented May 13, 2017

From @lizmat

The problem was actually in setting values in (Bag|Mix)Hash. The problem could be golfed to​:

  my $b = BagHash.new; $b<a> = 42; $b.total

Fixed in rakudo/rakudo@4c813666df . Tests needed

On 13 May 2017, at 12​:27, Jan-Olof Hendig (via RT) <perl6-bugs-followup@​perl.org> wrote​:

# New Ticket Created by Jan-Olof Hendig
# Please include the string​: [perl #​131303]
# in the subject line of all future correspondence about this issue.
# <URL​: https://rt-archive.perl.org/perl6/Ticket/Display.html?id=131303 >

# the system
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -v
This is Rakudo version 2017.04.3-238-g50d5ac327 built on MoarVM version 2017.04-64-g6d5ea042
implementing Perl 6.c.

# the problem
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -e 'say bag(<a a b c a d>) (-) bag(<a a b c c>) == bag(<a d>)'
P6opaque​: get_boxed_ref could not unbox for the representation '20' of type Scalar
in block <unit> at -e line 1

# Alexdaniel++ quickly dug up the following
12​:15​:17 +bisectable6 | AlexDaniel, Bisecting by exit code (old=2015.12 new=50d5ac3). Old exit code​: 0
12​:15​:26 +bisectable6 | AlexDaniel, bisect log​: https://gist.github.com/ea9b1f5cafac02e57b9a7d2d3eb01b8c
12​:15​:26 +bisectable6 | AlexDaniel, (2017-05-11) rakudo/rakudo@788e6de 

@p6rt
Copy link
Author

p6rt commented Jul 5, 2017

From @dogbert17

On Sat, 13 May 2017 04​:29​:45 -0700, elizabeth wrote​:

The problem was actually in setting values in (Bag|Mix)Hash. The
problem could be golfed to​:

my $b = BagHash.new; $b<a> = 42; $b.total

Fixed in rakudo/rakudo@4c813666df . Tests
needed

On 13 May 2017, at 12​:27, Jan-Olof Hendig (via RT) <perl6-bugs-
followup@​perl.org> wrote​:

# New Ticket Created by Jan-Olof Hendig
# Please include the string​: [perl #​131303]
# in the subject line of all future correspondence about this issue.
# <URL​: https://rt-archive.perl.org/perl6/Ticket/Display.html?id=131303 >

# the system
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -v
This is Rakudo version 2017.04.3-238-g50d5ac327 built on MoarVM
version 2017.04-64-g6d5ea042
implementing Perl 6.c.

# the problem
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -e 'say bag(<a a
b c a d>) (-) bag(<a a b c c>) == bag(<a d>)'
P6opaque​: get_boxed_ref could not unbox for the representation '20'
of type Scalar
in block <unit> at -e line 1

# Alexdaniel++ quickly dug up the following
12​:15​:17 +bisectable6 | AlexDaniel, Bisecting by exit code
(old=2015.12 new=50d5ac3). Old exit code​: 0
12​:15​:26 +bisectable6 | AlexDaniel, bisect log​:
https://gist.github.com/ea9b1f5cafac02e57b9a7d2d3eb01b8c
12​:15​:26 +bisectable6 | AlexDaniel, (2017-05-11)
rakudo/rakudo@788e6de

Tests have been added to t/spec/S03-operators/set_difference.t

@p6rt
Copy link
Author

p6rt commented Jul 5, 2017

From @dogbert17

On Wed, 05 Jul 2017 07​:25​:34 -0700, jan-olof.hendig@​bredband.net wrote​:

On Sat, 13 May 2017 04​:29​:45 -0700, elizabeth wrote​:

The problem was actually in setting values in (Bag|Mix)Hash. The
problem could be golfed to​:

my $b = BagHash.new; $b<a> = 42; $b.total

Fixed in rakudo/rakudo@4c813666df . Tests
needed

On 13 May 2017, at 12​:27, Jan-Olof Hendig (via RT) <perl6-bugs-
followup@​perl.org> wrote​:

# New Ticket Created by Jan-Olof Hendig
# Please include the string​: [perl #​131303]
# in the subject line of all future correspondence about this
issue.
# <URL​: https://rt-archive.perl.org/perl6/Ticket/Display.html?id=131303 >

# the system
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -v
This is Rakudo version 2017.04.3-238-g50d5ac327 built on MoarVM
version 2017.04-64-g6d5ea042
implementing Perl 6.c.

# the problem
dogbert@​dogbert-VirtualBox ~/repos/rakudo $ ./perl6 -e 'say bag(<a
a
b c a d>) (-) bag(<a a b c c>) == bag(<a d>)'
P6opaque​: get_boxed_ref could not unbox for the representation '20'
of type Scalar
in block <unit> at -e line 1

# Alexdaniel++ quickly dug up the following
12​:15​:17 +bisectable6 | AlexDaniel, Bisecting by exit code
(old=2015.12 new=50d5ac3). Old exit code​: 0
12​:15​:26 +bisectable6 | AlexDaniel, bisect log​:
https://gist.github.com/ea9b1f5cafac02e57b9a7d2d3eb01b8c
12​:15​:26 +bisectable6 | AlexDaniel, (2017-05-11)
rakudo/rakudo@788e6de

Tests have been added to t/spec/S03-operators/set_difference.t

@p6rt
Copy link
Author

p6rt commented Jul 5, 2017

@dogbert17 - Status changed from 'open' to 'resolved'

@p6rt p6rt closed this as completed Jul 5, 2017
@p6rt p6rt added regression Issue did not exist previously testneeded labels Jan 5, 2020
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
regression Issue did not exist previously testneeded
Projects
None yet
Development

No branches or pull requests

1 participant