Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#define NPRIVATES	16
2 
 
3 
GLOBL	_tos(SB), $4
4 
GLOBL	_privates(SB), $4
5 
GLOBL	_nprivates(SB), $4
6 
 
7 
TEXT	_mainp(SB), 1, $(3*4+NPRIVATES*4)
8 
 
9 
	/* _tos = arg */
10 
	MOVL	AX, _tos(SB)
11 
	LEAL	8(SP), AX
12 
	MOVL	AX, _privates(SB)
13 
	MOVL	$NPRIVATES, _nprivates(SB)
14 
 
15 
	/* _profmain(); */
16 
	CALL	_profmain(SB)
17 
 
18 
	/* _tos->prof.pp = _tos->prof.next; */
19 
	MOVL	_tos+0(SB),DX
20 
	MOVL	4(DX),CX
21 
	MOVL	CX,(DX)
22 
 
23 
	CALL	_envsetup(SB)
24 
 
25 
	/* main(argc, argv, environ); */
26 
	MOVL	inargc-4(FP), AX
27 
	MOVL	AX, 0(SP)
28 
	LEAL	inargv+0(FP), AX
29 
	MOVL	AX, 4(SP)
30 
	MOVL	environ(SB), AX
31 
	MOVL	AX, 8(SP)
32 
	CALL	main(SB)
33 
loop:
34 
	MOVL	AX, 0(SP)
35 
	CALL	exit(SB)
36 
	MOVL	$_profin(SB), AX	/* force loading of profile */
37 
	MOVL	$0, AX
38 
	JMP	loop
39 
 
40 
TEXT	_savearg(SB), 1, $0
41 
	RET
42 
 
43 
TEXT	_callpc(SB), 1, $0
44 
	MOVL	argp+0(FP), AX
45 
	MOVL	4(AX), AX
46 
	RET