# $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
#
-# Generated on Fri Feb 8 22:04:29 EET 2002 [metaconfig 3.0 PL70]
+# Generated on Mon Feb 11 00:20:30 EET 2002 [metaconfig 3.0 PL70]
# (with additional metaconfig patches by perlbug@perl.org)
cat >c1$$ <<EOF
: determine whether symbolic links are supported
echo " "
case "$lns" in
-*"ln -s")
+*"ln$_exe -s")
echo "Checking how to test for symbolic links..." >&4
$lns blurfl sym
if $test "X$issymlink" = X; then
#endif
int main() {
#if BYTEORDER == 0x1234 || BYTEORDER == 0x4321
- U8 *buf = (U8*)"\0\0\0\1\0\0\0\0";
+ U8 buf[8];
U32 *up;
int i;
signal(SIGBUS, bletch);
#endif
+ buf[0] = 0;
+ buf[1] = 0;
+ buf[2] = 0;
+ buf[3] = 1;
+ buf[5] = 0;
+ buf[6] = 0;
+ buf[7] = 0;
+ buf[8] = 1;
+
for (i = 0; i < 4; i++) {
up = (U32*)(buf + i);
if (! ((*up == 1 << (8*i)) || /* big-endian */