/[Search-TokyoDystopia]/TokyoDystopia.xs
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /TokyoDystopia.xs

Parent Directory Parent Directory | Revision Log Revision Log


Revision 4 - (hide annotations)
Sun Aug 17 22:30:01 2008 UTC (15 years, 7 months ago) by dpavlin
File size: 549 byte(s)
tcidbecode
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     tcidberrmsg(ecode)
15     int ecode
16     CODE:
17     RETVAL = tchdberrmsg(ecode);
18     OUTPUT:
19     RETVAL
20 dpavlin 2
21    
22     void *
23     tcidbnew()
24     PREINIT:
25     TCIDB *db;
26     CODE:
27     db = tcidbnew();
28     RETVAL = db;
29     OUTPUT:
30     RETVAL
31 dpavlin 3
32    
33     void
34     tcidbdel(db)
35     void * db
36     CODE:
37     tcidbdel(db);
38    
39    
40 dpavlin 4 int
41     tcidbecode(db)
42     void * db
43     CODE:
44     RETVAL = tcidbecode(db);
45     OUTPUT:
46     RETVAL
47    

  ViewVC Help
Powered by ViewVC 1.1.26