fixed two type mismatch compilation warnings for the perl FKO extension
authorMichael Rash <mbr@cipherdyne.org>
Thu, 18 Apr 2013 03:27:54 +0000 (23:27 -0400)
committerMichael Rash <mbr@cipherdyne.org>
Thu, 18 Apr 2013 03:27:54 +0000 (23:27 -0400)
perl/FKO/FKO.xs

index 5f60ea8..3eaa9ba 100644 (file)
@@ -172,7 +172,7 @@ int
 _get_encryption_mode(ctx, val)
     INPUT:
     fko_ctx_t ctx;
-    short val
+    int val
     CODE:
     RETVAL = fko_get_spa_encryption_mode(ctx, &val);
     OUTPUT:
@@ -195,7 +195,7 @@ _get_hmac_type(ctx, hmac_type)
     fko_ctx_t ctx;
     short    hmac_type;
     CODE:
-    RETVAL = fko_get_spa_hmac_type(ctx, hmac_type);
+    RETVAL = fko_get_spa_hmac_type(ctx, &hmac_type);
     OUTPUT:
     RETVAL