forked from jacquesg/p5-Git-Raw
-
Notifications
You must be signed in to change notification settings - Fork 0
/
typemap
53 lines (51 loc) · 1.25 KB
/
typemap
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
Blame T_GIT_REF
Blame_Hunk T_GIT_REF
Blob T_GIT_REF
Branch T_GIT_REF
Commit T_GIT_REF
Config T_GIT_REF
Cert T_GIT_REF
Cert_HostKey T_GIT_REF
Cert_X509 T_GIT_REF
Cred T_GIT_REF
Diff T_GIT_REF
Diff_Delta T_GIT_REF
Diff_File T_GIT_REF
Diff_Hunk T_GIT_REF
Diff_Stats T_GIT_REF
Error T_GIT_REF
Filter T_GIT_REF
Filter_List T_GIT_REF
Filter_Source T_GIT_REF
Index T_GIT_REF
Index_Conflict T_GIT_REF
Index_Entry T_GIT_REF
Merge_File_Result T_GIT_REF
Note T_GIT_REF
Patch T_GIT_REF
PathSpec T_GIT_REF
PathSpec_MatchList T_GIT_REF
Reflog T_GIT_REF
Reflog_Entry T_GIT_REF
RefSpec T_GIT_REF
Reference T_GIT_REF
Remote T_GIT_REF
Repository T_GIT_REF
Signature T_GIT_REF
Tag T_GIT_REF
Tree T_GIT_REF
Tree_Builder T_GIT_REF
Tree_Entry T_GIT_REF
Walker T_GIT_REF
OUTPUT
T_GIT_REF
sv_setref_pv($arg, \"Git::Raw::${(my $ntt = $ntype) =~ s/_/::/g;\$ntt}\", (void *) $var);
INPUT
T_GIT_REF
if (sv_isobject($arg) &&
sv_derived_from($arg, \"Git::Raw::${(my $ntt = $ntype) =~ s/_/::/g;\$ntt}\")) {
$var = INT2PTR($type, SvIV((SV *) SvRV($arg)));
} else {
$var = NULL;
croak_usage(\"$var is not of type Git::Raw::${(my $ntt = $ntype) =~ s/_/::/g;\$ntt}\");
}