Git.pm: Implement Git::exec_path()
This patch implements Git::exec_path() (as a direct XS call). Signed-off-by: Petr Baudis <pasky@suse.cz> Signed-off-by: Junio C Hamano <junkio@cox.net>
This commit is contained in:

committed by
Junio C Hamano

parent
b1edc53d06
commit
eca1f6fdb8
12
perl/Git.xs
12
perl/Git.xs
@ -6,6 +6,7 @@
|
||||
|
||||
/* libgit interface */
|
||||
#include "../cache.h"
|
||||
#include "../exec_cmd.h"
|
||||
|
||||
/* XS and Perl interface */
|
||||
#include "EXTERN.h"
|
||||
@ -21,6 +22,17 @@ PROTOTYPES: DISABLE
|
||||
|
||||
# /* TODO: xs_call_gate(). See Git.pm. */
|
||||
|
||||
|
||||
const char *
|
||||
xs_exec_path()
|
||||
CODE:
|
||||
{
|
||||
RETVAL = git_exec_path();
|
||||
}
|
||||
OUTPUT:
|
||||
RETVAL
|
||||
|
||||
|
||||
char *
|
||||
xs_hash_object(file, type = "blob")
|
||||
SV *file;
|
||||
|
Reference in New Issue
Block a user