diff options
| author | Steve Mynott <steve.mynott@gmail.com> | 2017-08-12 12:55:45 +0100 |
|---|---|---|
| committer | Steve Mynott <steve.mynott@gmail.com> | 2017-08-12 12:55:45 +0100 |
| commit | 242b5518f012cb1069df36878b4d741ef77f1ac1 (patch) | |
| tree | fdbf2b01cc4852ee055ab1e08e28aaf14a159d50 | |
| parent | 9ac7033d0c5e3c7471cd2393aa21de0ed9150fd5 (diff) | |
patch gen-version.pl to add Star in perl6 -v which is hopefully saner
| -rw-r--r-- | patches/star-ver.patch | 27 |
1 files changed, 11 insertions, 16 deletions
diff --git a/patches/star-ver.patch b/patches/star-ver.patch index c104ee6..194accc 100644 --- a/patches/star-ver.patch +++ b/patches/star-ver.patch @@ -1,16 +1,11 @@ ---- ../nqp/src/HLL/Compiler.nqp -+++ ../nqp/src/HLL/Compiler.nqp -@@ -557,11 +557,11 @@ class HLL::Compiler does HLL::Backend::Default { - my $implementation := self.implementation(); - my $language_name := self.language_name(); - if nqp::can(self, 'language_version') { -- nqp::say("This is $implementation version $version built on $backver\n" ~ -+ nqp::say("This is $implementation Star version $version built on $backver\n" ~ - "implementing $language_name " ~ self.language_version() ~ "."); - } - else { -- nqp::say("This is $implementation version $version built on $backver"); -+ nqp::say("This is $implementation Star version $version built on $backver"); - } - nqp::exit(0); - } +--- ../rakudo/tools/build/gen-version.pl ++++ ../rakudo/tools/build/gen-version.pl +@@ -28,7 +28,7 @@ my $builddate = strftime('%Y-%m-%dT%H:%M:%SZ', gmtime); + + print <<"END_VERSION"; + sub hll-config(\$config) { +- \$config<implementation> := 'Rakudo'; ++ \$config<implementation> := 'Rakudo Star'; + \$config<version> := '$version'; + \$config<release-number> := '$release'; + \$config<codename> := '$codename'; |