Raw.xs: pass NULL to C function instead of "" with undef string (closes

#16)
ghedo · Dec 18, 2013 · 608cfaa · 608cfaa
1 parent 36fee36
commit 608cfaa
Showing 1 changed file with 9 additions and 2 deletions.
diff --git a/Raw.xs b/Raw.xs
@@ -314,8 +314,15 @@ call(self, ...)
 				case 'd': FFI_SET_ARG(double, SvNV)
 				case 's': {
 					STRLEN l;
-					char **val; Newx(val, 1, char *);
-					*val = SvPV(arg, l);
+					char **val;
+
+					Newx(val, 1, char *);
+
+					if (SvOK(arg))
+						*val = SvPV(arg, l);
+					else
+						*val = NULL;
+
 					values[i] = val;
 					break;
 				}