--- typemap +++ typemap @@ -1,4 +1,5 @@ uulist * T_UULIST +crc32_t * T_PTR INPUT --- UUlib.xs +++ UUlib.xs @@ -4,6 +4,7 @@ #include "perlmulticore.h" +#include "uulib/crc32.h" #include "uulib/fptools.h" #include "uulib/uudeview.h" #include "uulib/uuint.h" @@ -345,7 +346,7 @@ UUEncodeMulti(outfile,infile,infname,enc int filemode int -UUEncodePartial(outfile,infile,infname,encoding,outfname,mimetype,filemode,partno,linperfile) +UUEncodePartial(outfile,infile,infname,encoding,outfname,mimetype,filemode,partno,linperfile,crcptr) FILE * outfile FILE * infile char * infname @@ -355,6 +356,7 @@ UUEncodePartial(outfile,infile,infname,e int filemode int partno long linperfile + crc32_t *crcptr int UUEncodeToStream(outfile,infile,infname,encoding,outfname,filemode)