Parent Directory | Revision Log
strip (redundant) prefix tcidb from xs bindings function names
1 | dpavlin | 1 | #include "EXTERN.h" |
2 | #include "perl.h" | ||
3 | #include "XSUB.h" | ||
4 | #include <dystopia.h> | ||
5 | #include <stdlib.h> | ||
6 | #include <stdbool.h> | ||
7 | #include <stdint.h> | ||
8 | |||
9 | |||
10 | MODULE = Search::TokyoDystopia PACKAGE = Search::TokyoDystopia | ||
11 | PROTOTYPES: DISABLE | ||
12 | |||
13 | const char * | ||
14 | dpavlin | 6 | errmsg(ecode) |
15 | dpavlin | 1 | int ecode |
16 | CODE: | ||
17 | RETVAL = tchdberrmsg(ecode); | ||
18 | OUTPUT: | ||
19 | RETVAL | ||
20 | dpavlin | 2 | |
21 | |||
22 | void * | ||
23 | dpavlin | 6 | new() |
24 | dpavlin | 2 | PREINIT: |
25 | TCIDB *db; | ||
26 | CODE: | ||
27 | db = tcidbnew(); | ||
28 | RETVAL = db; | ||
29 | OUTPUT: | ||
30 | RETVAL | ||
31 | dpavlin | 3 | |
32 | |||
33 | void | ||
34 | dpavlin | 6 | del(db) |
35 | dpavlin | 3 | void * db |
36 | CODE: | ||
37 | tcidbdel(db); | ||
38 | |||
39 | |||
40 | dpavlin | 4 | int |
41 | dpavlin | 6 | ecode(db) |
42 | dpavlin | 4 | void * db |
43 | CODE: | ||
44 | RETVAL = tcidbecode(db); | ||
45 | OUTPUT: | ||
46 | RETVAL | ||
47 | |||
48 | dpavlin | 5 | |
49 | int | ||
50 | dpavlin | 6 | tune(db, ernum, etnum, iusiz, opts) |
51 | dpavlin | 5 | void * db |
52 | int ernum | ||
53 | int etnum | ||
54 | int iusiz | ||
55 | int opts | ||
56 | CODE: | ||
57 | RETVAL = tcidbtune(db, ernum, etnum, iusiz, opts); | ||
58 | OUTPUT: | ||
59 | RETVAL | ||
60 |
ViewVC Help | |
Powered by ViewVC 1.1.26 |