diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-15 19:17:06 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-15 19:17:06 +0000 |
commit | 28e5dec85047e189010079efa89eed07bc9eddc8 (patch) | |
tree | dd941df355c40cba395e514551ea847e8d07edfd /configure.com | |
parent | c11ecd62a73b5b39df29fd460e1c4451c6e0e8af (diff) | |
download | perl-28e5dec85047e189010079efa89eed07bc9eddc8.tar.gz |
Return of the IVUV-preservation, now seems to be happy even
in Digital UNIX (the broken strtoul brokenness detection
seems to have been the fly in the ointment).
p4raw-id: //depot/perl@8138
Diffstat (limited to 'configure.com')
-rw-r--r-- | configure.com | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/configure.com b/configure.com index 13b0d17af4..36bf11e053 100644 --- a/configure.com +++ b/configure.com @@ -3614,6 +3614,24 @@ $ tmp = "strtoq" $ GOSUB inlibc $ d_strtoq = tmp $! +$! Check for strtoq +$! +$ OS +$ WS "#if defined(__DECC) || defined(__DECCXX)" +$ WS "#include <stdlib.h>" +$ WS "#endif" +$ WS "#include <string.h>" +$ WS "int main()" +$ WS "{" +$ WS "__int64 result;" +$ WS "result = strtoq(""123123"", NULL, 10);" +$ WS "exit(0);" +$ WS "}" +$ CS +$ tmp = "strtoq" +$ GOSUB inlibc +$ d_strtoq = tmp +$! $! Check for strtold $! $ OS |