ports/security/p5-Crypt-GOST/files/patch-GOST.xs
2015-04-24 16:20:31 +00:00

15 lines
492 B
Text

--- GOST.xs.orig 2001-05-13 14:11:35 UTC
+++ GOST.xs
@@ -54,9 +54,11 @@ gost_crypt(self, input, output, decrypt)
output = sv_newmortal();
outlen = 8;
- if (SvREADONLY(output) || !SvUPGRADE(output, SVt_PV))
+ if (SvREADONLY(output))
croak("cannot use output as lvalue");
+ SvUPGRADE(output, SVt_PV);
+
gost_crypt(self,
(unsigned char *)input,
(unsigned char *)SvGROW(output, outlen),