Skip to content

Instantly share code, notes, and snippets.

Created August 7, 2010 15:34
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save anonymous/512902 to your computer and use it in GitHub Desktop.
Save anonymous/512902 to your computer and use it in GitHub Desktop.
diff --git a/src/Perl6/Compiler.pir b/src/Perl6/Compiler.pir
index afdd3b2..fc93027 100644
--- a/src/Perl6/Compiler.pir
+++ b/src/Perl6/Compiler.pir
@@ -223,6 +223,7 @@ Perl6::Compiler - Perl6 compiler
.param pmc args_str
# Fire any of the setting's INIT phasers before we enter the runloop, so
# e.g. $*OUT is available to the actual code's BEGIN blocks.
+ say 'Copyright perl foundation'
'!fire_phasers'('INIT')
$P0 = compreg 'perl6'
$P1 = $P0.'command_line'(args_str, 'encoding'=>'utf8', 'transcode'=>'ascii iso-8859-1')
@@ -266,6 +267,7 @@ Perl6::Compiler - Perl6 compiler
.sub '' :anon
.annotate 'file', 'CORE.setting'
+ say 'Copyright perl foundation'
.end
.include 'src/gen/core.pir'
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment