Subversion Repositories planix.SVN

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1
#define NPRIVATES	16
2
 
3
TEXT	_mainp(SB), 1, $(16 + NPRIVATES*4)
4
 
5
	MOVW	$setSB(SB), R2
6
	MOVW	R3, _tos(SB)
7
 
8
	MOVW	$p-64(SP), R4
9
	MOVW	R4, _privates+0(SB)
10
	MOVW	$16, R4
11
	MOVW	R4, _nprivates+0(SB)
12
 
13
	BL	_profmain(SB)
14
	MOVW	_tos(SB), R3
15
	MOVW	4(R3), R4
16
	MOVW	R4, 0(R3)
17
	MOVW	inargc-4(FP), R3
18
	MOVW	$inargv+0(FP), R4
19
	MOVW	R3, 4(R1)
20
	MOVW	R4, 8(R1)
21
	BL		main(SB)
22
loop:
23
	MOVW	$exits<>(SB), R3
24
	MOVW	R3, 4(R1)
25
	BL	exits(SB)
26
	MOVW	$_profin(SB), R3	/* force loading of profile */
27
	BR	loop
28
 
29
TEXT	_savearg(SB), 1, $0
30
	RETURN
31
 
32
TEXT	_callpc(SB), 1, $0
33
	MOVW	argp-4(FP), R3
34
	RETURN
35
 
36
DATA	exits<>+0(SB)/4, $"main"
37
GLOBL	exits<>+0(SB), $5