Changeset 17714


Ignore:
Timestamp:
11/05/08 16:52:51 (12 years ago)
Author:
ak19
Message:

No longer defaults to big endian for all Macintosh machines regardless of what endian they are. It has now gone back to returning exactly whatever endian the machine is.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/util.pm

    r17572 r17714  
    857857
    858858    #return 0 if $^O =~ /^darwin$/i;
    859     return 0 if $ENV{'GSDLOS'} =~ /^darwin$/i;
     859    #return 0 if $ENV{'GSDLOS'} =~ /^darwin$/i;
     860   
     861    # Going back to stating exactly whether the machine is little endian
     862    # or big endian, without any special case for Macs. Since for rata it comes
     863    # back with little endian and for shuttle with bigendian.
    860864    return (ord(substr(pack("s",1), 0, 1)) == 1);
    861865}
Note: See TracChangeset for help on using the changeset viewer.