home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume25 / trash / part01 / dmult.s < prev    next >
Encoding:
Text File  |  1992-03-22  |  412 b   |  30 lines
  1. /*
  2.  *    int
  3.  *    dmult(s, t, hip, lop)
  4.  *    unsigned long    s;
  5.  *    unsigned long    t;
  6.  *    unsigned long    *hip;
  7.  *    unsigned long    *lop;
  8.  *    {
  9.  *        *hip = high word of double "s * t";
  10.  *        *lop = low word of double "s * t";
  11.  *    
  12.  *        return 0;
  13.  *    }
  14.  */
  15.     .text    
  16.     .align    2
  17.     .globl    dmult
  18.     .ent    dmult 2
  19. dmult:
  20.     .option    O1
  21.     .frame    $sp, 0, $31
  22.     mult    $4, $5
  23.     mfhi    $14
  24.     mflo    $15
  25.     sw    $14, 0($6)
  26.     sw    $15, 0($7)
  27.     move    $2, $0
  28.     j    $31
  29.     .end    dmult
  30.