47 lines
		
	
	
	
		
			761 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			47 lines
		
	
	
	
		
			761 B
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
 | 
						|
.define _semctl
 | 
						|
.define _semop
 | 
						|
.define _semget
 | 
						|
sem = 53
 | 
						|
.extern	_semop
 | 
						|
.extern	_semctl
 | 
						|
.extern	_semget
 | 
						|
.extern	_syscall
 | 
						|
 | 
						|
_semctl:
 | 
						|
 	link	a6,#0
 | 
						|
 	tst.b	-32(sp)
 | 
						|
 	move.l	20(a6),-(sp)
 | 
						|
 	move.l	16(a6),-(sp)
 | 
						|
 	move.l	12(a6),-(sp)
 | 
						|
 	move.l	8(a6),-(sp)
 | 
						|
 	clr.l	-(sp)
 | 
						|
 	move.l	#sem,-(sp)
 | 
						|
 	jsr	_syscall
 | 
						|
 	add	#0x18,sp
 | 
						|
 	unlk	a6
 | 
						|
 	rts
 | 
						|
_semget:
 | 
						|
 	link	a6,#0
 | 
						|
 	tst.b	-32(sp)
 | 
						|
 	move.l	16(a6),-(sp)
 | 
						|
 	move.l	12(a6),-(sp)
 | 
						|
 	move.l	8(a6),-(sp)
 | 
						|
 	move.l	#1,-(sp)
 | 
						|
 	move.l	#sem,-(sp)
 | 
						|
 	jsr	_syscall
 | 
						|
 	add	#0x14,sp
 | 
						|
 	unlk	a6
 | 
						|
 	rts
 | 
						|
_semop:
 | 
						|
 	link	a6,#0
 | 
						|
 	tst.b	-32(sp)
 | 
						|
 	move.l	16(a6),-(sp)
 | 
						|
 	move.l	12(a6),-(sp)
 | 
						|
 	move.l	8(a6),-(sp)
 | 
						|
 	move.l	#2,-(sp)
 | 
						|
 	move.l	#sem,-(sp)
 | 
						|
 	jsr	_syscall
 | 
						|
 	add	#0x14,sp
 | 
						|
 	unlk	a6
 | 
						|
 	rts
 |