mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 01:19:38 +01:00 
			
		
		
		
	+ xorl ebp,ebp to indicate end of backtrace
This commit is contained in:
		
							parent
							
								
									ee3681a9d6
								
							
						
					
					
						commit
						7469443729
					
				@ -53,6 +53,7 @@ _start:
 | 
			
		||||
        popl    %eax
 | 
			
		||||
        popl    %eax
 | 
			
		||||
 | 
			
		||||
        xorl    %ebp,%ebp
 | 
			
		||||
        call    PASCALMAIN              /* start the program */
 | 
			
		||||
 | 
			
		||||
        .globl _haltproc
 | 
			
		||||
@ -93,7 +94,10 @@ __environ:
 | 
			
		||||
 | 
			
		||||
#
 | 
			
		||||
# $Log$
 | 
			
		||||
# Revision 1.2  1998-10-14 21:28:46  peter
 | 
			
		||||
# Revision 1.3  1998-11-04 10:16:25  peter
 | 
			
		||||
#   + xorl ebp,ebp to indicate end of backtrace
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.2  1998/10/14 21:28:46  peter
 | 
			
		||||
#   * initialize fpu so sigfpe is finally generated for fpu errors
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.1  1998/08/12 19:16:09  peter
 | 
			
		||||
 | 
			
		||||
@ -41,6 +41,7 @@ __entry:
 | 
			
		||||
        call    atexit
 | 
			
		||||
        addl    $4,%esp
 | 
			
		||||
 | 
			
		||||
        xorl    %ebp,%ebp
 | 
			
		||||
        call    PASCALMAIN
 | 
			
		||||
 | 
			
		||||
        .globl  _haltproc
 | 
			
		||||
@ -76,7 +77,10 @@ __curbrk:
 | 
			
		||||
 | 
			
		||||
#
 | 
			
		||||
# $Log$
 | 
			
		||||
# Revision 1.4  1998-10-14 21:28:47  peter
 | 
			
		||||
# Revision 1.5  1998-11-04 10:16:26  peter
 | 
			
		||||
#   + xorl ebp,ebp to indicate end of backtrace
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.4  1998/10/14 21:28:47  peter
 | 
			
		||||
#   * initialize fpu so sigfpe is finally generated for fpu errors
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.3  1998/08/08 14:42:09  peter
 | 
			
		||||
 | 
			
		||||
@ -47,6 +47,7 @@ _start:
 | 
			
		||||
        call    atexit
 | 
			
		||||
        addl    $4,%esp
 | 
			
		||||
 | 
			
		||||
        xorl    %ebp,%ebp
 | 
			
		||||
        call    PASCALMAIN
 | 
			
		||||
 | 
			
		||||
        .globl _haltproc
 | 
			
		||||
@ -83,7 +84,10 @@ __curbrk:
 | 
			
		||||
 | 
			
		||||
#
 | 
			
		||||
# $Log$
 | 
			
		||||
# Revision 1.4  1998-10-14 21:28:48  peter
 | 
			
		||||
# Revision 1.5  1998-11-04 10:16:27  peter
 | 
			
		||||
#   + xorl ebp,ebp to indicate end of backtrace
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.4  1998/10/14 21:28:48  peter
 | 
			
		||||
#   * initialize fpu so sigfpe is finally generated for fpu errors
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.3  1998/08/08 14:42:10  peter
 | 
			
		||||
 | 
			
		||||
@ -32,6 +32,7 @@ __entry:
 | 
			
		||||
        fwait
 | 
			
		||||
        fldcw   ___fpucw
 | 
			
		||||
 | 
			
		||||
        xorl    %ebp,%ebp
 | 
			
		||||
        call    PASCALMAIN
 | 
			
		||||
 | 
			
		||||
        .globl  _haltproc
 | 
			
		||||
@ -56,7 +57,10 @@ ___fpc_brk_addr:
 | 
			
		||||
 | 
			
		||||
#
 | 
			
		||||
# $Log$
 | 
			
		||||
# Revision 1.4  1998-10-14 21:28:49  peter
 | 
			
		||||
# Revision 1.5  1998-11-04 10:16:28  peter
 | 
			
		||||
#   + xorl ebp,ebp to indicate end of backtrace
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.4  1998/10/14 21:28:49  peter
 | 
			
		||||
#   * initialize fpu so sigfpe is finally generated for fpu errors
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.3  1998/08/08 14:42:11  peter
 | 
			
		||||
 | 
			
		||||
@ -38,6 +38,7 @@ _start:
 | 
			
		||||
        fwait
 | 
			
		||||
        fldcw   ___fpucw
 | 
			
		||||
 | 
			
		||||
        xorl    %ebp,%ebp
 | 
			
		||||
        call    PASCALMAIN
 | 
			
		||||
 | 
			
		||||
        .globl  _haltproc
 | 
			
		||||
@ -68,7 +69,10 @@ __curbrk:
 | 
			
		||||
 | 
			
		||||
#
 | 
			
		||||
# $Log$
 | 
			
		||||
# Revision 1.4  1998-10-14 21:28:50  peter
 | 
			
		||||
# Revision 1.5  1998-11-04 10:16:29  peter
 | 
			
		||||
#   + xorl ebp,ebp to indicate end of backtrace
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.4  1998/10/14 21:28:50  peter
 | 
			
		||||
#   * initialize fpu so sigfpe is finally generated for fpu errors
 | 
			
		||||
#
 | 
			
		||||
# Revision 1.3  1998/08/08 14:42:12  peter
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user