[Perl-flat-cvs-notify] perl-flat/lib/FLAT PFA.pm,1.5,1.6

[<per...@li...>]

Update of /cvsroot/perl-flat/perl-flat/lib/FLAT
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2951/lib/FLAT

Modified Files:
	PFA.pm 
Log Message:
...

Index: PFA.pm
===================================================================
RCS file: /cvsroot/perl-flat/perl-flat/lib/FLAT/PFA.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** PFA.pm	7 Apr 2006 20:14:34 -0000	1.5
--- PFA.pm	9 Apr 2006 19:37:31 -0000	1.6
***************
*** 6,19 ****
  use FLAT::Transition;
  
! # eliminated from PFA.pm of FLAT::Legacy is the need to explicitly track:
! ## start nodes, final nodes, symbols, and lambda & epsilon symbols,  
  sub new {
      my $pkg = shift;
      my $self = $pkg->SUPER::new(@_);
      $self->{NODE_TRANS_CLASS} = "FLAT::Transition";  
-     # \gamma - there is no need to have a state transition
-     # function (at this point) because nothing is really
-     # done on the state level.  If that is desired, one
-     # should just use the equivalent NFA
      $self->{TIED} = [];              # tracks tied nodes
      $self->{ACTIVE_NODES} = [];      # tracks active nodes - could be label like start and final
--- 6,16 ----
  use FLAT::Transition;
  
! # The new way of doing things eliminated from PFA.pm of FLAT::Legacy is the 
! # need to explicitly track:  
! #   start nodes, final nodes, symbols, and lambda & epsilon symbols,  
  sub new {
      my $pkg = shift;
      my $self = $pkg->SUPER::new(@_);
      $self->{NODE_TRANS_CLASS} = "FLAT::Transition";  
      $self->{TIED} = [];              # tracks tied nodes
      $self->{ACTIVE_NODES} = [];      # tracks active nodes - could be label like start and final
***************
*** 43,54 ****
  }
  
  sub as_pfa { $_[0]->clone() }
  
- 
- # PFA->NFA conversion algorithm
- sub as_nfa {
-   
- }
- 
  sub union {
  
--- 40,46 ----
  }
  
+ # attack of the clones
  sub as_pfa { $_[0]->clone() }
  
  sub union {
  
***************
*** 68,71 ****
--- 60,68 ----
  }
  
+ # PFA->NFA conversion algorithm
+ sub as_nfa {
+   
+ }
+ 
  # Implement?
  sub reverse {