/*
 *  The bindings for the following semaphore functions are incorrect
 *  in the lattice/manx 1.2 clibs:
 *
 *	RemSemaphore
 *	FindSemaphore
 *	AddSemaphore
 */

#include <local/typedefs.h>

#asm
		public	_LVOFindSemaphore
		public	_LVORemSemaphore
		public	_SysBase
		public	_RemSemaphore
		public	_FindSemaphore

_RemSemaphore:	move.l	4(sp),A1
		move.l	_SysBase,A6
		jmp	_LVORemSemaphore(A6)

_FindSemaphore: move.l	4(sp),A1
		move.l	_SysBase,A6
		jmp	_LVOFindSemaphore(A6)

#endasm

extern EXECBASE *SysBase;

AddSemaphore(ss)
SIGSEM *ss;
{
    InitSemaphore(ss);
    Forbid();
    Enqueue(&SysBase->SemaphoreList,ss);
    Permit();
}