OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [libjava/] [sysdep/] [alpha/] [locks.h] - Blame information for rev 14

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 14 jlechner
// locks.h - Thread synchronization primitives. Alpha implementation.
2
 
3
/* Copyright (C) 2002  Free Software Foundation
4
 
5
   This file is part of libgcj.
6
 
7
This software is copyrighted work licensed under the terms of the
8
Libgcj License.  Please consult the file "LIBGCJ_LICENSE" for
9
details.  */
10
 
11
#ifndef __SYSDEP_LOCKS_H__
12
#define __SYSDEP_LOCKS_H__
13
 
14
typedef size_t obj_addr_t;      /* Integer type big enough for object   */
15
                                /* address.                             */
16
 
17
inline static bool
18
compare_and_swap(volatile obj_addr_t *addr,
19
                                              obj_addr_t old,
20
                                              obj_addr_t new_val)
21
{
22
  unsigned long oldval;
23
  char result;
24
  __asm__ __volatile__(
25
      "1:ldq_l %0, %1\n\t" \
26
      "cmpeq %0, %5, %2\n\t" \
27
      "beq %2, 2f\n\t" \
28
      "mov %3, %0\n\t" \
29
      "stq_c %0, %1\n\t" \
30
      "bne %0, 2f\n\t" \
31
      "br 1b\n\t" \
32
      "2:mb"
33
              : "=&r"(oldval), "=m"(*addr), "=&r"(result)
34
              : "r" (new_val), "m"(*addr), "r"(old) : "memory");
35
  return (bool) result;
36
}
37
 
38
inline static void
39
release_set(volatile obj_addr_t *addr, obj_addr_t new_val)
40
{
41
  __asm__ __volatile__("mb" : : : "memory");
42
  *(addr) = new_val;
43
}
44
 
45
inline static bool
46
compare_and_swap_release(volatile obj_addr_t *addr,
47
                                                     obj_addr_t old,
48
                                                     obj_addr_t new_val)
49
{
50
  return compare_and_swap(addr, old, new_val);
51
}
52
 
53
#endif

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.