Return to rhpfloat.s CVS log

Up to [Research Unix] / researchv10no / cmd / PDP11 / fpp

Annotation of researchv10no/cmd/PDP11/fpp/rhpfloat.s, revision 1.1

1.1     ! root        1: .globl pfloat,pscien,_ftoa
        !             2: .globl _pfloat
        !             3: .text
        !             4: 
        !             5: _pfloat:rts pc
        !             6: pfloat:        mov $'f,-(sp)
        !             7:        br 1f
        !             8: pscien:        mov $'e,-(sp)
        !             9: 1:
        !            10:        mov r0,-(sp)
        !            11:        tst r2
        !            12:        bne 3f
        !            13:        mov $6,(sp)
        !            14: 3:
        !            15:        mov r3,-(sp)
        !            16:        mov 2(r4),-(sp)
        !            17:        mov (r4)+,-(sp)
        !            18:        tst (r4)+
        !            19:        jsr pc,_ftoa
        !            20: 2:     tstb (r3)+
        !            21:        bne 2b
        !            22:        dec r3
        !            23:        add $10.,sp
        !            24:        rts pc

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.