comp_unit statementlist statement statement_control statement_control__S_064use usecomp_unit statementlist statement statement_control statement_control__S_064use ws  comp_unit statementlist statement statement_control statement_control__S_064use version version__S_102v vcomp_unit statementlist statement statement_control statement_control__S_064use version version__S_102v vnum 6comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws 
comp_unit statementlist statement statement_control statement_control__S_064use usecomp_unit statementlist statement statement_control statement_control__S_064use ws  comp_unit statementlist statement statement_control statement_control__S_064use module_name module_name__S_100normal longname name identifier ident Testcomp_unit statementlist eat_terminator ;comp_unit statementlist ws vws 

comp_unit statementlist statement EXPR termish term term__S_390identifier identifier ident plancomp_unit statementlist statement EXPR termish term term__S_390identifier args ws  comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR termish term term__S_148value value value__S_198number number integer decint 2comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws 

comp_unit statementlist ws unv pod_comment =begin comp_unit statementlist ws unv pod_comment identifier ident podcomp_unit statementlist ws unv pod_comment 

Tests for lexical classes delcared with 'my class'

=end podcomp_unit statementlist ws vws 

comp_unit statementlist ws unv comment comment__S_058Sharp # L<S12/Classes>comp_unit statementlist ws vws 

comp_unit statementlist ws unv comment comment__S_058Sharp #?rakudo todo 'RT #61108'comp_unit statementlist ws vws 
comp_unit statementlist statement EXPR termish term term__S_390identifier identifier ident eval_lives_okcomp_unit statementlist statement EXPR termish term term__S_390identifier args ws  comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single nibbler my class A {}comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST infixish infix infix__S_382Comma ,comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST ws  comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST nulltermish termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST nulltermish termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single nibbler my class parses OKcomp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST nulltermish termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws 
comp_unit statementlist ws unv comment comment__S_058Sharp #?rakudo todo 'RT #61108'comp_unit statementlist ws vws 
comp_unit statementlist statement EXPR termish term term__S_390identifier identifier ident eval_lives_okcomp_unit statementlist statement EXPR termish term term__S_390identifier args ws  comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single nibbler { my class B {} } { my class B {} }comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST infixish infix infix__S_382Comma ,comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST ws vws 
comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST ws unv               comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST nulltermish termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST nulltermish termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single nibbler declare classes with the same name in two scopes.comp_unit statementlist statement EXPR termish term term__S_390identifier args arglist EXPR LIST nulltermish termish term term__S_148value value value__S_197quote quote quote__S_049Single_Single 'comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws 

comp_unit statementlist ws unv comment comment__S_058Sharp # vim: ft=perl6comp_unit statementlist ws vws