OSDN Git Service

Replace FSF snail mail address with URLs
[uclinux-h8/uClibc.git] / libpthread / nptl / sysdeps / alpha / pthread_spin_trylock.S
1 /* Copyright (C) 2003 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Richard Henderson  <rth@twiddle.net>, 2003.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, see
17    <http://www.gnu.org/licenses/>.  */
18
19
20 #define _ERRNO_H 1
21 #include <bits/errno.h>
22
23         .text
24         .align  4
25
26         .globl  pthread_spin_trylock
27         .ent    pthread_spin_trylock
28 pthread_spin_trylock:
29         .frame  $sp, 0, $26, 0
30         .prologue 0
31
32 0:      ldl_l   $1, 0($16)
33         lda     $2, 1
34         lda     $0, EBUSY
35         bne     $1, 1f
36
37         stl_c   $2, 0($16)
38         beq     $2, 2f
39         mb
40         lda     $0, 0
41
42 1:      ret
43 2:      br      0b
44
45         .end    pthread_spin_trylock