mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-13 14:29:25 +02:00
* beautified
This commit is contained in:
parent
c8fcac29f0
commit
7662aa905d
@ -60,7 +60,7 @@ _start:
|
|||||||
ldr ip,=operatingsystem_parameter_envp
|
ldr ip,=operatingsystem_parameter_envp
|
||||||
|
|
||||||
str sp,[a3]
|
str sp,[a3]
|
||||||
str a2,[ip]
|
str a2,[ip]
|
||||||
|
|
||||||
/* Let the libc call main and exit with its return code. */
|
/* Let the libc call main and exit with its return code. */
|
||||||
bl PASCALMAIN
|
bl PASCALMAIN
|
||||||
@ -68,11 +68,11 @@ _start:
|
|||||||
.globl _haltproc
|
.globl _haltproc
|
||||||
.type _haltproc,#function
|
.type _haltproc,#function
|
||||||
_haltproc:
|
_haltproc:
|
||||||
ldr r0,=operatingsystem_result
|
ldr r0,=operatingsystem_result
|
||||||
ldrb r0,[r0]
|
ldrb r0,[r0]
|
||||||
swi 0x900001
|
swi 0x900001
|
||||||
b _haltproc
|
b _haltproc
|
||||||
|
|
||||||
/* Define a symbol for the first piece of initialized data. */
|
/* Define a symbol for the first piece of initialized data. */
|
||||||
.data
|
.data
|
||||||
.globl __data_start
|
.globl __data_start
|
||||||
@ -106,7 +106,10 @@ __data_start:
|
|||||||
|
|
||||||
/*
|
/*
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.4 2004-07-03 21:50:31 daniel
|
Revision 1.5 2004-11-05 12:48:15 florian
|
||||||
|
* beautified
|
||||||
|
|
||||||
|
Revision 1.4 2004/07/03 21:50:31 daniel
|
||||||
* Modified bootstrap code so separate prt0.as/prt0_10.as files are no
|
* Modified bootstrap code so separate prt0.as/prt0_10.as files are no
|
||||||
longer necessary
|
longer necessary
|
||||||
|
|
||||||
@ -119,4 +122,4 @@ __data_start:
|
|||||||
|
|
||||||
Revision 1.1 2003/08/27 13:07:07 florian
|
Revision 1.1 2003/08/27 13:07:07 florian
|
||||||
* initial revision of arm startup code
|
* initial revision of arm startup code
|
||||||
*/
|
*/
|
Loading…
Reference in New Issue
Block a user