File: [local] / OpenXM_contrib2 / asir2000 / asm / asm5.s (download)
Revision 1.1.1.1 (vendor branch), Fri Dec 3 07:39:06 1999 UTC (24 years, 10 months ago) by noro
Branch: NORO, MAIN
CVS Tags: maekawa-ipv6, STABLE_1_1_3, R_1_3_1-2, RELEASE_20000124, RELEASE_1_3_1_13b, RELEASE_1_2_3_12, RELEASE_1_2_3, RELEASE_1_2_2_KNOPPIX_b, RELEASE_1_2_2_KNOPPIX, RELEASE_1_2_2, RELEASE_1_2_1, RELEASE_1_1_3, RELEASE_1_1_2, KNOPPIX_2006, HEAD, DEB_REL_1_2_3-9, ASIR2000 Changes since 1.1: +0 -0
lines
Imported asir2000 as OpenXM_contrib2/asir2000.
|
! $OpenXM: OpenXM_contrib2/asir2000/asm/asm5.s,v 1.1.1.1 1999/12/03 07:39:06 noro Exp $
#include "base.h"
.seg "text" ! [internal]
.proc 14
.global _dm
_dm:
umul %o0,%o1,%o0
rd %y,%o1
sll %o1,CBSH,%o1
srl %o0,BSH,%o3
or %o1,%o3,%o1
sethi %hi(BMASK),%o3
add %o3,%lo(BMASK),%o3
and %o0,%o3,%o0
retl
st %o1,[%o2]
.proc 14
.global _dmb
_dmb:
umul %o1,%o2,%o1
udivcc %o1,%o0,%o2
umul %o0,%o2,%o0
subcc %o1,%o0,%o0
retl
st %o2,[%o3]
.proc 14
.global _dma
_dma:
umul %o0,%o1,%o0
rd %y,%o1
addcc %o0,%o2,%o0
addx %g0,%o1,%o1
sll %o1,CBSH,%o1
srl %o0,BSH,%o2
or %o1,%o2,%o1
sethi %hi(BMASK),%o2
add %o2,%lo(BMASK),%o2
and %o0,%o2,%o0
retl
st %o1,[%o3]
.proc 14
.global _dmab
_dmab:
umul %o1,%o2,%o1
rd %y,%o2
addcc %o1,%o3,%o1
addx %g0,%o2,%o2
wr %o2,%g0,%y
udivcc %o1,%o0,%o2
umul %o0,%o2,%o0
subcc %o1,%o0,%o0
retl
st %o2,[%o4]
.proc 14
.global _dsab
_dsab:
srl %o1,CBSH,%o4
wr %o4,%g0,%y
sll %o1,BSH,%o1
or %o2,%o1,%o2
udivcc %o2,%o0,%o4
umul %o0,%o4,%o0
subcc %o2,%o0,%o0
retl
st %o4,[%o3]
.proc 14
.global _dmar
_dmar:
umul %o0,%o1,%o0
rd %y,%o1
addcc %o0,%o2,%o0
addx %g0,%o1,%o1
wr %o1,%g0,%y
udivcc %o0,%o3,%o1
umul %o3,%o1,%o1
retl
subcc %o0,%o1,%o0
.proc 14
.global _dqr
_dqr:
wr %g0,%g0,%y
udiv %o0,%o1,%o3
umul %o1,%o3,%o1
subcc %o0,%o1,%o0
retl
st %o3,[%o2]
.seg "data"