Skip to content

Commit

Permalink
update p6object to use new get_id opcode for uniquely identifying PMCs
Browse files Browse the repository at this point in the history
  • Loading branch information
plobsing committed Sep 15, 2011
1 parent 16b0e63 commit e42882f
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 3 deletions.
2 changes: 1 addition & 1 deletion runtime/parrot/library/P6object.pir
Original file line number Diff line number Diff line change
Expand Up @@ -128,7 +128,7 @@ Return the memory address for the invocant.
=cut

.sub 'WHERE' :method :nsentry
$I0 = get_addr self
$I0 = get_id self
.return ($I0)
.end

Expand Down
4 changes: 2 additions & 2 deletions t/library/p6object.t
Original file line number Diff line number Diff line change
Expand Up @@ -253,7 +253,7 @@ The available options include:

msg = 'concat'(classname, '.WHERE')
$P0 = proto.'WHERE'()
$I0 = get_addr proto
$I0 = get_id proto
is($I0, $P0, msg)

if null who goto proto_who_done
Expand Down Expand Up @@ -289,7 +289,7 @@ The available options include:

msg = 'concat'(objname, '.WHERE')
$P0 = obj.'WHERE'()
$I0 = get_addr obj
$I0 = get_id obj
is($I0, $P0, msg)

if null who goto obj_who_done
Expand Down

0 comments on commit e42882f

Please sign in to comment.