File: opp_tstart.s

package info (click to toggle)
fis-gtm 6.3-014-3
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 36,680 kB
  • sloc: ansic: 333,039; asm: 5,180; csh: 4,956; sh: 1,924; awk: 291; makefile: 66; sed: 13
file content (45 lines) | stat: -rwxr-xr-x 1,129 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#################################################################
#								#
#	Copyright 2001, 2010 Fidelity Information Services, Inc	#
#								#
#	This source code contains the intellectual property	#
#	of its copyright holder(s), and is made available	#
#	under a license.  If you do not know the terms of	#
#	the license, please stop and do not read further.	#
#								#
#################################################################

#	PAGE	,132
	.title	opp_tstart.s

#	.386
#	.MODEL	FLAT, C

.include "linkage.si"
	.INCLUDE	"g_msf.si"

	.sbttl	opp_tstart
#	PAGE	+
	.DATA
.extern	frame_pointer 	# /* :DWORD */

	.text
.extern	op_tstart

# PUBLIC	opp_tstart
ENTRY opp_tstart  	# /* PROC */
	putframe
	movl	$0,%eax			# put arg0 over return call address since
	movl	%eax,(%esp)		# .. we dont need it: NOT an implicit tstart
	call	op_tstart
	movl	12(%esp),%eax		# get number of variables to preserve
	cmpl	$0,%eax			# -1 = not restartable,
	jge	l1			# -2 = preserve all variables
	movl	$0,%eax
l1:	addl	$4,%eax			# total args to op_tstart == preservecnt + 4
	leal	(%esp,%eax,4),%esp
	getframe
	ret
# opp_tstart ENDP

# END