12345678910111213141516171819202122232425262728293031323334 |
- #
- # This file is part of the Free Pascal run time library.
- # Copyright (c) 2018 by Yuriy Sydorov and other
- # members of the Free Pascal development team.
- #
- # See the file COPYING.FPC, included in this distribution,
- # for details about the copyright.
- #
- # This program is distributed in the hope that it will be useful,
- # but WITHOUT ANY WARRANTY;without even the implied warranty of
- # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- #
- #**********************************************************************}
- #
- # Program startup code for Free Pascal. Android target.
- #
- /* --------------------------------------------------------- */
- .data
- /* Define a symbol for the first piece of initialized data. */
- .globl __data_start
- __data_start:
- .long 0
- .weak data_start
- data_start = __data_start
- /* --------------------------------------------------------- */
- .section .init_array, "aw"
- .ifdef CPU64
- .quad FPC_PROG_START_ANDROID
- .else
- .long FPC_PROG_START_ANDROID
- .endif
|