[Perl-openssl-checkins] Crypt/OpenSSL/RSA RSA.xs,1.59,1.60

[Ian R. <iro...@us...>]

Update of /cvsroot/perl-openssl/Crypt/OpenSSL/RSA
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22098

Modified Files:
	RSA.xs 
Log Message:
to_length needs to be an int, not a STRLEN, since the latter is unsigned.


Index: RSA.xs
===================================================================
RCS file: /cvsroot/perl-openssl/Crypt/OpenSSL/RSA/RSA.xs,v
retrieving revision 1.59
retrieving revision 1.60
diff -C2 -d -r1.59 -r1.60
*** RSA.xs	12 Apr 2006 06:05:06 -0000	1.59
--- RSA.xs	12 Nov 2006 20:46:52 -0000	1.60
***************
*** 183,187 ****
                int (*p_crypt)(int, const unsigned char*, unsigned char*, RSA*, int))
  {
!     STRLEN from_length, to_length;
      int size;
      unsigned char* from;
--- 183,188 ----
                int (*p_crypt)(int, const unsigned char*, unsigned char*, RSA*, int))
  {
!     STRLEN from_length;
!     int to_length;
      int size;
      unsigned char* from;