Table of Contents

SSSLV

Table Of Contents

  • [00007] SSSLV - MASA SLAVE EXEC 00,00 OVERLAY IN SLVSKEL.
  • [00049] SXL7100 - MASA SLAVE EXEC 71,00 OVERLAY (INITIALIZER).
  • [00058] SXL7200 - MASA SLAVE EXEC 72,00 OVERLAY (SLVLOOP).

Source Code

SSSLV.txt 
  1.           IDENT  SSSLV 
  2.           LCC    OVERLAY(SSLVOVL,00,00,OV=100)
  3.           LDSET  EPT=SSSLV
  4.           LDSET  EPT=SSJ=
  5.           ENTRY  SSSLV
  6.           ENTRY  SSJ=
  7.           TITLE  SSSLV - MASA SLAVE EXEC 00,00 OVERLAY IN SLVSKEL.
  8. *COMMENT  *MSAS* SLAVE 00,00 OVERLAY.
  9.           COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
  10.  
  11.  SSJ=     EQU    0
  12.  
  13. *****     SLVSKEL - MASA SLAVE EXEC OVERLAY SKELETON.
  14. *
  15. *         SLVSKEL IS A COLLECTION OF COMPASS PROGRAMS TO PROVIDE
  16. *         AN OVERLAY CAPABILITY FOR THE MASA SLAVE EXEC WRITTEN
  17. *         IN SYMPL.
  18. *
  19. *         CURRENTLY THE SYMPL LANGUAGE DOES NOT SUPPORT THE FEATURES
  20. *         NECESSARY TO DESCRIBE AN OVERLAY TO THE LOADER.
  21. *
  22. *         ALL COMPASS ROUTINES EXCEPT THE SSSLV ARE NON-EXECUTED
  23. *         ROUTINES.  THEY PROVIDE THE ENTRY POINT ADDRESS FOR THE
  24. *         OVERLAY AND THE EXTERNAL ADDRESS TO THE SYMPL ROUTINE
  25. *         WHERE CONTROL IS TO PASS TO AFTER THE OVERLAY IS LOADED.
  26. *
  27. *         OVERLAYS ARE LOADED BY AN EXPLICIT CALL BY THE USER PROGRAM.
  28. *     THE OVERLAY LOADER ROUTINE *SSOVL* IS TO BE CALLED BY THE
  29. *         USER TO LOAD AND EXECUTE THE OVERLAY.
  30. *
  31. *         THE DESIGN OF THESE COMPASS ROUTINES IS SUCH TO MEET
  32. *     THE REQUIREMENTS OF THE OVERLAY ROUTINE *SSOVL*.
  33. *
  34. *         EACH OVERLAY CONTAINS -
  35. *           . OVERLAY LOADER DIRECTIVE.
  36. *           . ENTRY POINT.
  37. *           . AT THE ENTRY POINT LOCATION, THE ADDRESS
  38. *             TO THE PROGRAM TO BE EXECUTED.
  39. *
  40. *
  41.  SSSLV  BSS    0
  42.           RJ     =XSLVEXEC
  43.           ENDRUN
  44.           END    SSSLV
  45.           IDENT  SXL7100
  46.           LCC    OVERLAY(SSLVOVL,71,00)
  47.           LDSET  OMIT=SSJ=
  48.           ENTRY  SXL7100
  49.           TITLE  SXL7100 - MASA SLAVE EXEC 71,00 OVERLAY (INITIALIZER).
  50. *COMMENT  SSEXEC - 71,00 OVERLAY (INITIALIZER).
  51.           COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
  52.  SXL7100  BSS
  53.           RJ     =XSLVINIT   PROCEDURE ADDRESS
  54.           END    SXL7100
  55.           IDENT  SXL7200
  56.           LCC    OVERLAY(SSLVOVL,72,00)
  57.           ENTRY  SXL7200
  58.           TITLE  SXL7200 - MASA SLAVE EXEC 72,00 OVERLAY (SLVLOOP).
  59. *COMMENT  SSEXEC - 72,00 OVERLAY (SLVLOOP).
  60.           COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
  61.  SXL7200  BSS
  62.           RJ     =XSLVLOOP   PROCEDURE ADDRESS
  63.           END    SXL7200