File: c_api.h

package info (click to toggle)
libmath-int64-perl 0.54-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye, buster, sid, stretch
  • size: 672 kB
  • ctags: 924
  • sloc: perl: 2,805; ansic: 320; makefile: 2
file content (31 lines) | stat: -rw-r--r-- 1,017 bytes parent folder | download
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
/*
 * c_api.h - This file is in the public domain
 * Author: "Salvador Fandino <sfandino@yahoo.com>, Dave Rolsky <autarch@urth.org>"
 *
 * Generated on: 2016-01-04 10:07:18
 * Math::Int64 version: 0.54
 * Module::CAPIMaker version: 
 */

#if !defined (C_API_H_INCLUDED)
#define C_API_H_INCLUDED

static void
init_c_api(pTHX) {
    HV *hv = get_hv("Math::Int64::C_API", TRUE|GV_ADDMULTI);
    hv_store(hv, "min_version", 11, newSViv(1), 0);
    hv_store(hv, "max_version", 11, newSViv(2), 0);
    hv_store(hv, "version", 7, newSViv(2), 0);
    hv_store(hv, "SvI64", 5, newSViv(PTR2IV(&SvI64)), 0);
    hv_store(hv, "SvI64OK", 7, newSViv(PTR2IV(&SvI64OK)), 0);
    hv_store(hv, "SvU64", 5, newSViv(PTR2IV(&SvU64)), 0);
    hv_store(hv, "SvU64OK", 7, newSViv(PTR2IV(&SvU64OK)), 0);
    hv_store(hv, "newSVi64", 8, newSViv(PTR2IV(&newSVi64)), 0);
    hv_store(hv, "newSVu64", 8, newSViv(PTR2IV(&newSVu64)), 0);
    hv_store(hv, "randU64", 7, newSViv(PTR2IV(&randU64)), 0);

}

#define INIT_C_API init_c_api(aTHX)

#endif