From 242b5518f012cb1069df36878b4d741ef77f1ac1 Mon Sep 17 00:00:00 2001
From: Steve Mynott <steve.mynott@gmail.com>
Date: Sat, 12 Aug 2017 12:55:45 +0100
Subject: patch gen-version.pl to add Star in perl6 -v which is hopefully saner

---
 patches/star-ver.patch | 27 +++++++++++----------------
 1 file 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';
-- 
cgit v1.1