Re: Compaq(DEC) Tru64 UNIX - simpler patch

[Marcus G. Daniels]

WN> This seems to work

WN> +   double *resf;

But what does it point at?

Actually, how about avoiding the store instruction and specifying an
explicit register?  Does this work for you?

Index: sendmsg.c
===================================================================
RCS file: /cvs/hive/Swarm/swarm/libobjc/sendmsg.c,v
retrieving revision 1.9
diff -c -r1.9 sendmsg.c
*** sendmsg.c   2001/01/23 00:41:34     1.9
--- sendmsg.c   2001/01/30 20:28:32
***************
*** 520,533 ****
  #ifndef __alpha__
    __builtin_return (res);
  #else
-   /* Emprically determined -- very fragile! -mgd */
    {
!     const char *type = sel_get_type (op);
! 
!     if (*type == _C_FLT)
!       return ((float *) res)[38];
!     else
!       return ((double *) res)[19];
    }
  #endif
  }
--- 520,528 ----
  #ifndef __alpha__
    __builtin_return (res);
  #else
    {
!     register double ret asm ("$f0");
!     return ret;
    }
  #endif
  }

                  ==================================
   Swarm-Support is for discussion of the technical details of the day
   to day usage of Swarm.  For list administration needs (esp.
   [un]subscribing), please send a message to <address@hidden>
   with "help" in the body of the message.