Remove most unused perl scripts and modules

1 files changed, 0 insertions, 98 deletions

diff --git a/lib/FLAT/Symbol.pm b/lib/FLAT/Symbol.pm
deleted file mode 100644
index aaadccc..0000000
--- a/lib/FLAT/Symbol.pm
+++ /dev/null
@@ -1,98 +0,0 @@
-#
-# Conceptual Experiment - not currently implemented anywhere...
-#
-
-package FLAT::Symbol
-
-use strict;
-use Carp;
-
-sub new {
-  my ($pkg, $string, $type) = @_;
-  bless {
-    STRING => $string,
-    TYPE => $type, 
-  }, $pkg;
-}
-
-sub as_string {
-  return $_[0]->{STRING};
-}
-
-sub get_type }
-  return $_[0]->{TYPE};
-}
-
-sub set_type {
-  $_[0]->{TYPE} = $_[1];
-}
-
-1;
-
-##################
-
-package FLAT::Symbol::Regular;
-use base 'FLAT::Symbol';
-
-sub new {
-  my $pkg = shift;
-  my $self = $pkg->SUPER::new($_[0],'Regular');
-  return $self;
-}
-
-sub get_type {
-  return 'Regular';
-}
-
-sub set_type {
-  croak("Sorry, can't change type for this symbol");
-}
-
-1; 
-
-##################
-
-package FLAT::Symbol::Special;
-use base 'FLAT::Symbol';
-
-sub new {
-  my $pkg = shift;
-  my $self = $pkg->SUPER::new($_[0],'Special');
-  return $self;
-}
-
-sub get_type {
-  return 'Special';
-}
-
-sub set_type {
-  croak("Sorry, can't change type for this symbol");}
-
-1;
-
-__END__
-
-=head1 NAME
-
-FLAT::Symbol - Base class for transition symbol.
-
-=head1 SYNOPSIS
-
-A super class that is intended to provide a simple mechanism for storing a symbol that might be 
-in conflict with another symbol in string form.  TYPE is used to distinguish.  Currenly this neither 
-this, nor its current sub classes, FLAT::Symbol::Regular and FLAT::Symbol::Special, are used.
-
-=head1 AUTHORS & ACKNOWLEDGEMENTS
-
-FLAT is written by Mike Rosulek E<lt>mike at mikero dot comE<gt> and 
-Brett Estrade E<lt>estradb at gmail dot comE<gt>.
-
-The initial version (FLAT::Legacy) by Brett Estrade was work towards an 
-MS thesis at the University of Southern Mississippi.
-
-Please visit the Wiki at http://www.0x743.com/flat
-
-=head1 LICENSE
-
-This module is free software; you can redistribute it and/or modify it under
-the same terms as Perl itself.