From 522e03c3f5563367eb3f897f8cc7c438267c7a58 Mon Sep 17 00:00:00 2001 From: Sylvain Colinet Date: Sat, 19 Dec 2015 12:49:18 +0100 Subject: [PATCH] Add the missing test file related to NC api version stuff --- t/04-nativecall/17-libnames.t | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 t/04-nativecall/17-libnames.t diff --git a/t/04-nativecall/17-libnames.t b/t/04-nativecall/17-libnames.t new file mode 100644 index 00000000000..6adbd939b86 --- /dev/null +++ b/t/04-nativecall/17-libnames.t @@ -0,0 +1,17 @@ +use Test; + +use NativeCall :TEST; + +plan 7; + +if $*KERNEL ~~ 'linux' { + ok guess_library_name("libfoo") eq "libfoo.so", "libfoo is libfoo.so and should warn"; + ok guess_library_name(("libfoo", 1)) eq "libfoo.so.1", "libfoo , 1 is libfoo.so.1"; + ok guess_library_name(("libfoo", v1.2.3)) eq "libfoo.so.1.2.3", "libfoo , v1.2.3 is libfoo.so.1.2.3"; + ok guess_library_name("libfoo.so") eq "libfoo.so", "libfoo.so is libfoo.so"; + ok guess_library_name("./libfoo") eq "./libfoo.so", "./libfoo is ./libfoo.so"; + ok guess_library_name("./libfoo.so") eq "./libfoo.so", "./libfoo.so is ./libfoo.so"; + ok guess_library_name("/libfoo.so") eq "/libfoo.so", "/libfoo.so is /libfoo.so"; +} else { + skip 7; +} \ No newline at end of file