← Back to branch summary

~ubuntu-branches/debian/lenny/fpc/lenny

« back to all changes in this revision

Viewing changes to fpcsrc/rtl/palmos/arm/prt0.as

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-05-17 17:12:11 UTC
  • mfrom: (3.1.9 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080517171211-9qi33xhd9evfa0kg
Tags: 2.2.0-dfsg1-9
http://bugs.debian.org/477743
[ Torsten Werner ]
* Add Mazen Neifer to Uploaders field.

[ Mazen Neifer ]
* Moved FPC sources into a version dependent directory from /usr/share/fpcsrc
  to /usr/share/fpcsrc/${FPCVERSION}. This allow installing more than on FPC
  release.
* Fixed far call issue in compiler preventing building huge binearies.
  (closes: #477743)
* Updated building dependencies, recomennded and suggested packages.
* Moved fppkg to fp-utils as it is just a helper tool and is not required by
  compiler.

Show diffs side-by-side

added added

removed removed

Lines of Context:
fpcsrc/rtl/palmos/arm/prt0.as
 
1
/*
 
2
Startup code for WinCE port of Free Pascal
 
3
Written by Yury Sidorov, 2005.
 
4
*/
 
5
 
 
6
.section .text
 
7
@ for kernel exception handler, must be directly before ___EH_CODE_START__
 
8
__EH_HANDLER__:
 
9
        .word _ARM_ExceptionHandler
 
10
        .word 0
 
11
 
 
12
__EH_CODE_START__:
 
13
 
 
14
.globl mainCRTStartup
 
15
mainCRTStartup:
 
16
.globl _mainCRTStartup
 
17
_mainCRTStartup:
 
18
  mov r0,#1
 
19
  b do_start
 
20
 
 
21
.globl WinMainCRTStartup
 
22
WinMainCRTStartup:
 
23
.globl _WinMainCRTStartup
 
24
_WinMainCRTStartup:
 
25
  mov r0,#0
 
26
do_start:
 
27
  ldr r1, _PISCONSOLE
 
28
  strb r0,[r1]
 
29
  bl _FPC_EXE_Entry
 
30
  mov r0,#0
 
31
 
 
32
.globl asm_exit
 
33
asm_exit:
 
34
  bl exitthread
 
35
  
 
36
_PISCONSOLE:
 
37
  .long U_SYSTEM_ISCONSOLE
 
38
 
 
39
.globl exitthread
 
40
exitthread:
 
41
        ldr     ip,.L100
 
42
        ldr pc,[ip]
 
43
.L100:
 
44
  .long .L10
 
45
 
 
46
.section .idata$2
 
47
        .rva    .L7
 
48
        .long   0,0
 
49
        .rva    .L6
 
50
        .rva    .L8
 
51
 
 
52
.section .idata$4
 
53
.L7:
 
54
        .rva    .L9
 
55
        .long   0
 
56
 
 
57
.section .idata$5
 
58
.L8:
 
59
 
 
60
.section .idata$5
 
61
.L10:
 
62
        .rva    .L9
 
63
        .long   0
 
64
 
 
65
.section .idata$6
 
66
.L9:
 
67
        .short  0
 
68
        .ascii  "ExitThread\000"
 
69
        .balign 2,0
 
70
 
 
71
.section .idata$7
 
72
.L6:
 
73
        .ascii  "coredll.dll\000"
 
74
 
 
75
@ for kernel exception handler
 
76
        .section .pdata
 
77
        .word __EH_CODE_START__
 
78
@ max 22 bits for number of instructions
 
79
        .word 0xc0000002 | (0xFFFFF << 8)