diff options
Diffstat (limited to 'perl/db.xs')
| -rw-r--r-- | perl/db.xs | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/perl/db.xs b/perl/db.xs new file mode 100644 index 000000000..078927275 --- /dev/null +++ b/perl/db.xs @@ -0,0 +1,33 @@ + +MODULE = rpm PACKAGE = rpmdb PREFIX = rpmdb + +void +rpmdbClose(db) + rpmdb db + +unsigned int +rpmdbFirst(db) + rpmdb db + CODE: + RETVAL = rpmdbFirstRecNum(db); + OUTPUT: + RETVAL + +unsigned int +rpmdbNext(db, last_rec) + rpmdb db + unsigned int last_rec + CODE: + RETVAL = rpmdbNextRecNum(db, last_rec); + OUTPUT: + RETVAL + +Header +rpmdbRecord(db, rec) + rpmdb db + unsigned int rec + CODE: + RETVAL = rpmdbGetRecord(db, rec); + OUTPUT: + RETVAL + |