summaryrefslogtreecommitdiff
path: root/vms/vms.c
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2013-03-01 15:06:47 -0600
committerCraig A. Berry <craigberry@mac.com>2013-03-01 15:06:47 -0600
commit81d2d37741adf789b10635452383ba4d142ef89a (patch)
treee7ed95faead2077fb6f62274b856400611e7b5d5 /vms/vms.c
parentd6cfa66953103cdf8a46487b72de6c2c2200aa3a (diff)
downloadperl-81d2d37741adf789b10635452383ba4d142ef89a.tar.gz
Fix signed/unsigned mismatch in vms/vms.c.
Diffstat (limited to 'vms/vms.c')
-rw-r--r--vms/vms.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/vms/vms.c b/vms/vms.c
index 95c63095bf..82b5d16ab7 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -1817,7 +1817,8 @@ mp_do_kill_file(pTHX_ const char *name, int dirflag)
char *vmsname;
char *rslt;
unsigned long int jpicode = JPI$_UIC, type = ACL$C_FILE;
- unsigned long int cxt = 0, aclsts, fndsts, rmsts = -1;
+ unsigned long int cxt = 0, aclsts, fndsts;
+ int rmsts = -1;
struct dsc$descriptor_s fildsc = {0, DSC$K_DTYPE_T, DSC$K_CLASS_S, 0};
struct myacedef {
unsigned char myace$b_length;