home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / AGNUS / SRC / F2C / FMAIN.S
Encoding:
Text File  |  1996-10-26  |  519 b   |  23 lines
  1. | Dieses einfache main()-Modul für GNU-Fortran verbindet *ctr0.o
  2. | mit dem folgenden Aufruf in Ihrem Fortran-Hauptprogramm:
  3. |
  4. |   Entweder definieren Sie ein Unterprogramm:
  5. |     subroutine main()
  6. |   oder Sie verwenden 'program' und übergeben '-DPROGRAM' an gcc
  7. |
  8. | Autor: Volker Hemsen, 23.09.1996, 17.10.1996
  9.  
  10.     .text
  11.  
  12. #ifdef PROGRAM
  13. |Programmstart mit 'program'
  14.     .globl _main,_MAIN__
  15. _main:    jmp    _MAIN__
  16.  
  17. #else
  18. |Programmstart mit 'subroutine main'
  19.     .globl _main,_main_
  20. _main:    jmp    _main_
  21.  
  22. #endif
  23.