From 237716b91aa163971f7ebe09fbe2e2ea76880a1e Mon Sep 17 00:00:00 2001
From: Charles Forsyth <charles.forsyth@gmail.com>
Date: Mon, 4 May 2015 13:29:19 +0100
Subject: remove Hp-s800

---
 lib9/lock-Hp-s800.s | 38 --------------------------------------
 1 file changed, 38 deletions(-)
 delete mode 100644 lib9/lock-Hp-s800.s

(limited to 'lib9')

diff --git a/lib9/lock-Hp-s800.s b/lib9/lock-Hp-s800.s
deleted file mode 100644
index 26b6ca47..00000000
--- a/lib9/lock-Hp-s800.s
+++ /dev/null
@@ -1,38 +0,0 @@
-;	
-;	/*
-;	 * To get lock routine, compile this into a .s, then SUBSTITUTE
-;	 * a LOAD AND CLEAR WORD instruction for the load and store of
-;	 * l->key.
-;	 *
-;	 */
-;	typedef struct Lock {
-;		int	key;
-;	} Lock;
-;	
-;	int
-;	mutexlock(Lock *l)
-;	{
-;		int key;
-;	
-;		key = l->key;
-;		l->key = 0;
-;		return key != 0;
-;	}
-
-	.LEVEL	1.1
-
-	.SPACE	$TEXT$,SORT=8
-	.SUBSPA	$CODE$,QUAD=0,ALIGN=8,ACCESS=0x2c,CODE_ONLY,SORT=24
-mutexlock
-	.PROC
-	.CALLINFO FRAME=0,ARGS_SAVED
-	.ENTRY
-; SUBSTITUTED	LDW	0(%r26),%r31
-; SUBSTITUTED	STWS	%r0,0(%r26)
-	LDCWS	0(%r26),%r31	; SUBSTITUTED
-	COMICLR,=	0,%r31,%r28
-	LDI	1,%r28
-	.EXIT
-	BV,N	%r0(%r2)
-	.PROCEND
-	.end
-- 
cgit v1.2.3