[PATCH] Git.xs: older perl do not know const char *

Subsystems: the rest

DORMANTno replies

2 messages, 2 authors, 2016-06-15 · open the first message on its own page

[PATCH] Git.xs: older perl do not know const char *

From: Johannes Schindelin <hidden>
Date: 2016-06-15 22:42:32

Both of these casts _should_ be safe, since you do not want to muck around 
with the version or the path anyway.

Signed-off-by: Johannes Schindelin <redacted>

---

 perl/Git.xs |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/perl/Git.xs b/perl/Git.xs
index 51bfac3..c824210 100644
--- a/perl/Git.xs
+++ b/perl/Git.xs
@@ -59,7 +59,7 @@ BOOT:
 # /* TODO: xs_call_gate(). See Git.pm. */
 
 
-const char *
+char *
 xs_version()
 CODE:
 {
@@ -69,11 +69,11 @@ OUTPUT:
 	RETVAL
 
 
-const char *
+char *
 xs_exec_path()
 CODE:
 {
-	RETVAL = git_exec_path();
+	RETVAL = (char *)git_exec_path();
 }
 OUTPUT:
 	RETVAL

Re: [PATCH] Git.xs: older perl do not know const char *

From: Petr Baudis <hidden>
Date: 2016-06-15 22:42:32

Dear diary, on Sun, Jul 02, 2006 at 11:53:03AM CEST, I got a letter
where Johannes Schindelin [off-list ref] said that...
Both of these casts _should_ be safe, since you do not want to muck around 
with the version or the path anyway.

Signed-off-by: Johannes Schindelin <redacted>
Acked-by: Petr Baudis <redacted>

It isn't all that great but it seems everything xs does with this is to
feed it to sv_setpv() which AFAIK copies it around.

-- 
				Petr "Pasky" Baudis
Stuff: http://pasky.or.cz/
Snow falling on Perl. White noise covering line noise.
Hides all the bugs too. -- J. Putnam
Keyboard shortcuts
hback out one level
jnext message in thread
kprevious message in thread
ldrill in
Escclose help / fold thread tree
?toggle this help