Proxmox/perlmod
5
0
Fork 0
mirror of git://git.proxmox.com/git/perlmod.git synced 2025-03-13 04:58:16 +03:00
Code Issues Packages Projects Releases Wiki Activity

Value: add bless_sv method for convenience

Browse Source 
Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
This commit is contained in:
Wolfgang Bumiller 2020-11-25 12:06:50 +01:00
parent e62be4a750
commit 0eebb7e1d9
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
perlmod/src/value.rs
View File

@ -68,16 +68,23 @@ impl Value {
/// Bless a reference into a package. The `Value` must be a reference.
pub fn bless(&self, package: &str) -> Result<Value, Error> {
let pkgsv = Scalar::new_string(package);
self.bless_sv(&pkgsv)
}
pub fn bless_sv(&self, pkgsv: &ScalarRef) -> Result<Value, Error> {
let stash = unsafe { ffi::RSPL_gv_stashsv(pkgsv.sv(), 0) };
if stash.is_null() {
return Err(Error(format!("failed to find package {:?}", package)));
return Err(Error(format!(
"failed to find package {:?}",
pkgsv.pv_utf8()
)));
}
let value = unsafe { ffi::RSPL_sv_bless(self.sv(), stash) };
if value.is_null() {
return Err(Error(format!(
"failed to bless value into package {:?}",
package
pkgsv.pv_utf8()
)));
}