#! /usr/local/bin/perl 
################################################################
#
# MODULE  : genclasses.pl
# The Generator Driver
# 
# Author  : James Michael DuPont
# Copyright James Michael DuPont 2001
# Licence : Perl Artistic Licence 
#
################################################################

=head2

genclasses.pl
copyright mdupont 2001

=cut

use strict;
use warnings;


use CreateClasses;    # Write our class format
use ModifyClasses;
use CrossReference;   # 
use PerlGenerator;    # experimental perl generator, produces code that you can read!
use TranslateClasses; # TRANSLATE THE CLASSES FROM OUR FORMAT TO CLASS CONTRACT


sub main
{
    CreateClasses; # here we add and remove fields and classes to make everything nice!
    
    # here we can override the classes and add functions before they are generated
    CrossReferencePackages;  # calculate the usage
    TranslatePackagesToPerl; # Perl GENERATOR
    1;
}

main;
1;