diff options
author | Steve Hay <steve.m.hay@googlemail.com> | 2019-10-11 08:10:26 +0100 |
---|---|---|
committer | Steve Hay <steve.m.hay@googlemail.com> | 2019-10-17 08:03:11 +0100 |
commit | 7adf247031f6eae5aa06093376968e8665ebd888 (patch) | |
tree | a1c82968d78d5f9b11a2a3897bf348c0b6820110 /inline.h | |
parent | dd469d97d90432366e531534b23dd30f1f8a07ca (diff) | |
download | perl-7adf247031f6eae5aa06093376968e8665ebd888.tar.gz |
The VC6 Chainsaw Massacre
Remove MS Visual C++ 6.0 support as agreed in the thread starting here:
https://www.nntp.perl.org/group/perl.perl5.porters/2019/07/msg255625.html
Diffstat (limited to 'inline.h')
-rw-r--r-- | inline.h | 19 |
1 files changed, 1 insertions, 18 deletions
@@ -533,24 +533,7 @@ Perl_variant_byte_number(PERL_UINTMAX_T word) /* Get just the msb bits of each byte */ word &= PERL_VARIANTS_WORD_MASK; -# ifdef USING_MSVC6 /* VC6 has some issues with the normal code, and the - easiest thing is to hide that from the callers */ - { - unsigned int i; - const U8 * s = (U8 *) &word; - dTHX; - - for (i = 0; i < sizeof(word); i++ ) { - if (s[i]) { - return i; - } - } - - Perl_croak(aTHX_ "panic: %s: %d: unexpected zero word\n", - __FILE__, __LINE__); - } - -# elif BYTEORDER == 0x1234 || BYTEORDER == 0x12345678 +# if BYTEORDER == 0x1234 || BYTEORDER == 0x12345678 /* Bytes are stored like * Byte8 ... Byte2 Byte1 |