Parent Directory | Revision Log | Patch
revision 22 by dpavlin, Mon Aug 18 18:53:39 2008 UTC | revision 27 by dpavlin, Mon Aug 18 19:07:04 2008 UTC | |
---|---|---|
# | Line 219 CODE: | Line 219 CODE: |
219 | OUTPUT: | OUTPUT: |
220 | RETVAL | RETVAL |
221 | ||
222 | ||
223 | int | |
224 | tcidboptimize(idb) | |
225 | void * idb | |
226 | CODE: | |
227 | RETVAL = tcidboptimize(idb); | |
228 | OUTPUT: | |
229 | RETVAL | |
230 | ||
231 | ||
232 | int | |
233 | tcidbvanish(idb) | |
234 | void * idb | |
235 | CODE: | |
236 | RETVAL = tcidbvanish(idb); | |
237 | OUTPUT: | |
238 | RETVAL | |
239 | ||
240 | ||
241 | int | |
242 | tcidbcopy(idb, path) | |
243 | void * idb | |
244 | char * path | |
245 | CODE: | |
246 | RETVAL = tcidbcopy(idb, path); | |
247 | OUTPUT: | |
248 | 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 | ||
265 | ||
266 | double | |
267 | tcidbrnum(idb) | |
268 | void * idb | |
269 | CODE: | |
270 | RETVAL = tcidbrnum(idb); | |
271 | OUTPUT: | |
272 | RETVAL | |
273 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |