# New Ticket Created by Colin Kuskie # Please include the string: [perl #44677] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=44677 >
Change .Class to 'Class' in t/compilers/tge
Index: t/compilers/tge/basic.t =================================================================== --- t/compilers/tge/basic.t (revision 20629) +++ t/compilers/tge/basic.t (working copy) @@ -55,18 +55,18 @@ tree = new 'TGE::Tree' .local int id - $P0 = new .Integer + $P0 = new 'Integer' id = tree.'_lookup_id'($P0) print id print "\n" - $P1 = new .Integer + $P1 = new 'Integer' id = tree.'_lookup_id'($P1) print id print "\n" id = tree.'_lookup_id'($P0) print id print "\n" - $P2 = new .Integer + $P2 = new 'Integer' id = tree.'_lookup_id'($P2) print id print "\n" Index: t/compilers/tge/grammar.t =================================================================== --- t/compilers/tge/grammar.t (revision 20629) +++ t/compilers/tge/grammar.t (working copy) @@ -293,7 +293,7 @@ .local object testing - testing = new .Hash + testing = new 'Hash' # Compile a grammar from the source .local pmc grammar