1
2 .text
3
4
5
6
7
8
9
10 .global _ip_fast_csum
11 .type _ip_fast_csum,function
12_ip_fast_csum:
13 !! TXRPT needs loops - 1
14 SUBS TXRPT,D0Ar2,
15 MOV D0Re0,
16 BLO $Lfast_csum_exit
17$Lfast_csum_loop:
18 GETD D1Ar3,[D1Ar1++]
19 ADDS D0Re0,D0Re0,D1Ar3
20 ADDCS D0Re0,D0Re0,
21 BR $Lfast_csum_loop
22 LSR D0Ar4,D0Re0,
23 AND D0Re0,D0Re0,
24 AND D0Ar4,D0Ar4,
25 ADD D0Re0,D0Re0,D0Ar4
26 LSR D0Ar4,D0Re0,
27 ADD D0Re0,D0Re0,D0Ar4
28 XOR D0Re0,D0Re0,
29 AND D0Re0,D0Re0,
30$Lfast_csum_exit:
31 MOV PC,D1RtP
32 .size _ip_fast_csum,.-_ip_fast_csum
33