Parent Directory | Revision Log | Patch
revision 25 by dpavlin, Mon Aug 18 19:01:00 2008 UTC | revision 26 by dpavlin, Mon Aug 18 19:04:10 2008 UTC | |
---|---|---|
# | Line 247 CODE: | Line 247 CODE: |
247 | OUTPUT: | OUTPUT: |
248 | RETVAL | RETVAL |
249 | ||
250 | ||
251 | void | |
252 | tcidbpath(idb) | |
253 | void * idb | |
254 | PREINIT: | |
255 | const char *path; | |
256 | PPCODE: | |
257 | path = tcidbpath(idb); | |
258 | if(path){ | |
259 | XPUSHs(sv_2mortal(newSVpv(path, 0))); | |
260 | } else { | |
261 | XPUSHs((SV *)&PL_sv_undef); | |
262 | } | |
263 | XSRETURN(1); | |
264 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |