about summary refs log tree commit diff
path: root/db2/mutex/parisc.gcc
diff options
context:
space:
mode:
Diffstat (limited to 'db2/mutex/parisc.gcc')
-rw-r--r--db2/mutex/parisc.gcc18
1 files changed, 7 insertions, 11 deletions
diff --git a/db2/mutex/parisc.gcc b/db2/mutex/parisc.gcc
index e15f6f2dba..2e4540f767 100644
--- a/db2/mutex/parisc.gcc
+++ b/db2/mutex/parisc.gcc
@@ -1,5 +1,5 @@
-/* 
- * @(#)parisc.gcc	8.5 (Sleepycat) 1/18/97
+/*
+ * @(#)parisc.gcc	8.8 (Sleepycat) 6/2/98
  *
  * Copyright (c) 1996-1997, The University of Utah and the Computer Systems
  * Laboratory at the University of Utah (CSL).  All rights reserved.
@@ -22,19 +22,15 @@
 
 /*
  * The PA-RISC has a "load and clear" instead of a "test and set" instruction.
- * The 32-bit word used by that instruction must be 16-byte aligned hence we
- * allocate 16 bytes for a tsl_t and use the word that is properly aligned.
- * We could use the "aligned" attribute in GCC but that doesn't work for stack
- * variables.
+ * The 32-bit word used by that instruction must be 16-byte aligned.  We could
+ * use the "aligned" attribute in GCC but that doesn't work for stack variables.
  */
 #define	TSL_SET(tsl) ({							\
-	int *__l = (int *)(((int)(tsl)+15)&~15);			\
+	register tsl_t *__l = (tsl);					\
 	int __r;							\
 	asm volatile("ldcws 0(%1),%0" : "=r" (__r) : "r" (__l));	\
 	__r & 1;							\
 })
 
-#define	TSL_UNSET(tsl) ({						\
-	int *__l = (int *)(((int)(tsl)+15)&~15);			\
-	*__l = -1;							\
-})
+#define	TSL_UNSET(tsl)	(*(tsl) = -1)
+#define	TSL_INIT(tsl)	TSL_UNSET(tsl)