home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TPU2OBJ.ZIP / TPSYS.ASM < prev    next >
Encoding:
Assembly Source File  |  1988-04-04  |  349 b   |  26 lines
  1.  
  2.   TITLE TPSYS
  3.  
  4. ; Externals from Turbo Pascal
  5.  
  6.        EXTRN SYSTEM_INIT: FAR
  7.  
  8. ; Externals from Turbo Pascal ends
  9.  
  10.  
  11.  
  12. SYSTEM_TEXT     SEGMENT PARA PUBLIC 'CODE'
  13.                 ASSUME CS:SYSTEM_TEXT
  14.  
  15.                 PUBLIC TPSYS_0
  16.  
  17. TPSYS_0 PROC  FAR
  18.                CALL SYSTEM_INIT
  19.  
  20. TPSYS_0 ENDP
  21.  
  22. SYSTEM_TEXT  ENDS
  23.     END
  24.  
  25.  
  26.