… | … | ||
---|---|---|---|
870 | our $override; | 870 | our $override; |
871 | our @invoke_results = (); # referenced from .xs code. TODO: play tricks with reify and mortals? | 871 | our @invoke_results = (); # referenced from .xs code. TODO: play tricks with reify and mortals? |
872 | 872 | ||
873 | sub override { | 873 | sub override { |
874 | $override = 1; | 874 | $override = 1; |
875 | @invoke_results = (); | 875 | @invoke_results = (@_); |
876 | } | 876 | } |
877 | 877 | ||
878 | sub do_invoke { | 878 | sub do_invoke { |
879 | my $event = shift; | 879 | my $event = shift; |
880 | my $callbacks = shift; | 880 | my $callbacks = shift; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |