Permalink
Browse files

Rename Reflex::Role::Object to Reflex::Role::Reactive; Reflex::Object…

… to Reflex::Base.
  • Loading branch information...
1 parent e5c57fb commit 1f5ed2736c54e3718dc55f754f984a7bf2f7a12d @rcaputo committed Jun 27, 2010
Showing with 139 additions and 123 deletions.
  1. +4 −4 docs/syntax.pm
  2. +1 −1 eg/Proxy.pm
  3. +2 −2 eg/ReflexPromise.pm
  4. +2 −2 eg/eg-03-observer-roles.pl
  5. +1 −1 eg/eg-04-inheritance.pl
  6. +2 −2 eg/eg-05-composition.pl
  7. +2 −2 eg/eg-06-moose-roles.pl
  8. +2 −2 eg/eg-07-wheel-run.pl
  9. +2 −2 eg/eg-08-observer-trait.pl
  10. +3 −3 eg/eg-09-emitter-trait.pl
  11. +3 −3 eg/eg-10-setup.pl
  12. +1 −1 eg/eg-11-poco-postback.pl
  13. +1 −1 eg/eg-12-poco-event.pl
  14. +1 −1 eg/eg-13-irc-bot.pl
  15. +1 −1 eg/eg-14-synopsis.pl
  16. +1 −1 eg/eg-15-handle.pl
  17. +2 −2 eg/eg-18-synopsis-no-moose.pl
  18. +1 −1 eg/eg-30-promise-timer.pl
  19. +3 −3 eg/eg-33-all-callbacks.pl
  20. +2 −2 eg/eg-37-ping-pong.pl
  21. +1 −1 eg/ttl/Ttl/Adder.pm
  22. +1 −1 eg/ttl/Ttl/Bin.pm
  23. +1 −1 eg/ttl/Ttl/FlipFlop/D.pm
  24. +1 −1 eg/ttl/Ttl/FlipFlop/JK.pm
  25. +1 −1 eg/ttl/Ttl/FlipFlop/MasterSlave.pm
  26. +1 −1 eg/ttl/Ttl/FlipFlop/T.pm
  27. +1 −1 eg/ttl/Ttl/HexDecoder.pm
  28. +1 −1 eg/ttl/Ttl/Latch/ClockedNandRS.pm
  29. +1 −1 eg/ttl/Ttl/Latch/NandRS.pm
  30. +1 −1 eg/ttl/Ttl/Latch/NorRS.pm
  31. +1 −1 eg/ttl/Ttl/TriAnd.pm
  32. +1 −1 eg/ttl/Ttl/TriNand.pm
  33. +1 −1 eg/ttl/Ttl/Un.pm
  34. +3 −3 eg/ttl/fail-ttl-counter.pl
  35. +2 −2 eg/ttl/fail-ttl-simple.pl
  36. +22 −7 lib/Reflex.pm
  37. +11 −11 lib/Reflex/{Object.pm → Base.pm}
  38. +2 −2 lib/Reflex/Callback.pm
  39. +1 −1 lib/Reflex/Callback/Method.pm
  40. +4 −4 lib/Reflex/Callbacks.pm
  41. +1 −1 lib/Reflex/Client.pm
  42. +2 −2 lib/Reflex/Collection.pm
  43. +1 −1 lib/Reflex/Handle.pm
  44. +2 −2 lib/Reflex/POE/Event.pm
  45. +3 −3 lib/Reflex/POE/Session.pm
  46. +3 −3 lib/Reflex/POE/Wheel.pm
  47. +11 −10 lib/Reflex/Role/{Object.pm → Reactive.pm}
  48. +1 −1 lib/Reflex/Role/Recving.pm
  49. +1 −1 lib/Reflex/Signal.pm
  50. +2 −2 lib/Reflex/Stream.pm
  51. +2 −2 lib/Reflex/Timer.pm
  52. +1 −1 lib/Reflex/Trait/EmitsOnChange.pm
  53. +3 −3 lib/Reflex/Trait/Observed.pm
  54. +3 −3 lib/Reflex/UdpPeer.pm
  55. +6 −6 t/901-discrete-observer.t
  56. +1 −1 t/902-observed-new.t
  57. +1 −1 t/925-rcb-promise.t
