chiark - git - mdw - ssr/blob - StraySrc/Libraries/DLLLib/s/appEntry

   1 ;
   2 ; appEntry.s
   3 ;
   4 ; Registering application entry points
   5 ;
   6 ; © 1994 Straylight
   7 ;
   8
   9 ;----- Standard stuff -------------------------------------------------------
  10
  11                 GET     libs:header
  12                 GET     libs:swis
  13
  14 ;----- Main code ------------------------------------------------------------
  15
  16                 AREA    |DLL$$Code|,CODE,READONLY
  17
  18 ; --- _dll_regAppEntry ---
  19 ;
  20 ; On entry:     a1 == pointer to stubs table
  21 ;               a2 == pointer to name table
  22 ; On exit:      --
  23
  24                 EXPORT  |_dll_regAppEntry|
  25 |_dll_regAppEntry| ROUT
  26
  27                 MOV     ip,lr
  28                 SWI     DLL_RegisterAppEntryTable
  29                 MOVS    pc,ip
  30
  31                 LTORG
  32
  33 ;----- That's all, folks ----------------------------------------------------
  34
  35                 END