OpenAD/Open64Dox/s__asg__expr_8m_source.html

00001 /*
00002
00003   Copyright (C) 2000, 2001 Silicon Graphics, Inc.  All Rights Reserved.
00004
00005   This program is free software; you can redistribute it and/or modify it
00006   under the terms of version 2 of the GNU General Public License as
00007   published by the Free Software Foundation.
00008
00009   This program is distributed in the hope that it would be useful, but
00010   WITHOUT ANY WARRANTY; without even the implied warranty of
00011   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
00012
00013   Further, this software is distributed without any warranty that it is
00014   free of the rightful claim of any third person regarding infringement
00015   or the like.  Any license provided herein, whether implied or
00016   otherwise, applies only to this software file.  Patent licenses, if
00017   any, provided herein do not apply to combinations of this program with
00018   other software, or any other product whatsoever.
00019
00020   You should have received a copy of the GNU General Public License along
00021   with this program; if not, write the Free Software Foundation, Inc., 59
00022   Temple Place - Suite 330, Boston MA 02111-1307, USA.
00023
00024   Contact information:  Silicon Graphics, Inc., 1600 Amphitheatre Pky,
00025   Mountain View, CA 94043, or:
00026
00027   http://www.sgi.com
00028
00029   For further information regarding this notice, see:
00030
00031   http://oss.sgi.com/projects/GenInfo/NoticeExplan
00032
00033 */
00034
00035
00036 /* USMID:  "\n@(#)5.0_pl/macros/s_asg_expr.m    5.1     04/29/99 21:22:31\n" */
00037
00038
00039 /*****************\
00040 |* MISCELLANEOUS *|
00041 \*****************/
00042
00043 # ifdef _TARGET64
00044 #   define      INT_WORD        Integer_8
00045 # else
00046 #   define      INT_WORD        Integer_4
00047 # endif
00048
00049 # ifdef _TARGET64
00050 #   define      MACH_SPEC       TRUE , Typeless_8
00051 # else
00052 #   define      MACH_SPEC       FALSE, Err_Res
00053 # endif
00054
00055 # define EQUAL_OP       0
00056 # define NOT_EQUAL      1
00057 # define LESS_THAN      0
00058 # define LESS_EQ        1
00059 # define GREATER_THAN   2
00060 # define GREATER_EQ     3
00061
00062
00063 /********************\
00064 |* SIZES AND LIMITS *|
00065 \********************/
00066
00067
00068 /******************************\
00069 |* OBJECT REPLACEMENT STRINGS *|
00070 \******************************/
00071
00072
00073 # define UN_PLUS_TYPE(IDX)                                                     \
00074         un_plus_tbl[IDX].type
00075
00076 # define UN_PLUS_EXTN(IDX)                                                     \
00077         un_plus_tbl[IDX].ext
00078
00079
00080 # define NOT_TYPE(IDX)                                                         \
00081         not_tbl[IDX].type
00082
00083 # define NOT_EXTN(IDX)                                                         \
00084         not_tbl[IDX].ext
00085
00086
00087 # define BIN_SUB_TYPE(IDXL, IDXR)                                              \
00088         bin_sub_tbl[IDXL][IDXR].type
00089
00090 # define BIN_SUB_EXTN(IDXL, IDXR)                                              \
00091         bin_sub_tbl[IDXL][IDXR].ext
00092
00093 # define BIN_ADD_TYPE(IDXL, IDXR)                                              \
00094         bin_add_tbl[IDXL][IDXR].type
00095
00096 # define BIN_ADD_EXTN(IDXL, IDXR)                                              \
00097         bin_add_tbl[IDXL][IDXR].ext
00098
00099
00100 # define MULT_DIV_TYPE(IDXL, IDXR)                                             \
00101         mult_div_tbl[IDXL][IDXR].type
00102
00103 # define MULT_DIV_EXTN(IDXL, IDXR)                                             \
00104         mult_div_tbl[IDXL][IDXR].ext
00105
00106
00107 # define POWER_TYPE(IDXL, IDXR)                                                \
00108         power_tbl[IDXL][IDXR].type
00109
00110 # define POWER_EXTN(IDXL, IDXR)                                                \
00111         power_tbl[IDXL][IDXR].ext
00112
00113
00114 # define EQ_NE_TYPE(IDXL, IDXR)                                                \
00115         eq_ne_tbl[IDXL][IDXR].type
00116
00117 # define EQ_NE_EXTN(IDXL, IDXR)                                                \
00118         eq_ne_tbl[IDXL][IDXR].ext
00119
00120 # define LG_TYPE(IDXL, IDXR)                                                   \
00121         lg_tbl[IDXL][IDXR].type
00122
00123 # define LG_EXTN(IDXL, IDXR)                                                   \
00124         lg_tbl[IDXL][IDXR].ext
00125
00126
00127 # define GT_LT_TYPE(IDXL, IDXR)                                                \
00128         gt_lt_tbl[IDXL][IDXR].type
00129
00130 # define GT_LT_EXTN(IDXL, IDXR)                                                \
00131         gt_lt_tbl[IDXL][IDXR].ext
00132
00133
00134 # define AND_OR_TYPE(IDXL, IDXR)                                               \
00135         and_or_tbl[IDXL][IDXR].type
00136
00137 # define AND_OR_EXTN(IDXL, IDXR)                                               \
00138         and_or_tbl[IDXL][IDXR].ext
00139
00140 # define ASG_TYPE(IDXL, IDXR)                                                  \
00141         asg_tbl[IDXL][IDXR].type
00142
00143 # define ASG_EXTN(IDXL, IDXR)                                                  \
00144         asg_tbl[IDXL][IDXR].ext
00145
00146 /***********************************\
00147 |* CONDITIONAL REPLACEMENT STRINGS *|
00148 \***********************************/
00149
00150
00151
00152 /***********************************************\
00153 |* STATEMENT/FUNCTION-LIKE REPLACEMENT STRINGS *|
00154 \***********************************************/
00155