Table of Contents

REGEQU Source

References

Source Listing

REGEQU.MACRO.txt
  1. MACRO 00001000
  2. REGEQU 00002000
  3. PUSH PRINT 00002200
  4. AIF ('&SYSPARM' NE 'SUP').ACC01 00002400
  5. PRINT OFF,NOGEN 00002600
  6. .ACC01 ANOP 00002800
  7. * 00003000
  8. *** SYMBOLIC REGISTER EQUATES 00004000
  9. * 00005000
  10. SPACE 2 00006000
  11. * GENERAL PURPOSE REGISTERS 00007000
  12. SPACE 00008000
  13. R0 EQU 0 00009000
  14. R1 EQU 1 00010000
  15. R2 EQU 2 00011000
  16. R3 EQU 3 00012000
  17. R4 EQU 4 00013000
  18. R5 EQU 5 00014000
  19. R6 EQU 6 00015000
  20. R7 EQU 7 00016000
  21. R8 EQU 8 00017000
  22. R9 EQU 9 00018000
  23. R10 EQU 10 00019000
  24. R11 EQU 11 00020000
  25. R12 EQU 12 00021000
  26. R13 EQU 13 00022000
  27. R14 EQU 14 00023000
  28. R15 EQU 15 00024000
  29. SPACE 00025000
  30. * FLOATING POINT REGISTERS 00026000
  31. SPACE 00027000
  32. F0 EQU 0 00028000
  33. F2 EQU 2 00029000
  34. F4 EQU 4 00030000
  35. F6 EQU 6 00031000
  36. SPACE 00032000
  37. * EXTENDED CONTROL REGISTERS 00033000
  38. SPACE 00034000
  39. C0 EQU 0 00035000
  40. C1 EQU 1 00036000
  41. C2 EQU 2 00037000
  42. C3 EQU 3 00038000
  43. C4 EQU 4 00039000
  44. C5 EQU 5 00040000
  45. C6 EQU 6 00041000
  46. C7 EQU 7 00042000
  47. C8 EQU 8 00043000
  48. C9 EQU 9 00044000
  49. C10 EQU 10 00045000
  50. C11 EQU 11 00046000
  51. C12 EQU 12 00047000
  52. C13 EQU 13 00048000
  53. C14 EQU 14 00049000
  54. C15 EQU 15 00050000
  55. EJECT 00051000
  56. POP PRINT 00051100
  57. MEND 00052000