prt0.as 999 B

12345678910111213141516171819202122232425262728293031323334
  1. #
  2. # This file is part of the Free Pascal run time library.
  3. # Copyright (c) 2018 by Yuriy Sydorov and other
  4. # members of the Free Pascal development team.
  5. #
  6. # See the file COPYING.FPC, included in this distribution,
  7. # for details about the copyright.
  8. #
  9. # This program is distributed in the hope that it will be useful,
  10. # but WITHOUT ANY WARRANTY;without even the implied warranty of
  11. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12. #
  13. #**********************************************************************}
  14. #
  15. # Program startup code for Free Pascal. Android target.
  16. #
  17. /* --------------------------------------------------------- */
  18. .data
  19. /* Define a symbol for the first piece of initialized data. */
  20. .globl __data_start
  21. __data_start:
  22. .long 0
  23. .weak data_start
  24. data_start = __data_start
  25. /* --------------------------------------------------------- */
  26. .section .init_array, "aw"
  27. .ifdef CPU64
  28. .quad FPC_PROG_START_ANDROID
  29. .else
  30. .long FPC_PROG_START_ANDROID
  31. .endif