proxmox-mirrors/perlmod
1
0
Fork 0
mirror of https://git.proxmox.com/git/perlmod synced 2025-10-04 22:07:05 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

update test files

Browse Source 
Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
This commit is contained in:
Wolfgang Bumiller 2021-06-23 10:58:31 +02:00
parent fbf0c7a20b
commit fa780264ca
4 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
perlmod-test/Cargo.toml
View File

@ -10,3 +10,4 @@ crate-type = [ "cdylib" ]
[dependencies]
anyhow = "1.0"
perlmod = { path = "../perlmod", features = [ "exporter" ] }
serde = { version = "1.0", features = [ "derive" ] }

11
perlmod-test/src/pkg142.rs
View File

@ -1,3 +1,8 @@
use serde::{Deserialize, Serialize};
#[derive(Debug, Deserialize, Serialize)]
pub struct Blubber(String);
#[perlmod::package(name = "RSPM::Foo142", lib = "perlmod_test")]
mod export {
use anyhow::{bail, Error};
@ -22,4 +27,10 @@ mod export {
println!("teststr called with {:?}", t);
Ok(())
}
#[export]
fn test_serde(value: super::Blubber) -> Result<(), Error> {
println!("got {:?}", value);
Ok(())
}
}

2
test.pl
View File

@ -24,3 +24,5 @@ print "Parameter exists: " . (exists($param->{x}) ? "YES" : "NO") . "\n";
RSPM::Foo142::test($param->{x});
print "Was auto-vivified: " . (exists($param->{x}) ? "YES" : "NO") . "\n";
RSPM::Foo142::teststr($param->{x});
RSPM::Foo142::test_serde("Hello");

1
test.pl.expected
View File

@ -4,6 +4,7 @@ test called with Some("lo ")
teststr called with Some("lo ")
test called with None
teststr called with None
got Blubber("Hello")
Got (17, 32, )
Got: 2 values: 17 32
These should be called with a valid substr: