diff options
author | Andrew Dunstan <andrew@dunslane.net> | 2011-04-25 12:56:53 -0400 |
---|---|---|
committer | Andrew Dunstan <andrew@dunslane.net> | 2011-04-25 12:56:53 -0400 |
commit | 860be17ec3c19a1aeba0bbe7ecaf30be409ea446 (patch) | |
tree | d15c287b1ce9ea89d220ec2bf963c1ef61a3792d /src/pl/plperl/plperl.c | |
parent | 77622887449f0fd0eb08b28fe4fa5992c357d45a (diff) |
Assorted minor changes to silence Windows compiler warnings.
Mostly to do with macro redefinitions or object signedness.
Diffstat (limited to 'src/pl/plperl/plperl.c')
-rw-r--r-- | src/pl/plperl/plperl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c index ac9134272cc..b5418074aee 100644 --- a/src/pl/plperl/plperl.c +++ b/src/pl/plperl/plperl.c @@ -3551,7 +3551,7 @@ hv_store_string(HV *hv, const char *key, SV *val) * does not appear that hashes track UTF-8-ness of keys at all in Perl * 5.6. */ - hlen = -strlen(hkey); + hlen = - (int) strlen(hkey); ret = hv_store(hv, hkey, hlen, val, 0); if (hkey != key) @@ -3576,7 +3576,7 @@ hv_fetch_string(HV *hv, const char *key) GetDatabaseEncoding(), PG_UTF8); /* See notes in hv_store_string */ - hlen = -strlen(hkey); + hlen = - (int) strlen(hkey); ret = hv_fetch(hv, hkey, hlen, 0); if (hkey != key) |