cdc:nos2.source:opl.opl871:common:comtdfp
Common COMTDFP
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.comtdfp +++| # 00002 M00S00002.comtdfp +++| CTEXT COMTDFP - *SSDEF* CONTROL STATEMENT PARAMETERS. 00003 M00S00003.comtdfp +++| # 00004 M00S00004.comtdfp +++| CONTROL NOLIST; 00005 M00S00005.comtdfp +++| CONTROL IFEQ LISTCON,1; 00006 M00S00006.comtdfp +++| CONTROL LIST; 00007 M00S00007.comtdfp +++| CONTROL FI; 00008 M00S00008.comtdfp +++| 00009 M00S00009.comtdfp +++| BEGIN # COMTDFP # 00010 M00S00010.comtdfp +++| 00011 M00S00011.comtdfp +++| # 00012 M00S00012.comtdfp +++|*** COMTDFP - ADDRESSES FOR THE PROCESSED *SSDEF* PARAMETERS. 00013 M00S00013.comtdfp +++|* 00014 M00S00014.comtdfp +++|* *COMTDFP* SETS UP THE *SYMPL*/*COMPASS* DEFINITION OF THE 00015 M00S00015.comtdfp +++|* AREA TO HOLD THE *SSDEF* PROCESSED PARAMETERS. 00016 M00S00016.comtdfp +++| 00017 M00S00017.comtdfp +++| 00018 M00S00018.comtdfp +++| 00019 M00S00019.comtdfp +++| 00020 M00S00020.comtdfp +++|* ADDRESSES AND THE DEFAULT VALUES FOR THE *SSDEF* 00021 M00S00021.comtdfp +++|* CONTROL STATEMENT AND THE DIRECTIVE PARAMETERS. 00022 M00S00022.comtdfp +++| 00023 M00S00023.comtdfp +++| USE /TDFPCOM/ 00024 M00S00024.comtdfp +++| 00025 M00S00025.comtdfp +++| FM DATA -1 FAMILY NAME 00026 M00S00026.comtdfp +++| SM DATA -1 SM NUMBER 00027 M00S00027.comtdfp +++| USE 00028 M00S00028.comtdfp +++| 00029 M00S00029.comtdfp +++| 00030 M00S00030.comtdfp +++|* FOLLOWING ARE THE RELATIVE WORD POSITIONS OF THE PROCESSED 00031 M00S00031.comtdfp +++|* PARAMETERS. ASSEMBLY ERRORS ARE CAUSED BY A CHANGE IN 00032 M00S00032.comtdfp +++|* THIS ORDER. 00033 M00S00033.comtdfp +++| # 00034 M00S00034.comtdfp +++|#FM #DEF# FM+0 # FM$WORD #0#; #*FM*# 00035 M00S00035.comtdfp +++|#SM #DEF# FM+1 # SM$WORD #1#; #*SM*# 00036 M00S00036.comtdfp +++| # 00037 M00S00037.comtdfp +++| COL 12 00038 M00S00038.comtdfp +++| # 00039 M00S00039.comtdfp +++| DEF DFARGL #2#; # LENGTH OF ARGUMENT BUFFER # 00040 M00S00040.comtdfp +++| 00041 M00S00041.comtdfp +++| COMMON TDFPCOM; 00042 M00S00042.comtdfp +++| 00043 M00S00043.comtdfp +++| BEGIN # COMMON AREA TDFPCOM # 00044 M00S00044.comtdfp +++| 00045 M00S00045.comtdfp +++| # 00046 M00S00046.comtdfp +++|* ARRAY TO HOLD THE PROCESSED *SSDEF* PARAMETERS. 00047 M00S00047.comtdfp +++| # 00048 M00S00048.comtdfp +++| 00049 M00S00049.comtdfp +++| ARRAY DFARGUMENTS [0:0] P(DFARGL); 00050 M00S00050.comtdfp +++| BEGIN # ARRAY DFARGUMENTS # 00051 M00S00051.comtdfp +++| ITEM DARG$FM C(FM$WORD,00,07); # FAMILY NAME # 00052 M00S00052.comtdfp +++| ITEM DARG$IFM I(FM$WORD,00,60); # INTEGER NAME # 00053 M00S00053.comtdfp +++| ITEM DARG$SM C(SM$WORD,00,01); # SM NUMBER # 00054 M00S00054.comtdfp +++| ITEM DARG$ISM I(SM$WORD,00,60); # INTEGER SM # 00055 M00S00055.comtdfp +++| ITEM DARG$IRSM I(SM$WORD,00,06); # RANGE INTEGER # 00056 M00S00056.comtdfp +++| ITEM DARG$IRSMR I(SM$WORD,06,54); # *SM* OVERFLOW # 00057 M00S00057.comtdfp +++| END # ARRAY DFARGUMENT # 00058 M00S00058.comtdfp +++| 00059 M00S00059.comtdfp +++| END # COMMON AREA TDFPCOM # 00060 M00S00060.comtdfp +++| 00061 M00S00061.comtdfp +++| END # COMTDFP # 00062 M00S00062.comtdfp +++| # 00063 M00S00063.comtdfp +++| COL 30 00064 M00S00064.comtdfp +++| ENDX # 00065 M00S00065.comtdfp +++| CONTROL LIST;
cdc/nos2.source/opl.opl871/common/comtdfp.txt · Last modified: (external edit)