ediv.s

Functions

_ediv             X

   1: | /* Copyright (c) 1982, Regents, University of California */
   2:         .text
   3:         .globl  _ediv
   4: _ediv:
   5:         link    a6,#-.F1
   6:         tstb    sp@(-132)
   7:         moveml  #.S1,a6@(-.F1)
   8:         movl    a6@(8),a5
   9:         movl    a5@,d7
  10:         movl    a5@(4),d6
  11:         moveq   #0,d5
  12:         moveq   #0,d4
  13:         movl    a6@(0xc),d3
  14:         clrb    a6@(0xfffffffd)
  15:         clrb    a6@(0xfffffffb)
  16:         movl    d7,a6@(0xfffffff4)
  17:         jge     .L13
  18:         eorb    #1,a6@(0xfffffffd)
  19:         negl    d6
  20:         negxl   d7
  21: .L13:
  22:         tstl    d3
  23:         jge     .L16
  24:         eorb    #1,a6@(0xfffffffd)
  25:         negl    d3
  26: .L16:
  27:         tstl    d3
  28:         jne     .L17
  29:         clrl    a5@
  30:         movl    a6@(0x10),a0
  31:         movb    #1,a0@
  32:         movl    d6,d0
  33:         jra     .L12
  34: .L17:
  35:         movw    #0x20,a6@(0xfffffffe)
  36:         jra     .L20
  37: .L20001:
  38:         lsll    #1,d3
  39:         addqw   #1,a6@(0xfffffffe)
  40:         addql   #1,d5
  41: .L20:
  42:         cmpl    #0x40000000,d3
  43:         jcs     .L20001
  44:         cmpl    d3,d7
  45:         jcs     .L24
  46:         subl    d3,d7
  47:         addql   #1,d4
  48:         jra     .L24
  49: .L20003:
  50:         lsll    #1,d6
  51:         roxll   #1,d7
  52:         asll    #1,d4
  53:         cmpl    d3,d7
  54:         jcs     .L26
  55:         subl    d3,d7
  56:         addql   #1,d4
  57: .L26:
  58:         tstl    d4
  59:         jge     .L22
  60:         movl    a6@(0x10),a0
  61:         movb    #1,a0@
  62: .L22:
  63:         subqw   #1,a6@(0xfffffffe)
  64: .L24:
  65:         tstw    a6@(0xfffffffe)
  66:         jne     .L20003
  67:         lsrl    d5,d7
  68:         tstl    a6@(0xfffffff4)
  69:         jge     .L28
  70:         negl    d7
  71: .L28:
  72:         movl    d7,a5@
  73:         andl    #0x7fffffff,d4
  74:         tstb    a6@(0xfffffffd)
  75:         jeq     .L29
  76:         negl    d4
  77: .L29:
  78:         movl    d4,d0
  79: .L12:
  80:         moveml  a6@(-.F1),#0x20f8
  81:         unlk    a6
  82:         rts
  83: .F1 = 36
  84: .S1 = 0x20f8
  85: | end
  86:         .data

Defined functions

.F1 defined in line 83; never used

.L12 defined in line 79; used 1 times

in line 33

.L13 defined in line 21; used 1 times

in line 17

.L16 defined in line 26; used 1 times

in line 23

.L17 defined in line 34; used 1 times

in line 28

.L20 defined in line 41; used 1 times

in line 36

.L20001 defined in line 37; used 1 times

in line 43

.L20003 defined in line 49; used 1 times

in line 66

.L22 defined in line 62; used 1 times

in line 59

.L24 defined in line 64; used 2 times

in line 45-48(2)

.L26 defined in line 57; used 1 times

in line 54

.L28 defined in line 71; used 1 times

in line 69

.L29 defined in line 77; used 1 times

in line 75

.S1 defined in line 84; never used

_ediv declared in line 3; defined in line 4; used 7 times

in line 3
in /usr/src/ucb/lisp/franz/68k/68k.c line 10, 32
in /usr/src/ucb/lisp/franz/68k/calqhat.c line 25
in /usr/src/ucb/lisp/franz/68k/dodiv.c line 11, 17
in /usr/src/ucb/lisp/franz/68k/mlsb.c line 54

Last modified: 1985-08-14
Generated: 2016-12-26

Generated by src2html V0.67
page hit count: 650