db2/mutex/68020.gcc

   1 /*
   2  * @(#)68020.gcc        10.2 (Sleepycat) 2/15/98
   3  *
   4  * For gcc/68K, 0 is clear, 1 is set.
   5  */
   6 #define TSL_SET(tsl) ({                                                 \
   7         register tsl_t *__l = (tsl);                                    \
   8         int __r;                                                        \
   9             asm volatile("tas  %1; \n                                   \
  10                           seq  %0"                                      \
  11                 : "=dm" (__r), "=m" (*__l)                              \
  12                 : "1" (*__l)                                            \
  13                 );                                                      \
  14         __r & 1;                                                        \
  15 })
  16
  17 #define TSL_UNSET(tsl)  (*(tsl) = 0)
  18 #define TSL_INIT(tsl)   TSL_UNSET(tsl)