Common COMCECM

1 Modification

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.comcecm +++|          CTEXT  COMCECM - ECS INTERPRETIVE MODE MACROS.
00002  M01S00002.comcecm +++|          SPACE  4,10
00003  M01S00003.comcecm +++|          BASE   D

Line S00004 Modification History
`M01` (Added by)	`comcecm`
`M02` (Updated by)	`281l803`

Seq #  *Modification Id* Act 
----------------------------+
00004  M02S00004.281l803 ---|*         COMMENT COPYRIGHT CONTROL DATA CORP. 1976.
00005  M01S00001.281l803 +++|*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00006  M01S00005.comcecm +++| ECM      SPACE  4,10
00007  M01S00006.comcecm +++|***       COMCECM - ECS INTERPRETIVE MODE MACROS.
00008  M01S00007.comcecm +++|*         S. V. PRESTON.     76/04/23.
00009  M01S00008.comcecm +++|*         A. J. BEEKMAN.     77/05/27.
00010  M01S00009.comcecm +++| ECM      SPACE  4,10
00011  M01S00010.comcecm +++|***       *COMCECM* CONTAINS REDEFINITIONS OF THE ECS READ AND WRITE
00012  M01S00011.comcecm +++|*         INSTRUCTIONS TO CALL THE INTERPRETIVE MODE PROCESSORS,
00013  M01S00012.comcecm +++|*         *REC=* AND *WEC=*, CONTAINED IN *COMCECS*.  ALSO, *RD* AND
00014  M01S00013.comcecm +++|*         *WT* INSTRUCTIONS ARE DEFINED TO ALLOW READING AND WRITING
00015  M01S00014.comcecm +++|*         ECS NON-INTERPRETIVELY WHILE IN INTERPRETIVE MODE.
00016  M01S00015.comcecm +++| RE       SPACE  4,10
00017  M01S00016.comcecm +++|***       RE - READ ECS IN INTERPRETIVE MODE.
00018  M01S00017.comcecm +++|*
00019  M01S00018.comcecm +++|*         RE     K
00020  M01S00019.comcecm +++|*         RE     BJ
00021  M01S00020.comcecm +++|*         RE     BJ+K
00022  M01S00021.comcecm +++|*
00023  M01S00022.comcecm +++|*         ENTRY  (BJ)+K = THE WORD COUNT FOR THE READ TRANSFER.
00024  M01S00023.comcecm +++|*
00025  M01S00024.comcecm +++|*         CALLS  REC=.
00026  M01S00025.comcecm +++|
00027  M01S00026.comcecm +++|          PURGDEF REQ
00028  M01S00027.comcecm +++|          PURGDEF REB
00029  M01S00028.comcecm +++|          PURGDEF REBQ
00030  M01S00029.comcecm +++|
00031  M01S00030.comcecm +++| REQ      OPDEF  K
00032  M01S00031.comcecm +++|+ RJ =XREC=
00033  M01S00032.comcecm +++|- WC B0+K
00034  M01S00033.comcecm +++|  SB0 B0+
00035  M01S00034.comcecm +++|  ENDM
00036  M01S00035.comcecm +++|
00037  M01S00036.comcecm +++| REB      OPDEF  BJ
00038  M01S00037.comcecm +++|+ RJ =XREC=
00039  M01S00038.comcecm +++|- WC B.BJ+0
00040  M01S00039.comcecm +++|  SB0 B0+
00041  M01S00040.comcecm +++|  ENDM
00042  M01S00041.comcecm +++|
00043  M01S00042.comcecm +++| REBQ     OPDEF  BJ,K
00044  M01S00043.comcecm +++|+ RJ =XREC=
00045  M01S00044.comcecm +++|- WC B.BJ+K
00046  M01S00045.comcecm +++|  SB0 B0+
00047  M01S00046.comcecm +++|  ENDM
00048  M01S00047.comcecm +++| WE       SPACE  4,10
00049  M01S00048.comcecm +++|***       WE - WRITE ECS IN INTERPRETIVE MODE.
00050  M01S00049.comcecm +++|*
00051  M01S00050.comcecm +++|*         WE     K
00052  M01S00051.comcecm +++|*         WE     BJ
00053  M01S00052.comcecm +++|*         WE     BJ+K
00054  M01S00053.comcecm +++|*
00055  M01S00054.comcecm +++|*         ENTRY  (BJ)+K = THE WORD COUNT FOR THE WRITE TRANSFER.
00056  M01S00055.comcecm +++|*
00057  M01S00056.comcecm +++|*         CALLS  WEC=
00058  M01S00057.comcecm +++|
00059  M01S00058.comcecm +++|          PURGDEF WEQ
00060  M01S00059.comcecm +++|          PURGDEF WEB
00061  M01S00060.comcecm +++|          PURGDEF WEBQ
00062  M01S00061.comcecm +++|
00063  M01S00062.comcecm +++| WEQ      OPDEF  K
00064  M01S00063.comcecm +++|+ RJ =XWEC=
00065  M01S00064.comcecm +++|- WC B0+K
00066  M01S00065.comcecm +++|  SB0 B0+
00067  M01S00066.comcecm +++|  ENDM
00068  M01S00067.comcecm +++|
00069  M01S00068.comcecm +++| WEB      OPDEF  BJ
00070  M01S00069.comcecm +++|+ RJ =XWEC=
00071  M01S00070.comcecm +++|- WC B.BJ+0
00072  M01S00071.comcecm +++|  SB0 B0+
00073  M01S00072.comcecm +++|  ENDM
00074  M01S00073.comcecm +++|
00075  M01S00074.comcecm +++| WEBQ     OPDEF  BJ,K
00076  M01S00075.comcecm +++|+ RJ =XWEC=
00077  M01S00076.comcecm +++|- WC B.BJ+K
00078  M01S00077.comcecm +++|  SB0 B0+
00079  M01S00078.comcecm +++|  ENDM
00080  M01S00079.comcecm +++| RD       SPACE  4,10
00081  M01S00080.comcecm +++|***       RD - READ ECS NON-INTERPRETIVELY IN INTERPRETIVE MODE.
00082  M01S00081.comcecm +++|*
00083  M01S00082.comcecm +++|*         RD     K
00084  M01S00083.comcecm +++|*         RD     BJ
00085  M01S00084.comcecm +++|*         RD     BJ+K
00086  M01S00085.comcecm +++|*
00087  M01S00086.comcecm +++|*         ENTRY  (BJ)+K = THE WORD COUNT FOR THE READ TRANSFER.
00088  M01S00087.comcecm +++|
00089  M01S00088.comcecm +++|
00090  M01S00089.comcecm +++|          PURGDEF RDQ
00091  M01S00090.comcecm +++|          PURGDEF RDB
00092  M01S00091.comcecm +++|          PURGDEF RDBQ
00093  M01S00092.comcecm +++|
00094  M01S00093.comcecm +++| RDQ      OPDEF  K
00095  M01S00094.comcecm +++|+ RW B0+K
00096  M01S00095.comcecm +++|  ENDM
00097  M01S00096.comcecm +++|
00098  M01S00097.comcecm +++| RDB      OPDEF  BJ
00099  M01S00098.comcecm +++|+ RW B.BJ+0
00100  M01S00099.comcecm +++|  ENDM
00101  M01S00100.comcecm +++|
00102  M01S00101.comcecm +++| RDBQ     OPDEF  BJ,K
00103  M01S00102.comcecm +++|+ RW B.BJ+K
00104  M01S00103.comcecm +++|  ENDM
00105  M01S00104.comcecm +++| WT       SPACE  4,10
00106  M01S00105.comcecm +++|***       WT - WRITE ECS NON-INTERPRETIVELY IN INTERPRETIVE MODE.
00107  M01S00106.comcecm +++|*
00108  M01S00107.comcecm +++|*         WT     K
00109  M01S00108.comcecm +++|*         WT     BJ
00110  M01S00109.comcecm +++|*         WT     BJ+K
00111  M01S00110.comcecm +++|*
00112  M01S00111.comcecm +++|*         ENTRY  (BJ)+K = THE WORD COUNT FOR THE WRITE TRANSFER.
00113  M01S00112.comcecm +++|
00114  M01S00113.comcecm +++|
00115  M01S00114.comcecm +++|          PURGDEF WTQ
00116  M01S00115.comcecm +++|          PURGDEF WTB
00117  M01S00116.comcecm +++|          PURGDEF WTBQ
00118  M01S00117.comcecm +++|
00119  M01S00118.comcecm +++| WTQ      OPDEF  K
00120  M01S00119.comcecm +++|+ WW B0+K
00121  M01S00120.comcecm +++|  ENDM
00122  M01S00121.comcecm +++|
00123  M01S00122.comcecm +++| WTB      OPDEF  BJ
00124  M01S00123.comcecm +++|+ WW B.BJ+0
00125  M01S00124.comcecm +++|  ENDM
00126  M01S00125.comcecm +++|
00127  M01S00126.comcecm +++| WTBQ     OPDEF  BJ,K
00128  M01S00127.comcecm +++|+ WW B.BJ+K
00129  M01S00128.comcecm +++|  ENDM
00130  M01S00129.comcecm +++|
00131  M01S00130.comcecm +++|*         DEFINE AUXILLIARY OP-CODES.
00132  M01S00131.comcecm +++|
00133  M01S00132.comcecm +++| WCBQ     CPOP   1,000B,020B
00134  M01S00133.comcecm +++| RWBQ     CPOP   1,011B,020B
00135  M01S00134.comcecm +++| WWBQ     CPOP   1,012B,020B
00136  M01S00135.comcecm +++|          SPACE  4,10
00137  M01S00136.comcecm +++|          BASE   *
00138  M01S00137.comcecm +++|          ENDX