Hi,

  my $x = 42;
  my $y = $x;
  $y++;
  say $x;         # Still 42, of course


  class Foo {
    has $.data;
    method incr () { $.data++ }

    # Please fill in appropriate magic here
  }

  my Foo $x .= new(:data(42));
  my Foo $y  = $x;
  $y.incr();
  say $x.data;    # Should still be 42
  say $x =:= $y;  # Should be false


--Ingo

-- 
Linux, the choice of a GNU | The computer revolution is over.
generation on a dual AMD   | The computers won.
Athlon!                    | -- Eduard Bloch

Reply via email to