Changeset 22552 for src/perl6

Timestamp:

10/09/08 04:51:56 (6 weeks ago)

Author:

lwall

Message:

[viv] autogenerate VAST packages as needed

Files:

• src/perl6/viv (modified) (2 diffs)

src/perl6/viv

@@ -132 +132 @@
         no strict 'refs';
         return if @{$class . '::ISA'};
-        warn "Generating $class\n";
         @{$class . '::ISA'} = 'VAST::Base';
     }
@@ -179 +178 @@
 }
 
-{ package VAST::arglist; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::args; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::assertion; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::atom; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::babble; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::backslash; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::before; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::binding; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::block; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::cclass_elem; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::circumfix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::codeblock; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::colonpair; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::comp_unit; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::default_value; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::deflongname; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::desigilname; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::dotty; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::dottyop; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::eat_terminator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::else; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::escape; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::EXPR; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::extrapost; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::fatarrow; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::fulltypename; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::hexint; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::identifier; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::infix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::infixish; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::infix_postfix_meta_operator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::infix_prefix_meta_operator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::integer; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::item; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::key; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::lambda; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::left; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::litchar; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::longname; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::metachar; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::method_def; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::methodop; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::modifier_expr; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::mod_internal; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::module_name; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::morename; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::multi_declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::multisig; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::name; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::named_param; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::nibble; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::nibbler; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::noun; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::nulltermish; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::number; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::package_declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::package_def; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::parameter; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::param_sep; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::param_var; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::pblock; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::post; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::postcircumfix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::postfix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::postop; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::pre; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::prefix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quantified_atom; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quantifier; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quantmod; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quibble; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quote; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quote_mod; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::quotepair; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::regex_block; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::regex_declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::regex_def; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::right; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::routine_declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::rxinfix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::scoped; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::scope_declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::semilist; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::sigil; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::signature; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::sigspace; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::slurp; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::special_variable; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::statement; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::statement_control; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::statementlist; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::statement_mod_cond; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::statement_mod_loop; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::statement_prefix; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::stopper; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::sublongname; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::subshortname; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::sym; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::term; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::termish; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::text; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::trait; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::trait_auxiliary; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::twigil; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::type_constraint; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::typename; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::val; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::value; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::variable; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::variable_declarator; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::ws; our @ISA = ('VAST::Base');
-}
-
-{ package VAST::xblock; our @ISA = ('VAST::Base');
-}
-
-
 
 if ($0 eq __FILE__) {