BSD 3 release

[unix-history] / usr / src / cmd / px / 20con.s

#\f
# 20con.s
#
# CONOPS
#
_CON1:
       cvtbw   (r10)+,-(sp)
       jmp     (r8)
_CON2:
       incl    r10
       movw    (r10)+,-(sp)
       jmp     (r8)
_CON4:
       incl    r10
       pushl   (r10)+
       jmp     (r8)
_CON8:
       incl    r10
       movd    (r10)+,-(sp)
       jmp     (r8)
_CON:
       cvtbl   (r10)+,r0
       bneq    l2001
       cvtwl   (r10)+,r0       #r0 has length to be moved
l2001:
       movl    r10,r1          #r1 has addr of data to be moved
       movl    r0,r2           #r2 has length of stack space
       blbc    r2,l2002
       incl    r2
l2002:
       subl2   r2,sp           #allocate stack space
       addl2   r2,r10          #advance over data
       movc5   r0,(r1),$0,r2,(sp)   #move string to stack
       jmp     (r8)