View
@@ -2,7 +2,7 @@ Documenting Reflex syntax evolution.
=head1 Gathering callbacks.
-Reflex::Role::Object
+Reflex::Role::Reactive
Has the cb() member.
BUILD
Maps constructor parameters to callbacks.
@@ -11,10 +11,10 @@ Reflex::Role::Object
role callbacks = role watchers
no callbacks = unwatched (promise?)
-=head1 Reflex::Role::Object::BUILD calls cb_gather()
+=head1 Reflex::Role::Reactive::BUILD calls cb_gather()
emit() syntax is preserved.
-1. Role::Object handles it normally.
+1. Role::Reactive handles it normally.
2. Local delivery is through the callback object.
$self->emit( event => \%args );
@@ -104,7 +104,7 @@ use Reflex::Timer;
use Reflex::Callbacks qw(cb_promise);
use ExampleHelpers qw(eg_say);
-my $watcher = Reflex::Object->new();
+my $watcher = Reflex::Base->new();
my $promise;
my $timer = Reflex::Timer->new(
View
@@ -1,6 +1,6 @@
package Proxy;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
has handle_a => ( is => 'rw', isa => 'FileHandle', required => 1 );
has handle_b => ( is => 'rw', isa => 'FileHandle', required => 1 );
View
@@ -1,12 +1,12 @@
package ReflexPromise;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Reflex::Callbacks qw(cb_promise);
has object => (
- isa => 'Reflex::Object',
+ isa => 'Reflex::Base',
is => 'ro',
);
@@ -26,7 +26,7 @@
package Watcher;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Timer;
use Reflex::Callbacks qw(cb_role);
@@ -74,7 +74,7 @@
my $watcher = Watcher->new();
ok( (defined $watcher), "started watcher object" );
-Reflex::Object->run_all();
+Reflex->run_all();
pass("run_all() returned");
exit;
View
@@ -45,5 +45,5 @@
)
);
print "UDP echo service is listening on port $port.\n";
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
View
@@ -11,7 +11,7 @@
{
package Reflex::Udp::Echo;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::UdpPeer;
has port => (
@@ -62,5 +62,5 @@
my $port = 12345;
my $peer = Reflex::Udp::Echo->new( port => $port );
print "UDP echo service is listening on port $port.\n";
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
View
@@ -10,7 +10,7 @@
{
package Reflex::Udp::Echo;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use IO::Socket::INET;
has socket => (
@@ -50,5 +50,5 @@
)
);
print "UDP echo service is listening on port $port.\n";
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
View
@@ -10,7 +10,7 @@
{
package Runner;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::POE::Wheel::Run;
use Reflex::Callbacks qw(cb_role);
@@ -65,5 +65,5 @@
# Main.
my $runner = Runner->new();
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
@@ -10,7 +10,7 @@
{
package Runner;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::POE::Wheel::Run;
use Reflex::Trait::Observed;
@@ -67,5 +67,5 @@
# Main.
my $runner = Runner->new();
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
@@ -9,7 +9,7 @@
{
package Counter;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Timer;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
@@ -47,7 +47,7 @@
{
package Watcher;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
has counter => (
traits => ['Reflex::Trait::Observed'],
@@ -69,5 +69,5 @@
# Main.
my $w = Watcher->new();
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
View
@@ -10,7 +10,7 @@
{
package Counter;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Timer;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
@@ -40,7 +40,7 @@
{
package Watcher;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
has counter => (
traits => ['Reflex::Trait::Observed'],
@@ -60,5 +60,5 @@
# Main.
my $w = Watcher->new();
-Reflex::Object->run_all();
+Reflex->run_all();
exit;
@@ -10,7 +10,7 @@
package App;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::POE::Postback;
use PoCoPostback;
View
@@ -10,7 +10,7 @@
package App;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::POE::Event;
use PoCoEvent;
View
@@ -11,7 +11,7 @@
{
package Bot;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Trait::Observed;
use Reflex::POE::Session;
View
@@ -7,7 +7,7 @@
{
package App;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Timer;
has ticker => (
View
@@ -6,7 +6,7 @@
package UdpPeer;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Handle;
has port => (
@@ -8,10 +8,10 @@
{
package App;
- use Reflex::Object;
+ use Reflex::Base;
use Reflex::Timer;
use Reflex::Callbacks qw(cb_role);
- use base qw(Reflex::Object);
+ use base qw(Reflex::Base);
sub BUILD {
my $self = shift;
@@ -15,7 +15,7 @@
);
my $promise;
-my $watcher = Reflex::Object->new();
+my $watcher = Reflex::Base->new();
$watcher->watch($timer, cb_promise(\$promise));
while (my $event = $promise->next()) {
@@ -27,7 +27,7 @@
{
package MethodHandler;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Callbacks qw(cb_method);
use ExampleHelpers qw(eg_say);
@@ -61,7 +61,7 @@
{
package ObjectHandler;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Callbacks qw(cb_object);
use ExampleHelpers qw(eg_say);
@@ -93,7 +93,7 @@
{
package RoleHandler;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
use Reflex::Callbacks qw(cb_role);
use ExampleHelpers qw(eg_say);
View
@@ -5,7 +5,7 @@
{
package Echoer;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
sub ping {
my ($self, $args) = @_;
@@ -17,7 +17,7 @@
{
package Pinger;
use Moose;
- extends 'Reflex::Object';
+ extends 'Reflex::Base';
has echoer => (
is => 'ro',
View
@@ -26,7 +26,7 @@
package Ttl::Adder;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::Xor;
use Ttl::And;
use Ttl::Or;
View
@@ -4,7 +4,7 @@
package Ttl::Bin;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Reflex::Trait::EmitsOnChange;
has a => (
View
@@ -7,7 +7,7 @@
package Ttl::FlipFlop::D;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::TriNand;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
@@ -20,7 +20,7 @@
package Ttl::FlipFlop::JK;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::Latch::ClockedNandRS;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
@@ -14,7 +14,7 @@
package Ttl::FlipFlop::MasterSlave;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::Latch::ClockedNandRS;
use Ttl::Not;
use Reflex::Trait::Observed;
View
@@ -4,7 +4,7 @@
package Ttl::FlipFlop::T;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::FlipFlop::D;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
View
@@ -3,7 +3,7 @@
package Ttl::HexDecoder;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
has ones => (
isa => 'Bool',
@@ -14,7 +14,7 @@
package Ttl::Latch::ClockedNandRS;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::Nand;
use Ttl::Latch::NandRS;
use Reflex::Trait::Observed;
@@ -16,7 +16,7 @@
package Ttl::Latch::NandRS;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::Nand;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
@@ -16,7 +16,7 @@
package Ttl::Latch::NorRS;
use Moose;
-extends 'Reflex::Object';
+extends 'Reflex::Base';
use Ttl::Nor;
use Reflex::Trait::Observed;
use Reflex::Trait::EmitsOnChange;
Oops, something went wrong.

0 comments on commit 1f5ed27

Please sign in to comment.