diff options
author | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2007-07-03 18:11:08 +0000 |
---|---|---|
committer | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2007-07-03 18:11:08 +0000 |
commit | fc2c5fcbfd9645638db179000ad03e272dae9187 (patch) | |
tree | 3d19969526d9cfa243d9b268d1851a1fe0c6fd83 /RPM4/src | |
parent | 8e57ea941d277c1e603b222abaf2d64b1ee359a2 (diff) | |
download | perl-RPM4-fc2c5fcbfd9645638db179000ad03e272dae9187.tar perl-RPM4-fc2c5fcbfd9645638db179000ad03e272dae9187.tar.gz perl-RPM4-fc2c5fcbfd9645638db179000ad03e272dae9187.tar.bz2 perl-RPM4-fc2c5fcbfd9645638db179000ad03e272dae9187.tar.xz perl-RPM4-fc2c5fcbfd9645638db179000ad03e272dae9187.zip |
- add platformscore() function
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@127 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src')
-rw-r--r-- | RPM4/src/RPM4.xs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index beefdc0..ca5a672 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -791,6 +791,20 @@ archscore(arch, build = 0) OUTPUT: RETVAL +int +platformscore(platform) + const char * platform + PREINIT: + CODE: +#ifdef RPM4_4_8 + RETVAL=rpmPlatformScore(platform, NULL, 0); +#else + RETVAL=0; + croak("platformscore exists only from rpm 4.4.8"); +#endif + OUTPUT: + RETVAL + void buildhost() PPCODE: |