Home Verkennen Help
Inloggen
pascal
/
fpc
spiegel van https://gitlab.com/freepascal.org/fpc/source.git
2
0
Vork 0
Bestanden Issues 0 Wiki
Boom: f52ea868dd
Aftakkingen Labels
fpc
/
rtl
/
linux
/
m68k
/
prt1.as

prt1.as 666 B
Geschiedenis Ruwe

123456789101112131415161718192021222324252627282930313233343536373839 
  1. .file "prt0.as"
    2. 

  2. 	.text
    3. 

  3.    .globl __entry
    4. 

  4.    .globl _start
    5. 

  5.    .globl __start
    6. 

  6. __entry:
    7. 

  7. _start:
    8. 

  8. __start:
    9. 

  9.        movel (sp)+, d0     
    10. 

  10.        lea   (4,sp,d0*4),a0
    11. 

  11.        movel a0, U_SYSLINUX_ENVP
    12. 

  12.        movel sp,U_SYSLINUX_ARGV
    13. 

  13.        movel d0,U_SYSLINUX_ARGC
    14. 

  14. /*
    15. 

  15.    movel d0,U_SYSLINUX_ENVP
    16. 

  16.    movel 4(sp),d0
    17. 

  17.    movel d0,U_SYSLINUX_ARGV
    18. 

  18.    movel (sp),d0
    19. 

  19.    movel d0,U_SYSLINUX_ARGC */
    20. 

  20.    jsr   PASCALMAIN
    21. 

  21. 

  22.    .globl _haltproc
    23. 

  23.    .globl _HALTPROC
    24. 

  24. _haltproc:
    25. 

  25. _HALTPROC:
    26. 

  26.    moveq #1,d0
    27. 

  27.    movew U_SYSLINUX_EXITCODE,d1
    28. 

  28.    trap  #0
    29. 

  29.    bra   _haltproc
    30. 

  30. 

  31. 

  32.    .data
    33. 

  33. 	.align  4
    34. 

  34.         .globl  ___FPC_BRK_ADDR
    35. 

  35. 	.globl  ___fpc_brk_addr
    36. 

  36. ___fpc_brk_addr:
    37. 

  37. ___FPC_BRK_ADDR:
    38. 

  38. 	.long   0
    39. 

  39.