diff options
author | Steve Mynott <stmuk@users.noreply.github.com> | 2017-08-11 17:07:15 +0200 |
---|---|---|
committer | GitHub <noreply@github.com> | 2017-08-11 17:07:15 +0200 |
commit | 9ac7033d0c5e3c7471cd2393aa21de0ed9150fd5 (patch) | |
tree | 2d9f34c3e4e543106a1e5441eddd02386acef8ec /patches/star-ver.patch | |
parent | 694f91ca0cf115444bd6baeca15059e426072738 (diff) | |
parent | 57264c72f102477ea3e4127216d30f806e888d68 (diff) |
Merge pull request #97 from stmuk/master
patch perl6 -v to display "Rakudo Star" star issue #7
Diffstat (limited to 'patches/star-ver.patch')
-rw-r--r-- | patches/star-ver.patch | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/patches/star-ver.patch b/patches/star-ver.patch new file mode 100644 index 0000000..c104ee6 --- /dev/null +++ b/patches/star-ver.patch @@ -0,0 +1,16 @@ +--- ../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); + } |