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
 |