uml: host_info tidying
[linux-2.6] / arch / sparc / lib / ashldi3.S
1 /* $Id: ashldi3.S,v 1.2 1999/11/19 04:11:46 davem Exp $
2  * ashldi3.S:   GCC emits these for certain drivers playing
3  *              with long longs.
4  *
5  * Copyright (C) 1999 David S. Miller (davem@redhat.com)
6  */
7
8         .text
9         .align  4
10         .globl  __ashldi3
11 __ashldi3:
12         cmp     %o2, 0
13         be      9f
14          mov    0x20, %g2
15
16         sub     %g2, %o2, %g2
17         cmp     %g2, 0
18         bg      7f
19          sll    %o0, %o2, %g3
20
21         neg     %g2
22         clr     %o5
23         b       8f
24          sll    %o1, %g2, %o4
25 7:
26         srl     %o1, %g2, %g2
27         sll     %o1, %o2, %o5
28         or      %g3, %g2, %o4
29 8:
30         mov     %o4, %o0
31         mov     %o5, %o1
32 9:
33         retl
34          nop