Open64: osprey/dipa/rta/open64/wintrinsic.h Source File

00001 /*
00002  *  Copyright (C) 2007. QLogic Corporation. All Rights Reserved.
00003  */
00004 
00005 /*
00006  * Copyright 2003, 2004, 2005, 2006 PathScale, Inc.  All Rights Reserved.
00007  */
00008 
00009 /*
00010 
00011   Copyright (C) 2000, 2001 Silicon Graphics, Inc.  All Rights Reserved.
00012 
00013   This program is free software; you can redistribute it and/or modify it
00014   under the terms of version 2 of the GNU General Public License as
00015   published by the Free Software Foundation.
00016 
00017   This program is distributed in the hope that it would be useful, but
00018   WITHOUT ANY WARRANTY; without even the implied warranty of
00019   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
00020 
00021   Further, this software is distributed without any warranty that it is
00022   free of the rightful claim of any third person regarding infringement 
00023   or the like.  Any license provided herein, whether implied or 
00024   otherwise, applies only to this software file.  Patent licenses, if 
00025   any, provided herein do not apply to combinations of this program with 
00026   other software, or any other product whatsoever.  
00027 
00028   You should have received a copy of the GNU General Public License along
00029   with this program; if not, write the Free Software Foundation, Inc., 59
00030   Temple Place - Suite 330, Boston MA 02111-1307, USA.
00031 
00032   Contact information:  Silicon Graphics, Inc., 1600 Amphitheatre Pky,
00033   Mountain View, CA 94043, or:
00034 
00035   http://www.sgi.com
00036 
00037   For further information regarding this notice, see:
00038 
00039   http://oss.sgi.com/projects/GenInfo/NoticeExplan
00040 
00041 */
00042 
00043 
00082 #ifndef wintrinsic_INCLUDED
00083 #define wintrinsic_INCLUDED "wintrinsic.h"
00084 
00085 #ifdef __cplusplus
00086 extern "C" {
00087 #endif
00088 
00089 typedef enum {
00090 
00091   INTRINSIC_INVALID = -1,
00092   INTRINSIC_NONE = 0,
00093   INTRINSIC_FIRST = 1,
00094 
00095     /* F77 type conversions - INT, SHORT, LONG, REAL, FLOAT, SNGL, DBLE, CMPLX,
00096                   CHAR, ZEXT, etc. */
00097 
00098     /* All of these are already represented by existing WHIRL nodes.  F77
00099        semantics preclude them from being passed, so external versions
00100        aren't needed. */
00101 
00102     /* F77 '**' expressions */
00103 
00104     /* These functions are needed to support ** in expressions.  They are
00105        not directly callable, so external versions aren't needed.  F77
00106        semantic rules treat f**i specially.  Here are the details:
00107 
00108        a**b   \  b
00109              a \  I1,I2,I4  I8    F4   F8   FQ   C4   C8   CQ
00110                 +--------------------------------------------
00111        I1,I2,I4 |    I4     I8    F4   F8   FQ   C4   C8   CQ
00112          I8 |    I8     I8    F4   F8   FQ   C4   C8   CQ
00113          F4 |   F4I4   F4I8   F4   F8   FQ   C4   C8   CQ
00114          F8 |   F8I4   F8I8   F8   F8   FQ   C8   C8   CQ
00115          FQ |   FQI4   FQI8   FQ   FQ   FQ   CQ   CQ   CQ
00116          C4 |   C4I4   C4I8   C4   C8   CQ   C4   C8   CQ
00117          C8 |   C8I4   C8I8   C8   C8   CQ   C8   C8   CQ
00118          CQ |   CQI4   CQI8   CQ   CQ   CQ   CQ   CQ   CQ   */
00119 
00120   INTRN_I4EXPEXPR = INTRINSIC_FIRST,
00121   INTRN_I8EXPEXPR,
00122   INTRN_F4EXPEXPR,
00123   INTRN_F8EXPEXPR,
00124   INTRN_FQEXPEXPR,
00125   INTRN_C4EXPEXPR,
00126   INTRN_C8EXPEXPR,
00127   INTRN_CQEXPEXPR,
00128   INTRN_F4I4EXPEXPR,
00129   INTRN_F4I8EXPEXPR,
00130   INTRN_F8I4EXPEXPR,
00131   INTRN_F8I8EXPEXPR,
00132   INTRN_FQI4EXPEXPR,
00133   INTRN_FQI8EXPEXPR,
00134   INTRN_C4I4EXPEXPR,
00135   INTRN_C4I8EXPEXPR,
00136   INTRN_C8I4EXPEXPR,
00137   INTRN_C8I8EXPEXPR,
00138   INTRN_CQI4EXPEXPR,
00139   INTRN_CQI8EXPEXPR,
00140 
00141     /* F77 character relational expressions */
00142 
00143     /* These functions are needed to support character relational logical
00144        expressions.  They are not directly callable, so external versions
00145        aren't needed. */
00146 
00147   INTRN_CEQEXPR,
00148   INTRN_CNEEXPR,
00149   INTRN_CGEEXPR,
00150   INTRN_CGTEXPR,
00151   INTRN_CLEEXPR,
00152   INTRN_CLTEXPR,
00153 
00154     /* F77 substring 'var(e1:e2)' expressions */
00155 
00156     /* These functions are needed to support character substrings in
00157        expressions.  They are not directly callable, so external versions
00158        aren't needed.  */
00159 
00160   INTRN_SUBSTRINGEXPR,
00161 
00162     /* F77 concat '//' expressions */
00163 
00164     /* These functions are needed to support // in expressions.  They are
00165        not directly callable, so external versions aren't needed.  */
00166 
00167   INTRN_CONCATEXPR,
00168 
00169     /* F77 character assignment statements */
00170 
00171     /* These functions are needed to support character assignment
00172        statements.  The normal OPC_MLOAD and OPC_MSTORE don't handle the
00173        blank padding F77 requires.  They are not directly callable, so
00174        external versions aren't needed.  */
00175 
00176   INTRN_CASSIGNSTMT,
00177 
00178 
00179     /* F77 max/min intrinsics - MAX, AMAX, MIN, AMIN, etc. */
00180 
00181     /* All of these differ from the existing WHIRL nodes in that they
00182        take an arbitrary number of arguments.  However; they can all be
00183        transformed into a cascaded set of WHIRL OPC_MAX/MIN nodes with (if
00184        needed) an OPC_CVT node on top.  F77 semantics preclude them from
00185        being passed, so external versions aren't needed. */
00186 
00187     /* F77 abs intrinsics - ABS, etc. */
00188 
00189     /* All of these are already represented by existing WHIRL nodes.
00190        However; F77 semantics allow them to be passed, so external versions
00191        are needed. */
00192 
00193   INTRN_I2ABSe,
00194   INTRN_I4ABSe,
00195   INTRN_I8ABSe,
00196   INTRN_F4ABSe,
00197   INTRN_F8ABSe,
00198   INTRN_FQABSe,
00199   INTRN_F4C4ABS,
00200   INTRN_F4C4ABSe,
00201   INTRN_F8C8ABS,
00202   INTRN_F8C8ABSe,
00203   INTRN_FQCQABS,
00204   INTRN_FQCQABSe,
00205 
00206     /* F77 mod intrinsics - MOD, etc. */
00207 
00208     /* The integer cases are already represented by existing WHIRL nodes.
00209        F77 semantics allow them to be passed, so external versions are
00210        needed. */
00211 
00212   INTRN_I2MODe,
00213   INTRN_I4MODe,
00214   INTRN_I8MODe,
00215   INTRN_F4MOD,
00216   INTRN_F4MODe,
00217   INTRN_F8MOD,
00218   INTRN_F8MODe,
00219   INTRN_FQMOD,
00220   INTRN_FQMODe,
00221 
00222     /* F77 sqrt intrinsics - SQRT, etc. */
00223 
00224     /* All of these are already represented by existing WHIRL nodes
00225        However; F77 semantics allow them to be passed, so external versions
00226        are needed. */
00227 
00228   INTRN_F4SQRTe,
00229   INTRN_F8SQRTe,
00230   INTRN_FQSQRTe,
00231   INTRN_C4SQRTe,
00232   INTRN_C8SQRTe,
00233   INTRN_CQSQRTe,
00234 
00235     /* F77 misc. math intrinsics - CONJG, DIM, PROD, SIGN, etc. */
00236 
00237     /* None of these have corresponding, single WHIRL nodes.  F77 semantics
00238        allow them to be passed, so external versions are needed. */
00239 
00240   INTRN_C4CONJG,
00241   INTRN_C4CONJGe,
00242   INTRN_C8CONJG,
00243   INTRN_C8CONJGe,
00244   INTRN_CQCONJG,
00245   INTRN_CQCONJGe,
00246 
00247   INTRN_I1DIM,
00248   INTRN_I2DIM,
00249   INTRN_I2DIMe,
00250   INTRN_I4DIM,
00251   INTRN_I4DIMe,
00252   INTRN_I8DIM,
00253   INTRN_I8DIMe,
00254   INTRN_F4DIM,
00255   INTRN_F4DIMe,
00256   INTRN_F8DIM,
00257   INTRN_F8DIMe,
00258   INTRN_FQDIM,
00259   INTRN_FQDIMe,
00260 
00261   INTRN_F8F4PROD,
00262   INTRN_F8F4PRODe,
00263   INTRN_FQF8PROD,
00264   INTRN_FQF8PRODe,
00265 
00266   INTRN_I1SIGN,
00267   INTRN_I2SIGN,
00268   INTRN_I2SIGNe,
00269   INTRN_I4SIGN,
00270   INTRN_I4SIGNe,
00271   INTRN_I8SIGN,
00272   INTRN_I8SIGNe,
00273   INTRN_F4SIGN,
00274   INTRN_F4SIGNe,
00275   INTRN_F8SIGN,
00276   INTRN_F8SIGNe,
00277   INTRN_FQSIGN,
00278   INTRN_FQSIGNe,
00279 
00280     /* F77 misc. math intrinsics - AIMAG, AINT, ANINT, IDINT, NINT, etc. */
00281 
00282     /* Some of these are already represented by existing WHIRL nodes.
00283        F77 semantics allow these to be passed, so external versions are
00284        needed.
00285        Note that some of these (e.g., IDINT) are explicitly disallowed
00286        as actual arguments by the F77 standard, but are allowed
00287        historically on our platform (as well as on others, e.g., DEC VAX).
00288        */
00289 
00290   INTRN_F4IMAGe,
00291   INTRN_F8IMAGe,
00292   INTRN_FQIMAGe,
00293 
00294   INTRN_F4AINT,
00295   INTRN_F4AINTe,
00296   INTRN_F8AINT,
00297   INTRN_F8AINTe,
00298   INTRN_FQAINT,
00299   INTRN_FQAINTe,
00300 
00301   INTRN_I2F4INTe,
00302   INTRN_I4F4INTe,
00303   INTRN_I8F4INTe,
00304 
00305   INTRN_I2F8IDINTe,
00306   INTRN_I4F8IDINTe,
00307   INTRN_I8F8IDINTe,
00308 
00309   INTRN_I2FQIQINTe,
00310   INTRN_I4FQIQINTe,
00311   INTRN_I8FQIQINTe,
00312 
00313   INTRN_I2F4NINT,
00314   INTRN_I2F4NINTe,
00315   INTRN_I4F4NINT,
00316   INTRN_I4F4NINTe,
00317   INTRN_I8F4NINT,
00318   INTRN_I8F4NINTe,
00319 
00320   INTRN_I2F8IDNINT,
00321   INTRN_I2F8IDNINTe,
00322   INTRN_I4F8IDNINT,
00323   INTRN_I4F8IDNINTe,
00324   INTRN_I8F8IDNINT,
00325   INTRN_I8F8IDNINTe,
00326 
00327   INTRN_I2FQIQNINT,
00328   INTRN_I2FQIQNINTe,
00329   INTRN_I4FQIQNINT,
00330   INTRN_I4FQIQNINTe,
00331   INTRN_I8FQIQNINT,
00332   INTRN_I8FQIQNINTe,
00333 
00334   INTRN_F4ANINT,
00335   INTRN_F4ANINTe,
00336   INTRN_F8ANINT,
00337   INTRN_F8ANINTe,
00338   INTRN_FQANINT,
00339   INTRN_FQANINTe,
00340 
00341     /* F77 bit intrisics - BNOT, BAND, BIOR, BXOR, BITS, BSET, BCLR, BTEST,
00342                MVBITS, etc. */
00343 
00344     /* Some of these are already represented by existing WHIRL nodes.
00345        F77 semantics allow them to be passed, so external versions are
00346        needed. */
00347 
00348   INTRN_I2BNOTe,
00349   INTRN_I4BNOTe,
00350   INTRN_I8BNOTe,
00351 
00352   INTRN_I2BANDe,
00353   INTRN_I4BANDe,
00354   INTRN_I8BANDe,
00355 
00356   INTRN_I2BIORe,
00357   INTRN_I4BIORe,
00358   INTRN_I8BIORe,
00359 
00360   INTRN_I2BXORe,
00361   INTRN_I4BXORe,
00362   INTRN_I8BXORe,
00363 
00364   INTRN_I1BITS,
00365   INTRN_I2BITS,
00366   INTRN_I2BITSe,
00367   INTRN_I4BITS,
00368   INTRN_I4BITSe,
00369   INTRN_I8BITS,
00370   INTRN_I8BITSe,
00371 
00372   INTRN_I1BSET,
00373   INTRN_I2BSET,
00374   INTRN_I2BSETe,
00375   INTRN_I4BSET,
00376   INTRN_I4BSETe,
00377   INTRN_I8BSET,
00378   INTRN_I8BSETe,
00379 
00380   INTRN_I1BCLR,
00381   INTRN_I2BCLR,
00382   INTRN_I2BCLRe,
00383   INTRN_I4BCLR,
00384   INTRN_I4BCLRe,
00385   INTRN_I8BCLR,
00386   INTRN_I8BCLRe,
00387 
00388   INTRN_I1BTEST,
00389   INTRN_I2BTEST,
00390   INTRN_I2BTESTe,
00391   INTRN_I4BTEST,
00392   INTRN_I4BTESTe,
00393   INTRN_I8BTEST,
00394   INTRN_I8BTESTe,
00395 
00396   INTRN_I1MVBITS,
00397   INTRN_I2MVBITS,
00398   INTRN_I4MVBITS,
00399   INTRN_I8MVBITS,
00400 
00401     /* Fortran shift intrinsics - LSHIFT, RSHIFT, SHIFT, SHIFTC, etc. */
00402 
00403     /* Some of these are already represented by existing WHIRL nodes
00404        F77 semantics allow them to be passed, so external versions are
00405        needed. */
00406 
00407   INTRN_I1SHL,
00408   INTRN_I2SHL,
00409 
00410   INTRN_I1SHR,
00411   INTRN_I2SHR,
00412 
00413   INTRN_I1SHFT,
00414   INTRN_I2SHFT,
00415   INTRN_I2SHFTe,
00416   INTRN_I4SHFT,
00417   INTRN_I4SHFTe,
00418   INTRN_I8SHFT,
00419   INTRN_I8SHFTe,
00420 
00421   INTRN_I1SHFTC,
00422   INTRN_I2SHFTC,
00423   INTRN_I2SHFTCe,
00424   INTRN_I4SHFTC,
00425   INTRN_I4SHFTCe,
00426   INTRN_I8SHFTC,
00427   INTRN_I8SHFTCe,
00428 
00429     /* F77 character intrinsics - LEN, INDEX, LGE, LGT, LLE, LLT, etc. */
00430 
00431     /* None of these have corresponding, single WHIRL nodes.  F77 semantics
00432        allow them to be passed, so external versions are needed. */
00433 
00434   INTRN_I4CLEN,
00435   INTRN_I4CLENe,
00436 
00437   INTRN_I4CINDEX,
00438   INTRN_I4CINDEXe,
00439 
00440   INTRN_CLGE,
00441   INTRN_CLGEe,
00442 
00443   INTRN_CLGT,
00444   INTRN_CLGTe,
00445 
00446   INTRN_CLLE,
00447   INTRN_CLLEe,
00448 
00449   INTRN_CLLT,
00450   INTRN_CLLTe,
00451 
00452     /* F77 transcendental intrinsics - EXP, LOG, LOG10, etc. */
00453 
00454     /* None of these have corresponding, single WHIRL nodes.  F77 semantics
00455        allow them to be passed, so external versions are needed. */
00456 
00457   INTRN_F4EXP,
00458   INTRN_F4EXPe,
00459   INTRN_F8EXP,
00460   INTRN_F8EXPe,
00461   INTRN_FQEXP,
00462   INTRN_FQEXPe,
00463   INTRN_C4EXP,
00464   INTRN_C4EXPe,
00465   INTRN_C8EXP,
00466   INTRN_C8EXPe,
00467   INTRN_CQEXP,
00468   INTRN_CQEXPe,
00469 
00470   INTRN_F4LOG,
00471   INTRN_F4LOGe,
00472   INTRN_F8LOG,
00473   INTRN_F8LOGe,
00474   INTRN_FQLOG,
00475   INTRN_FQLOGe,
00476   INTRN_C4LOG,
00477   INTRN_C4LOGe,
00478   INTRN_C8LOG,
00479   INTRN_C8LOGe,
00480   INTRN_CQLOG,
00481   INTRN_CQLOGe,
00482 
00483   INTRN_F4LOG10,
00484   INTRN_F4LOG10e,
00485   INTRN_F8LOG10,
00486   INTRN_F8LOG10e,
00487   INTRN_FQLOG10,
00488   INTRN_FQLOG10e,
00489 
00490     /* F77 trigonometic intrinsics - COS, SIN, CIS, TAN, COSD, SIND, TAND,
00491                      COSH, SINH, TANH, ACOS, ASIN, ATAN, ACOSD,
00492                      ASIND, ATAND, ATAN2, ATAN2D, etc. */
00493 
00494     /* None of these have corresponding, single WHIRL nodes.  F77 semantics
00495        allow them to be passed, so external versions are needed. */
00496 
00497   INTRN_F4COS,
00498   INTRN_F4COSe,
00499   INTRN_F8COS,
00500   INTRN_F8COSe,
00501   INTRN_FQCOS,
00502   INTRN_FQCOSe,
00503   INTRN_C4COS,
00504   INTRN_C4COSe,
00505   INTRN_C8COS,
00506   INTRN_C8COSe,
00507   INTRN_CQCOS,
00508   INTRN_CQCOSe,
00509 
00510   INTRN_F4SIN,
00511   INTRN_F4SINe,
00512   INTRN_F8SIN,
00513   INTRN_F8SINe,
00514   INTRN_FQSIN,
00515   INTRN_FQSINe,
00516   INTRN_C4SIN,
00517   INTRN_C4SINe,
00518   INTRN_C8SIN,
00519   INTRN_C8SINe,
00520   INTRN_CQSIN,
00521   INTRN_CQSINe,
00522 
00523   INTRN_F4CIS,
00524   INTRN_F4CISe,
00525   INTRN_F8CIS,
00526   INTRN_F8CISe,
00527   INTRN_FQCIS,
00528   INTRN_FQCISe,
00529 
00530   INTRN_F4TAN,
00531   INTRN_F4TANe,
00532   INTRN_F8TAN,
00533   INTRN_F8TANe,
00534   INTRN_FQTAN,
00535   INTRN_FQTANe,
00536 
00537   INTRN_F4COSD,
00538   INTRN_F4COSDe,
00539   INTRN_F8COSD,
00540   INTRN_F8COSDe,
00541   INTRN_FQCOSD,
00542   INTRN_FQCOSDe,
00543 
00544   INTRN_F4SIND,
00545   INTRN_F4SINDe,
00546   INTRN_F8SIND,
00547   INTRN_F8SINDe,
00548   INTRN_FQSIND,
00549   INTRN_FQSINDe,
00550 
00551   INTRN_F4TAND,
00552   INTRN_F4TANDe,
00553   INTRN_F8TAND,
00554   INTRN_F8TANDe,
00555   INTRN_FQTAND,
00556   INTRN_FQTANDe,
00557 
00558   INTRN_F4COSH,
00559   INTRN_F4COSHe,
00560   INTRN_F8COSH,
00561   INTRN_F8COSHe,
00562   INTRN_FQCOSH,
00563   INTRN_FQCOSHe,
00564 
00565   INTRN_F4SINH,
00566   INTRN_F4SINHe,
00567   INTRN_F8SINH,
00568   INTRN_F8SINHe,
00569   INTRN_FQSINH,
00570   INTRN_FQSINHe,
00571 
00572   INTRN_F4TANH,
00573   INTRN_F4TANHe,
00574   INTRN_F8TANH,
00575   INTRN_F8TANHe,
00576   INTRN_FQTANH,
00577   INTRN_FQTANHe,
00578 
00579   INTRN_F4ACOS,
00580   INTRN_F4ACOSe,
00581   INTRN_F8ACOS,
00582   INTRN_F8ACOSe,
00583   INTRN_FQACOS,
00584   INTRN_FQACOSe,
00585 
00586   INTRN_F4ASIN,
00587   INTRN_F4ASINe,
00588   INTRN_F8ASIN,
00589   INTRN_F8ASINe,
00590   INTRN_FQASIN,
00591   INTRN_FQASINe,
00592 
00593   INTRN_F4ATAN,
00594   INTRN_F4ATANe,
00595   INTRN_F8ATAN,
00596   INTRN_F8ATANe,
00597   INTRN_FQATAN,
00598   INTRN_FQATANe,
00599 
00600   INTRN_F4ACOSD,
00601   INTRN_F4ACOSDe,
00602   INTRN_F8ACOSD,
00603   INTRN_F8ACOSDe,
00604   INTRN_FQACOSD,
00605   INTRN_FQACOSDe,
00606 
00607   INTRN_F4ASIND,
00608   INTRN_F4ASINDe,
00609   INTRN_F8ASIND,
00610   INTRN_F8ASINDe,
00611   INTRN_FQASIND,
00612   INTRN_FQASINDe,
00613 
00614   INTRN_F4ATAND,
00615   INTRN_F4ATANDe,
00616   INTRN_F8ATAND,
00617   INTRN_F8ATANDe,
00618   INTRN_FQATAND,
00619   INTRN_FQATANDe,
00620 
00621   INTRN_F4ATAN2,
00622   INTRN_F4ATAN2e,
00623   INTRN_F8ATAN2,
00624   INTRN_F8ATAN2e,
00625   INTRN_FQATAN2,
00626   INTRN_FQATAN2e,
00627 
00628   INTRN_F4ATAN2D,
00629   INTRN_F4ATAN2De,
00630   INTRN_F8ATAN2D,
00631   INTRN_F8ATAN2De,
00632   INTRN_FQATAN2D,
00633   INTRN_FQATAN2De,
00634 
00635     /* F77 sizeof intrinsic - SIZEOF, etc. */
00636 
00637     /* All of these will have been converted to either constant nodes or
00638        the LEN intrinsic. */
00639 
00640     /* F77 addressing intrinsics - %VAL, %REF, %LOC, etc. */
00641 
00642     /* All of these will have been converted to corresponding WHIRL
00643        nodes. */
00644 
00645     /* C misc. intrinsics - currently, just alloca(). */
00646 
00647   INTRN_U4I4ALLOCA,
00648   INTRN_U8I8ALLOCA,
00649 
00650     /* F77 misc. intrinsics - MALLOC, FREE, DATE, ERRSNS, EXIT, TIME,
00651                   SECNDS, etc. */
00652 
00653     /* None of these have corresponding, single WHIRL nodes.  F77 semantics
00654        do not allow them to be passed, so external versions aren't
00655        needed. */
00656 
00657   INTRN_U4I4MALLOC,
00658   INTRN_U8I8MALLOC,
00659 
00660   INTRN_U4FREE,
00661   INTRN_U8FREE,
00662 
00663   INTRN_MDATE,
00664   INTRN_I1DATE,
00665   INTRN_I2DATE,
00666   INTRN_I4DATE,
00667   INTRN_I8DATE,
00668 
00669   INTRN_I1ERRSNS,
00670   INTRN_I2ERRSNS,
00671   INTRN_I4ERRSNS,
00672   INTRN_I8ERRSNS,
00673 
00674   INTRN_VEXIT,
00675   INTRN_I1EXIT,
00676   INTRN_I2EXIT,
00677   INTRN_I4EXIT,
00678   INTRN_I8EXIT,
00679 
00680   INTRN_TIME,
00681 
00682   INTRN_F4SECNDS,
00683   INTRN_F8SECNDS,
00684 
00685     /* Fortran pause/stop statement - PAUSE, STOP, etc. */
00686 
00687     /* These are made intrinsics so that the optimizer can make use of
00688        their special properties. */
00689 
00690   INTRN_PAUSE,
00691   INTRN_STOP,
00692 
00693     /* Fortran 90 intrinsics */
00694 
00695   INTRN_F4I4RAN,
00696   INTRN_F4I8RAN,
00697   INTRN_F8I4RAN,
00698   INTRN_F8I8RAN,
00699   INTRN_FQI4RAN,
00700   INTRN_FQI8RAN,
00701 
00702     /* C intrinsics */
00703 
00704     /* C++ intrinsics */
00705 
00706     /* LNO generated intrinsics */
00707 
00708     /* These additional intrinsics are potentially generated by LNO. */
00709 
00710   INTRN_I4DIVFLOOR,
00711   INTRN_I8DIVFLOOR,
00712   INTRN_U4DIVFLOOR,
00713   INTRN_U8DIVFLOOR,
00714 
00715   INTRN_I4DIVCEIL,
00716   INTRN_I8DIVCEIL,
00717   INTRN_U4DIVCEIL,
00718   INTRN_U8DIVCEIL,
00719 
00720   INTRN_I4MODFLOOR,
00721   INTRN_I8MODFLOOR,
00722   INTRN_U4MODFLOOR,
00723   INTRN_U8MODFLOOR,
00724 
00725   INTRN_I4MODCEIL,
00726   INTRN_I8MODCEIL,
00727   INTRN_U4MODCEIL,
00728   INTRN_U8MODCEIL,
00729 
00730     /* Internal to alloca */
00731   INTRN_U4I4SETSTACKPOINTER,
00732   INTRN_U8I8SETSTACKPOINTER,
00733   INTRN_U4READSTACKPOINTER,
00734   INTRN_U8READSTACKPOINTER,
00735 
00736     /* OS kernel intrinsics */
00737 
00738   INTRN_ADD_AND_FETCH_I4,
00739   INTRN_SUB_AND_FETCH_I4,
00740   INTRN_OR_AND_FETCH_I4,
00741   INTRN_XOR_AND_FETCH_I4,
00742   INTRN_AND_AND_FETCH_I4,
00743   INTRN_NAND_AND_FETCH_I4,
00744 
00745   INTRN_FETCH_AND_ADD_I4,
00746   INTRN_FETCH_AND_SUB_I4,
00747   INTRN_FETCH_AND_OR_I4,
00748   INTRN_FETCH_AND_XOR_I4,
00749   INTRN_FETCH_AND_AND_I4,
00750   INTRN_FETCH_AND_NAND_I4,
00751 
00752   INTRN_ADD_AND_FETCH_I8,
00753   INTRN_SUB_AND_FETCH_I8,
00754   INTRN_OR_AND_FETCH_I8,
00755   INTRN_XOR_AND_FETCH_I8,
00756   INTRN_AND_AND_FETCH_I8,
00757   INTRN_NAND_AND_FETCH_I8,
00758 
00759   INTRN_FETCH_AND_ADD_I8,
00760   INTRN_FETCH_AND_SUB_I8,
00761   INTRN_FETCH_AND_OR_I8,
00762   INTRN_FETCH_AND_XOR_I8,
00763   INTRN_FETCH_AND_AND_I8,
00764   INTRN_FETCH_AND_NAND_I8,
00765 
00766   INTRN_LOCK_TEST_AND_SET_I4,
00767   INTRN_LOCK_TEST_AND_SET_I8,
00768 
00769   INTRN_LOCK_RELEASE_I4,
00770   INTRN_LOCK_RELEASE_I8,
00771 
00772   INTRN_COMPARE_AND_SWAP_I4,
00773   INTRN_COMPARE_AND_SWAP_I8,
00774 
00775   INTRN_SYNCHRONIZE,
00776 
00777   INTRN_RETURN_ADDRESS,
00778 
00779     /* F77 (internal only) I/O intrinsics */
00780   INTRN_U4I1ADRTMP,
00781   INTRN_U4I2ADRTMP,
00782   INTRN_U4I4ADRTMP,
00783   INTRN_U4I8ADRTMP,
00784   INTRN_U4F4ADRTMP,
00785   INTRN_U4F8ADRTMP,
00786   INTRN_U4FQADRTMP,
00787   INTRN_U4C4ADRTMP,
00788   INTRN_U4C8ADRTMP,
00789   INTRN_U4CQADRTMP,
00790   INTRN_U4VADRTMP,
00791   INTRN_U8I1ADRTMP,
00792   INTRN_U8I2ADRTMP,
00793   INTRN_U8I4ADRTMP,
00794   INTRN_U8I8ADRTMP,
00795   INTRN_U8F4ADRTMP,
00796   INTRN_U8F8ADRTMP,
00797   INTRN_U8FQADRTMP,
00798   INTRN_U8C4ADRTMP,
00799   INTRN_U8C8ADRTMP,
00800   INTRN_U8CQADRTMP,
00801   INTRN_U8VADRTMP,
00802 
00803   INTRN_I4VALTMP,
00804   INTRN_I8VALTMP,
00805   INTRN_U4VALTMP,
00806   INTRN_U8VALTMP,
00807   INTRN_F4VALTMP,
00808   INTRN_F8VALTMP,
00809   INTRN_FQVALTMP,
00810   INTRN_C4VALTMP,
00811   INTRN_C8VALTMP,
00812   INTRN_CQVALTMP,
00813 
00814     /* C intrinsics */
00815 
00816   INTRN_BCOPY,
00817   INTRN_BCMP,
00818   INTRN_BZERO,
00819 
00820   INTRN_MEMCCPY,
00821   INTRN_MEMCHR,
00822   INTRN_MEMCMP,
00823   INTRN_MEMCPY,
00824   INTRN_MEMMOVE,
00825   INTRN_MEMSET,
00826 
00827   INTRN_STRCMP,
00828   INTRN_STRNCMP,
00829   INTRN_STRCPY,
00830   INTRN_STRNCPY,
00831   INTRN_STRLEN,
00832 
00833   INTRN_PRINTF,
00834   INTRN_FPRINTF,
00835   INTRN_SPRINTF,
00836   INTRN_PRINTW,
00837   INTRN_SCANF,
00838   INTRN_FSCANF,
00839   INTRN_SSCANF,
00840   INTRN_FPUTC,
00841   INTRN_FPUTS,
00842   INTRN_FGETC,
00843   INTRN_FGETS,
00844 
00845   INTRN_F4VACOS,
00846   INTRN_F8VACOS,
00847   INTRN_F4VASIN,
00848   INTRN_F8VASIN,
00849   INTRN_F4VATAN,
00850   INTRN_F8VATAN,
00851   INTRN_F4VCOS,
00852   INTRN_F8VCOS,
00853   INTRN_F4VEXP,
00854   INTRN_F8VEXP,
00855   INTRN_F4VLOG,
00856   INTRN_F8VLOG,
00857   INTRN_F4VSIN,
00858   INTRN_F8VSIN,
00859   INTRN_F4VSQRT,
00860   INTRN_F8VSQRT,
00861   INTRN_F4VTAN,
00862   INTRN_F8VTAN,
00863 
00864   INTRN_NARY_ADD,
00865   INTRN_NARY_MPY,
00866 
00867     /* F77 intrinsics needed for -trapuv - MALLOC */
00868 
00869   INTRN_U4I4TRAPUV_MALLOC,
00870   INTRN_U8I8TRAPUV_MALLOC,
00871 
00872     /* F77 intrinsics needed for -check_bounds */
00873 
00874   INTRN_F77_BOUNDS_ERR,
00875 
00876     /* F77 intrinsics needed for DSM */
00877 
00878   INTRN_DSM_NUMTHREADS,
00879   INTRN_DSM_CHUNKSIZE,
00880   INTRN_DSM_THIS_CHUNKSIZE,
00881   INTRN_DSM_REM_CHUNKSIZE,
00882   INTRN_DSM_NUMCHUNKS,
00883   INTRN_DSM_THIS_THREADNUM,
00884   INTRN_DSM_DISTRIBUTION_BLOCK,
00885   INTRN_DSM_DISTRIBUTION_STAR,
00886   INTRN_DSM_ISRESHAPED,
00887   INTRN_DSM_ISDISTRIBUTED,
00888   INTRN_DSM_THIS_STARTINDEX,
00889   INTRN_DSM_DISTRIBUTION_CYCLIC,
00890 
00891     /* More OS kernel intrinsics -- added here so we wouldn't have to
00892        make an incompatible Whirl change */
00893 
00894   INTRN_MPY_AND_FETCH_I4,
00895   INTRN_MIN_AND_FETCH_I4,
00896   INTRN_MAX_AND_FETCH_I4,
00897   INTRN_FETCH_AND_MPY_I4,
00898   INTRN_FETCH_AND_MIN_I4,
00899   INTRN_FETCH_AND_MAX_I4,
00900   INTRN_MPY_AND_FETCH_I8,
00901   INTRN_MIN_AND_FETCH_I8,
00902   INTRN_MAX_AND_FETCH_I8,
00903   INTRN_FETCH_AND_MPY_I8,
00904   INTRN_FETCH_AND_MIN_I8,
00905   INTRN_FETCH_AND_MAX_I8,
00906 
00907   INTRN_ADD_AND_FETCH_F4,
00908   INTRN_SUB_AND_FETCH_F4,
00909   INTRN_OR_AND_FETCH_F4,
00910   INTRN_XOR_AND_FETCH_F4,
00911   INTRN_AND_AND_FETCH_F4,
00912   INTRN_NAND_AND_FETCH_F4,
00913   INTRN_MPY_AND_FETCH_F4,
00914   INTRN_MIN_AND_FETCH_F4,
00915   INTRN_MAX_AND_FETCH_F4,
00916 
00917   INTRN_FETCH_AND_ADD_F4,
00918   INTRN_FETCH_AND_SUB_F4,
00919   INTRN_FETCH_AND_OR_F4,
00920   INTRN_FETCH_AND_XOR_F4,
00921   INTRN_FETCH_AND_AND_F4,
00922   INTRN_FETCH_AND_NAND_F4,
00923   INTRN_FETCH_AND_MPY_F4,
00924   INTRN_FETCH_AND_MIN_F4,
00925   INTRN_FETCH_AND_MAX_F4,
00926 
00927   INTRN_ADD_AND_FETCH_F8,
00928   INTRN_SUB_AND_FETCH_F8,
00929   INTRN_OR_AND_FETCH_F8,
00930   INTRN_XOR_AND_FETCH_F8,
00931   INTRN_AND_AND_FETCH_F8,
00932   INTRN_NAND_AND_FETCH_F8,
00933   INTRN_MPY_AND_FETCH_F8,
00934   INTRN_MIN_AND_FETCH_F8,
00935   INTRN_MAX_AND_FETCH_F8,
00936 
00937   INTRN_FETCH_AND_ADD_F8,
00938   INTRN_FETCH_AND_SUB_F8,
00939   INTRN_FETCH_AND_OR_F8,
00940   INTRN_FETCH_AND_XOR_F8,
00941   INTRN_FETCH_AND_AND_F8,
00942   INTRN_FETCH_AND_NAND_F8,
00943   INTRN_FETCH_AND_MPY_F8,
00944   INTRN_FETCH_AND_MIN_F8,
00945   INTRN_FETCH_AND_MAX_F8,
00946 
00947   INTRN_LOCK_ACQUIRE_I4,
00948   INTRN_LOCK_ACQUIRE_I8,
00949 
00950     /* Start of F90 specific intrinsics */
00951 
00952     /* The next four are for allocations produced by the F90 lowerer, and
00953        are internal to the lowerer */
00954   INTRN_F90_STACKTEMPALLOC,
00955   INTRN_F90_HEAPTEMPALLOC,
00956   INTRN_F90_STACKTEMPFREE,
00957   INTRN_F90_HEAPTEMPFREE,
00958 
00959 #include "wintrinsic90.h" /* INTRN_LAST_F90_INTRINSIC = 685 */
00960 
00961   INTRN_MP_IN_PARALLEL_REGION ,
00962   INTRN_RT_ERR ,
00963   INTRN_OMP_DO_WORKSHARING ,
00964   INTRN_OMP_TEST_LOCK ,
00965   INTRN_OMP_GET_NUM_THREADS ,
00966   INTRN_OMP_GET_MAX_THREADS ,
00967   INTRN_OMP_GET_THREAD_NUM ,
00968   INTRN_OMP_GET_NUM_PROCS ,
00969   INTRN_OMP_IN_PARALLEL    ,
00970   INTRN_OMP_GET_DYNAMIC ,
00971   INTRN_OMP_GET_NESTED ,
00972 
00973 /* Hand-added F90 intrinsics */
00974 
00975     INTRN_I1IEEE_INT,
00976     INTRN_I2IEEE_INT,
00977     INTRN_I4IEEE_INT,
00978     INTRN_I8IEEE_INT,
00979     INTRN_F4IEEE_INT,
00980     INTRN_F8IEEE_INT,
00981     INTRN_FQIEEE_INT,
00982     INTRN_F90BOUNDS_CHECK,
00983  
00984 /* Two more intrisics used only by the F90 lowerer/front-end */
00985     INTRN_F90_DYNAMICTEMPALLOC ,
00986     INTRN_F90_DYNAMICTEMPFREE ,
00987 
00988 /* More checking */
00989     INTRN_F90CONFORM_CHECK ,
00990   
00991     /* End of intrinsics list */
00992 /* More C intrinsics */
00993 
00994   INTRN_C_F4FLOOR,
00995   INTRN_C_F8FLOOR,
00996   INTRN_C_FQFLOOR,
00997   INTRN_C_F4CEIL ,
00998   INTRN_C_F8CEIL ,
00999   INTRN_C_FQCEIL ,
01000   INTRN_C_F4TRUNC,
01001   INTRN_C_F8TRUNC,
01002   INTRN_C_FQTRUNC,
01003 
01004 /* Super Computing ABI Intrinsics */
01005 
01006   INTRN_I4DSHIFTL,
01007   INTRN_I8DSHIFTL,
01008   INTRN_I4DSHIFTR,
01009   INTRN_I8DSHIFTR,
01010   INTRN_I4GBIT   ,
01011   INTRN_I8GBIT   ,
01012   INTRN_I4GBITS  ,
01013   INTRN_I8GBITS  ,
01014   INTRN_I4MASK   ,
01015   INTRN_I8MASK   ,
01016   INTRN_I4MASKL  ,
01017   INTRN_I8MASKL  ,
01018   INTRN_I4MASKR  ,
01019   INTRN_I8MASKR  ,
01020   INTRN_I4PBIT   ,
01021   INTRN_I8PBIT   ,
01022   INTRN_I4PBITS  ,
01023   INTRN_I8PBITS  ,
01024   INTRN_I4POPPAR ,
01025   INTRN_I8POPPAR ,
01026   INTRN_I4RTC    ,
01027   INTRN_I8RTC    ,
01028 
01029   INTRN_GETF_EXP ,
01030   INTRN_SETF_EXP ,
01031   INTRN_GETF_SIG ,
01032   INTRN_SETF_SIG ,
01033 
01034   INTRN_FMERGE_NS,
01035   INTRN_FMERGE_S ,
01036   INTRN_FMERGE_SE,
01037 
01038   /* F90 stop */
01039   INTRN_STOP_F90 ,
01040 
01041   /* log10 */
01042   INTRN_F4VLOG10 ,
01043   INTRN_F8VLOG10 ,
01044 
01045   /* gcc divide intrinsics */
01046   INTRN_MODSI3   ,
01047   INTRN_UMODSI3  ,
01048   INTRN_DIVSI3   ,
01049   INTRN_UDIVSI3  ,
01050   INTRN_MODDI3   ,
01051   INTRN_UMODDI3  ,
01052   INTRN_DIVDI3   ,
01053   INTRN_UDIVDI3  ,
01054   INTRN_DIVSF3   ,
01055   INTRN_DIVDF3   ,
01056 
01057   /* gcc extensions */
01058   INTRN_I4FFS,
01059 
01060   /* linux intrinsics */
01061   INTRN_SINCOSF  ,
01062   INTRN_SINCOS   ,
01063   INTRN_SINCOSL  ,
01064 
01065 #ifdef KEY
01066   /* gcc stuff */
01067   INTRN_U4READFRAMEPOINTER,
01068   INTRN_U8READFRAMEPOINTER,
01069   INTRN_APPLY_ARGS,
01070   INTRN_APPLY     ,
01071   INTRN_RETURN    ,
01072 
01073   /* x86-64 vararg support */
01074   INTRN_VA_START  ,
01075   INTRN_SAVE_XMMS ,
01076 
01077   /* builtins */
01078   INTRN_CONSTANT_P,
01079 
01080   /* C99 builtins */
01081   INTRN_ISGREATER      ,
01082   INTRN_ISGREATEREQUAL ,
01083   INTRN_ISLESS         ,
01084   INTRN_ISLESSEQUAL    ,
01085   INTRN_ISLESSGREATER  ,
01086   INTRN_ISORDERED      ,
01087   INTRN_ISUNORDERED    ,
01088 
01089   /* Saturation arithmetic */
01090   INTRN_SUBSU2         ,
01091   INTRN_SUBSV16I2      ,
01092 
01093   /* g++ 3.4 builtins */
01094   INTRN_POPCOUNT       ,
01095   INTRN_PARITY         ,
01096   INTRN_CLZ            ,
01097   INTRN_CTZ64        ,
01098   INTRN_CLZ32          ,
01099   INTRN_CTZ            ,
01100 
01101   /* in GNU libm */
01102   INTRN_F4CBRT         ,
01103   INTRN_F8CBRT         ,
01104 
01105 #ifdef TARG_X8664
01106   /* Shorter vector math functions */
01107   INTRN_V16F4SIN       ,
01108   INTRN_V16F4EXP       ,
01109   INTRN_V16F4EXPEXPR   ,
01110   INTRN_V16F4LOG       ,
01111   INTRN_V16F4COS       ,
01112   INTRN_V16F8SIN       ,
01113   INTRN_V16F8EXP       ,
01114   INTRN_V16F8LOG       ,
01115   INTRN_V16F8COS       ,
01116   INTRN_V16F8EXPEXPR   ,
01117   INTRN_V16F8LOG10     ,
01118   INTRN_V16F8SINCOS    ,
01119 
01120   /* Intrinsic to represent a complex C8 multiply (multiply and addsub) */
01121   INTRN_V16C8MPY_ADDSUB,
01122   
01123   /* Intrinsic to represent complex C8 conjugate */
01124   INTRN_V16C8CONJG     ,
01125 
01126   /* GNU x8664 builtins */
01127   INTRN_PADDSB           ,
01128   INTRN_PADDSW         ,
01129   INTRN_PSUBSB         ,
01130   INTRN_PSUBSW         ,
01131   INTRN_PADDUSB        ,
01132   INTRN_PADDUSW        ,
01133   INTRN_PSUBUSB        ,
01134   INTRN_PSUBUSW        ,
01135   INTRN_PMULLW         ,
01136   INTRN_PMULHW         ,
01137   INTRN_PAND           ,
01138   INTRN_PCMPEQB        ,
01139   INTRN_PCMPEQW        ,
01140   INTRN_PCMPEQD        ,
01141   INTRN_PCMPGTB        ,
01142   INTRN_PCMPGTW        ,
01143   INTRN_PCMPGTD        ,
01144   INTRN_PUNPCKHBW      ,
01145   INTRN_PUNPCKHWD      ,
01146   INTRN_PUNPCKHDQ      ,
01147   INTRN_PUNPCKLBW      ,
01148   INTRN_PUNPCKLWD      ,
01149   INTRN_PUNPCKLDQ      ,
01150   INTRN_PACKSSWB       ,
01151   INTRN_PACKSSDW       ,
01152   INTRN_PACKUSWB       ,
01153   INTRN_PMULHUW        ,
01154   INTRN_PAVGB          ,
01155   INTRN_PAVGW          ,
01156   INTRN_PSADBW         ,
01157   INTRN_PMAXUB         ,
01158   INTRN_PMAXSW         ,
01159   INTRN_PMINUB         ,
01160   INTRN_PMINSW         ,
01161   INTRN_PEXTRW0        ,
01162   INTRN_PEXTRW1        ,
01163   INTRN_PEXTRW2        ,
01164   INTRN_PEXTRW3        ,
01165   INTRN_PINSRW0        ,
01166   INTRN_PINSRW1        ,
01167   INTRN_PINSRW2        ,
01168   INTRN_PINSRW3        ,
01169   INTRN_PMOVMSKB       ,
01170   INTRN_MOVNTQ         ,
01171   INTRN_SFENCE         ,
01172   INTRN_COMIEQSS       ,
01173   INTRN_ADDPS          ,
01174   INTRN_SUBPS          ,
01175   INTRN_MULPS          ,
01176   INTRN_DIVPS          ,
01177   INTRN_ADDSS          ,
01178   INTRN_SUBSS          ,
01179   INTRN_MULSS          ,
01180   INTRN_DIVSS          ,
01181   INTRN_CMPEQPS        ,
01182   INTRN_CMPLTPS        ,
01183   INTRN_CMPLEPS        ,
01184   INTRN_CMPGTPS        ,
01185   INTRN_CMPGEPS        ,
01186   INTRN_CMPUNORDPS     ,
01187   INTRN_CMPNEQPS       ,
01188   INTRN_CMPNLTPS       ,
01189   INTRN_CMPNLEPS       ,
01190   INTRN_CMPNGTPS       ,
01191   INTRN_CMPNGEPS       ,
01192   INTRN_CMPORDPS       ,
01193   INTRN_CMPEQSS        ,
01194   INTRN_CMPLTSS        ,
01195   INTRN_CMPLESS        ,
01196   INTRN_CMPUNORDSS     ,
01197   INTRN_CMPNEQSS       ,
01198   INTRN_CMPNLTSS       ,
01199   INTRN_CMPNLESS       ,
01200   INTRN_CMPORDSS       ,
01201   INTRN_MAXPS          ,
01202   INTRN_MAXSS          ,
01203   INTRN_MINPS          ,
01204   INTRN_MINSS          ,
01205   INTRN_ANDPS          ,
01206   INTRN_ANDNPS         ,
01207   INTRN_ORPS           ,
01208   INTRN_XORPS          ,
01209   INTRN_MOVSS          ,
01210   INTRN_MOVHLPS        ,
01211   INTRN_MOVLHPS        ,
01212   INTRN_UNPCKHPS       ,
01213   INTRN_UNPCKLPS       ,
01214   INTRN_RCPPS          ,
01215   INTRN_RSQRTPS        ,
01216   INTRN_SQRTPS         ,
01217   INTRN_RCPSS          ,
01218   INTRN_RSQRTSS        ,
01219   INTRN_SQRTSS         ,
01220   INTRN_SHUFPS         ,
01221   INTRN_EMMS           ,
01222   INTRN_PADDQ          ,
01223   INTRN_PSUBQ          ,
01224   INTRN_UNIMP_PURE     ,
01225   INTRN_UNIMP          ,
01226   INTRN_LOADAPS        ,
01227   INTRN_STOREAPS       ,
01228   INTRN_COSL           ,
01229   INTRN_SINL           ,
01230   INTRN_PSLLDQ         ,
01231   INTRN_PSLLW          ,
01232   INTRN_PSLLD          ,
01233   INTRN_PSLLQ          ,
01234   INTRN_PSRLW          ,
01235   INTRN_PSRLD          ,
01236   INTRN_PSRLQ          ,
01237   INTRN_PSRAW          ,
01238   INTRN_PSRAD          ,
01239   INTRN_V16F4SINH      ,
01240   INTRN_V16F4COSH      ,
01241   INTRN_V16F8SINH      ,
01242   INTRN_V16F8COSH      ,
01243   INTRN_MOVNTDQ        ,
01244   INTRN_LOADD          ,
01245   INTRN_MOVNTPS        ,
01246   INTRN_SSE_ZERO       ,
01247   INTRN_CLRTI          ,
01248   INTRN_PSHUFD         ,
01249   INTRN_LOADSS         ,
01250   INTRN_SIGNV16F4      ,
01251   INTRN_SIGNV16F8      ,
01252   INTRN_SHUFPD         ,
01253   INTRN_XORPD          ,
01254   INTRN_ANDPD          ,
01255   INTRN_ORPD           ,
01256   INTRN_STORELPD       ,
01257   INTRN_STOREHPD       ,
01258   INTRN_LOADLPD        ,
01259   INTRN_LOADHPD        ,
01260   INTRN_UNPCKLPD       ,
01261   INTRN_UNPCKHPD       ,
01262   INTRN_LFENCE         ,
01263   INTRN_MFENCE         ,
01264   INTRN_PSHUFW         ,
01265   INTRN_PSRLDQ         ,
01266   INTRN_LOADDQA        ,
01267   INTRN_LOADDQU        ,
01268   INTRN_STOREDQA       ,
01269   INTRN_STOREDQU       ,
01270   INTRN_VEC_INIT_V2SI,
01271   INTRN_VEC_EXT_V2SI,
01272   INTRN_PMADDWD,
01273   INTRN_PSLLW_MMX,
01274   INTRN_PSLLD_MMX,
01275   INTRN_PSRLW_MMX,
01276   INTRN_PSRLD_MMX,
01277   INTRN_PSRAW_MMX,
01278   INTRN_PSRAD_MMX,
01279   INTRN_PAND_MMX,
01280   INTRN_PANDN_MMX,
01281   INTRN_POR_MMX,
01282   INTRN_PXOR_MMX, 
01283   INTRN_COMILTSS,
01284   INTRN_COMILESS,
01285   INTRN_COMIGTSS,
01286   INTRN_COMIGESS,
01287   INTRN_COMINEQSS,
01288   INTRN_COMIEQSD    ,
01289   INTRN_COMILTSD    ,
01290   INTRN_COMILESD    ,
01291   INTRN_COMIGTSD    ,
01292   INTRN_COMIGESD    ,
01293   INTRN_COMINEQSD    ,
01294   INTRN_CVTPI2PS    ,
01295   INTRN_CVTPS2PI    ,
01296   INTRN_CVTTPS2PI    ,
01297   INTRN_CVTPI2PD    ,
01298   INTRN_CVTPD2PI    ,
01299   INTRN_CVTTPD2PI    ,
01300   INTRN_CVTSI2SS    ,
01301   INTRN_CVTSI642SS    ,
01302   INTRN_CVTSS2SI    ,
01303   INTRN_CVTSS2SI64    ,
01304   INTRN_CVTTSS2SI    ,
01305   INTRN_CVTTSS2SI64    ,
01306   INTRN_CVTSI2SD    ,
01307   INTRN_CVTSI642SD    ,
01308   INTRN_CVTSD2SI    ,
01309   INTRN_CVTSD2SI64    ,
01310   INTRN_CVTTSD2SI    ,
01311   INTRN_CVTTSD2SI64    ,
01312   INTRN_CVTDQ2PS    ,
01313   INTRN_CVTPS2DQ    ,
01314   INTRN_CVTTPS2DQ    ,
01315   INTRN_CVTDQ2PD    ,
01316   INTRN_CVTPD2DQ    ,
01317   INTRN_CVTTPD2DQ    ,
01318   INTRN_CVTPD2PS    ,
01319   INTRN_CVTPS2PD    ,
01320   INTRN_CVTSD2SS    ,
01321   INTRN_CVTSS2SD    ,
01322   INTRN_LOADUPS        ,
01323   INTRN_STOREUPS    ,
01324   INTRN_LOADUPD        ,
01325   INTRN_STOREUPD    ,
01326   INTRN_LOADHPS        ,
01327   INTRN_STOREHPS    ,
01328   INTRN_LOADLPS        ,
01329   INTRN_STORELPS    ,
01330   INTRN_MOVMSKPS    ,
01331   INTRN_MOVMSKPD    ,
01332   INTRN_MASKMOVDQU    ,
01333   INTRN_MASKMOVQ    ,
01334   INTRN_MOVNTPD        ,
01335   INTRN_MOVNTI        ,
01336   INTRN_STMXCSR        ,
01337   INTRN_LDMXCSR        ,
01338   INTRN_MOVSD           ,
01339   INTRN_PSHUFLW         ,
01340   INTRN_PSHUFHW         ,
01341   INTRN_MOVNTSS         ,
01342   INTRN_MOVNTSD         ,
01343   INTRN_EXTRQI          ,
01344   INTRN_EXTRQ           ,
01345   INTRN_INSERTQI        ,
01346   INTRN_INSERTQ         ,
01347   INTRN_PADDD128        ,  
01348   INTRN_PADDW128        ,
01349   INTRN_PMOVMSKB128     ,    
01350   #define INTRINSIC_LAST_TMP  INTRN_PMOVMSKB128
01351 #elif defined(TARG_SL)
01352 
01353   INTRN_VBUF_OFFSET ,
01354   INTRN_SL_INTRN_BGN = INTRN_VBUF_OFFSET,
01355   INTRN_SBUF_OFFSET  ,
01356   INTRN_C2_MVGR_R2G ,
01357   INTRN_SL2_BEGIN = INTRN_C2_MVGR_R2G ,
01358   INTRN_C2_MVGR_G2R ,
01359   INTRN_C2_MVGR_G2S ,
01360   INTRN_C2_MVGR_S2G ,
01361   INTRN_C2_MVGC_C2G ,
01362   INTRN_C2_MVGC_G2C ,
01363   INTRN_C2_LD_V ,
01364   INTRN_C2_LD_G ,
01365   INTRN_C2_LD_S ,
01366   INTRN_C2_ST_V ,
01367   INTRN_C2_ST_G ,
01368   INTRN_C2_LD_G_IMM, 
01369   INTRN_C2_LD_C_IMM, 
01370   INTRN_C2_LD_V_IMM ,
01371   INTRN_C2_ST_V_IMM ,
01372   INTRN_C2_ST_C_IMM ,
01373   INTRN_C2_ST_G_IMM ,
01374   INTRN_C2_VADDS ,
01375   INTRN_C2_VSUBS ,
01376   INTRN_C2_VMUL ,
01377   INTRN_C2_VNEG ,
01378   INTRN_C2_VMACS ,
01379   INTRN_C2_VSHFT ,
01380   INTRN_C2_VCLP ,
01381   INTRN_C2_VCLG ,
01382   INTRN_C2_VCMOV ,
01383   INTRN_C2_LCZERO ,
01384   INTRN_C2_VRND ,
01385   INTRN_C2_VSPAS ,
01386   INTRN_C2_VSPEL ,
01387   INTRN_C2_MMUL_S123 ,
01388   INTRN_C2_MMUL ,
01389   INTRN_C2_VMOV ,
01390   INTRN_C2_VCOPY ,
01391   INTRN_C2_VCMPR ,
01392   INTRN_C2_SAD ,
01393   INTRN_C2_SATD ,
01394   INTRN_C2_INTRA ,
01395   INTRN_C2_MVSEL ,
01396   INTRN_C2_BCST ,
01397   INTRN_C2_VLCS ,
01398   INTRN_C2_VLCS_R ,
01399   INTRN_C2_ADDS ,
01400   INTRN_C2_ADDS_R, 
01401   INTRN_C2_SUBS ,
01402   INTRN_C2_SUBS_R, 
01403   INTRN_C2_MULS ,
01404   INTRN_C2_MULS_R, 
01405   INTRN_C2_MADS ,
01406   INTRN_C2_SMADS ,
01407   INTRN_C2_MINMAX ,
01408   INTRN_C2_CMOV ,
01409   INTRN_C2_MOV ,
01410   INTRN_C2_MOV_R, 
01411   INTRN_C2_CLP ,
01412   INTRN_C2_CHKRNG ,
01413   INTRN_C2_SCOND  ,
01414   INTRN_C2_SCOND_R ,
01415   INTRN_C2_BOP ,
01416   INTRN_C2_BDEP ,
01417   INTRN_C2_BXTR ,
01418   INTRN_C2_BXTRR48 ,
01419   INTRN_C2_SUM4 ,
01420   INTRN_C2_SUM4_R, 
01421   INTRN_C2_MED ,
01422   INTRN_C2_FORK ,
01423   INTRN_C2_JOINT ,
01424   INTRN_C2_LD_V2G ,
01425   INTRN_C2_ST_G2V  , 
01426   INTRN_C2_LD_V2G_IMM ,
01427   INTRN_C2_ST_G2V_IMM ,
01428   INTRN_C2_MVGR_R2S ,
01429   INTRN_C2_GSUMS  ,
01430   INTRN_C2_WRAP  ,
01431   INTRN_C2_CLZOB  ,
01432   INTRN_C2_THCTRL ,
01433   INTRN_C2_SCOND_R_WB ,
01434   INTRN_C2_VSPEL_MAC ,
01435   INTRN_C2_SUM3_SADDR ,
01436   INTRN_PERIPHERAL_RW_BEGIN , // add peripheral here
01437   INTRN_PERIPHERAL_RW_END ,
01438   INTRN_VBUF_ABSOLUTE ,
01439   INTRN_SL_INTRN_END = INTRN_VBUF_ABSOLUTE ,
01440   INTRN_SL2_END = INTRN_VBUF_ABSOLUTE ,
01441 
01442   INTRN_MUL_SHIFT_HI ,
01443   INTRN_C3_INTRINSIC_BEGIN = INTRN_MUL_SHIFT_HI,
01444   INTRN_MUL_SHIFT ,
01445   INTRN_C3_LEAD ,
01446   INTRN_C3_MAC ,
01447   INTRN_C3_MACN ,
01448   INTRN_C3_ROUND ,
01449   INTRN_C3_SAADDS ,
01450   INTRN_C3_SASUBS ,
01451   INTRN_C3_MULA ,
01452   INTRN_C3_INIT_ACC ,
01453   INTRN_C3_SAVE_ACC ,
01454   INTRN_C3_TRBACK ,
01455   INTRN_MPY_32_16 ,
01456   INTRN_C3_MACD ,
01457   INTRN_C3_SAADDSH ,
01458   INTRN_C3_SASUBSH ,
01459   INTRN_C3_MVFS ,
01460   INTRN_C3_INIT_ADDR ,
01461   INTRN_C3_SAVE_ADDR ,
01462   INTRN_C3_MAC_A ,
01463   INTRN_C3_MACN_A ,
01464   INTRN_C3_DMAC_A ,
01465   INTRN_C3_DMACN_A ,
01466   INTRN_C3_INIT_DACC ,
01467   INTRN_C3_SAVE_DACC ,
01468   INTRN_C3_SAADDH_A ,
01469   INTRN_C3_SASUBH_A ,
01470   INTRN_C3_SAMULSH ,
01471   INTRN_C3_MULA_A ,
01472   INTRN_C3_SAMULH_A ,
01473   INTRN_C3_PTR ,
01474   INTRN_C3_MAC_AR ,
01475   INTRN_C3_MACN_AR ,
01476   INTRN_C3_MULA_AR ,
01477   INTRN_C3_INIT_PTR ,
01478   INTRN_C3_VITERBI ,
01479   INTRN_C3_DMULT ,
01480   INTRN_C3_DMULT_A ,
01481   INTRN_C3_DMULTN ,
01482   INTRN_C3_DMULTN_A ,
01483   INTRN_SET_CIRCBUF ,
01484   INTRN_RESET_CIRCBUF ,
01485   INTRN_C3_DADD ,
01486   INTRN_C3_DSUB ,
01487   INTRN_C3_FFT ,
01488   INTRN_C3_FFTLD ,
01489   INTRN_C3_FFTST ,
01490   INTRN_DEPOSIT ,
01491   INTRN_EXTRACT ,
01492   INTRN_C3_BITR ,
01493   INTRN_C3_DMAC ,
01494   INTRN_C3_DMACN ,
01495   INTRN_C3_LOAD ,
01496   INTRN_C3_STORE ,
01497   INTRN_C3_REVB ,
01498   INTRN_C3_DSHL_I ,
01499   INTRN_C3_DSHR_I ,
01500   INTRN_C3_MAC_I ,
01501   INTRN_C3_MACN_I ,
01502   INTRN_C3_MULA_I ,
01503   INTRN_C3_SAADD_A ,
01504   INTRN_C3_SADDHA ,
01505   INTRN_C3_SAADDHA_A , 
01506   INTRN_C3_SASUB_A ,
01507   INTRN_C3_COPY_ADDR ,
01508   INTRN_C3_SET_ADDR ,
01509   INTRN_CVT64_HIGH ,
01510   INTRN_CVT64_LOW ,
01511   INTRN_CVT32 ,
01512   INTRN_LONGLONG_CVT64_HIGH ,
01513   INTRN_LONGLONG_CVT64_LOW ,
01514   INTRN_MUL_SHIFT_HI_U ,
01515   INTRN_EXTRACTU ,
01516   INTRN_MUL_SHIFT_U ,
01517   INTRN_C3AADDA ,
01518   INTRN_C3BITR ,
01519   INTRN_C3CS ,
01520   INTRN_C3DADD ,
01521   INTRN_C3DMAC ,
01522   INTRN_C3DMAC_A ,
01523   INTRN_C3DMULA ,
01524   INTRN_C3DMULA_A ,
01525   INTRN_C3DSHLL_I ,
01526   INTRN_C3FFE ,
01527   INTRN_C3LD ,
01528   INTRN_C3ST ,
01529   INTRN_C3LEAD ,
01530   INTRN_C3MAC ,
01531   INTRN_C3MAC_A ,
01532   INTRN_C3MAC_AR ,
01533   INTRN_C3MAC_I ,
01534   INTRN_C3MULA ,
01535   INTRN_C3MULA_A ,
01536   INTRN_C3MULA_AR ,
01537   INTRN_C3MULA_I ,
01538   INTRN_C3MULS ,
01539   INTRN_C3MULUS ,
01540   INTRN_C3REVB ,
01541   INTRN_C3ROUND ,
01542   INTRN_C3SAADD_A ,
01543   INTRN_C3SAADDH_A ,
01544   INTRN_C3SAADDS ,
01545   INTRN_C3SAADDSH ,
01546   INTRN_C3SADDA ,
01547   INTRN_C3SADDA_A ,
01548   INTRN_C3SAMULH_A ,
01549   INTRN_C3SAMULSH ,
01550   INTRN_C3SHAV ,
01551   INTRN_C3SHLAFA_I ,
01552   INTRN_C3SHLATA_I ,
01553   INTRN_C3SHLA_I ,
01554   INTRN_C3SUBC ,
01555   INTRN_C3NEGA ,
01556   INTRN_INIT_HI ,
01557   INTRN_COPY_HI ,
01558   INTRN_C3_INTRINSIC_END = INTRN_COPY_HI,
01559   // end new c3 instruction version
01560 #endif // TARG_X8664
01561  
01562 #ifdef TARG_NVISA
01563   INTRN_BRKPT,
01564   INTRN_TRAP,
01565   INTRN_C_F4ROUND,
01566   INTRN_C_F8ROUND,
01567   INTRN_F4EXP2,
01568   INTRN_F8EXP2,
01569   INTRN_F4LOG2,
01570   INTRN_F8LOG2,
01571   INTRN_F4SATURATE,
01572   INTRN_F8SATURATE,
01573   INTRN_CLOCK,
01574   INTRN_MUL24,
01575   INTRN_UMUL24,
01576   INTRN_F4MA,
01577   INTRN_F8MA_ROUND,
01578   INTRN_F8MA_TRUNC,
01579   INTRN_F4ADD_ROUND,
01580   INTRN_F4ADD_TRUNC,
01581   INTRN_F8ADD_ROUND,
01582   INTRN_F8ADD_TRUNC,
01583   INTRN_F4MUL_ROUND,
01584   INTRN_F4MUL_TRUNC,
01585   INTRN_F8MUL_ROUND,
01586   INTRN_F8MUL_TRUNC,
01587   INTRN_I4SAD,
01588   INTRN_U4SAD,
01589   INTRN_F4F8CVT_ROUND,
01590   INTRN_F4F8CVT_TRUNC,
01591   INTRN_F4F8CVT_FLOOR,
01592   INTRN_F4F8CVT_CEIL,
01593   INTRN_I4F8CVT_ROUND,
01594   INTRN_I4F8CVT_TRUNC,
01595   INTRN_I4F8CVT_FLOOR,
01596   INTRN_I4F8CVT_CEIL,
01597   INTRN_U4F8CVT_ROUND,
01598   INTRN_U4F8CVT_TRUNC,
01599   INTRN_U4F8CVT_FLOOR,
01600   INTRN_U4F8CVT_CEIL,
01601   INTRN_F8I4CVT_ROUND,
01602   INTRN_F8I4CVT_TRUNC,
01603   INTRN_F8I4CVT_FLOOR,
01604   INTRN_F8I4CVT_CEIL,
01605   INTRN_F8U4CVT_ROUND,
01606   INTRN_F8U4CVT_TRUNC,
01607   INTRN_F8U4CVT_FLOOR,
01608   INTRN_F8U4CVT_CEIL,
01609   INTRN_F4I4CVT_ROUND,
01610   INTRN_F4I4CVT_TRUNC,
01611   INTRN_F4I4CVT_FLOOR,
01612   INTRN_F4I4CVT_CEIL,
01613   INTRN_F4U4CVT_ROUND,
01614   INTRN_F4U4CVT_TRUNC,
01615   INTRN_F4U4CVT_FLOOR,
01616   INTRN_F4U4CVT_CEIL,
01617   INTRN_I4F4CVT_ROUND,
01618   INTRN_I4F4CVT_TRUNC,
01619   INTRN_I4F4CVT_FLOOR,
01620   INTRN_I4F4CVT_CEIL,
01621   INTRN_U4F4CVT_ROUND,
01622   INTRN_U4F4CVT_TRUNC,
01623   INTRN_U4F4CVT_FLOOR,
01624   INTRN_U4F4CVT_CEIL,
01625   INTRN_F4I8CVT_ROUND,
01626   INTRN_F4I8CVT_TRUNC,
01627   INTRN_F4I8CVT_FLOOR,
01628   INTRN_F4I8CVT_CEIL,
01629   INTRN_F4U8CVT_ROUND,
01630   INTRN_F4U8CVT_TRUNC,
01631   INTRN_F4U8CVT_FLOOR,
01632   INTRN_F4U8CVT_CEIL,
01633   INTRN_F8I8CVT_ROUND,
01634   INTRN_F8I8CVT_TRUNC,
01635   INTRN_F8I8CVT_FLOOR,
01636   INTRN_F8I8CVT_CEIL,
01637   INTRN_F8U8CVT_ROUND,
01638   INTRN_F8U8CVT_TRUNC,
01639   INTRN_F8U8CVT_FLOOR,
01640   INTRN_F8U8CVT_CEIL,
01641   INTRN_I8F4CVT_ROUND,
01642   INTRN_I8F4CVT_TRUNC,
01643   INTRN_I8F4CVT_FLOOR,
01644   INTRN_I8F4CVT_CEIL,
01645   INTRN_U8F4CVT_ROUND,
01646   INTRN_U8F4CVT_TRUNC,
01647   INTRN_U8F4CVT_FLOOR,
01648   INTRN_U8F4CVT_CEIL,
01649   INTRN_I8F8CVT_ROUND,
01650   INTRN_I8F8CVT_TRUNC,
01651   INTRN_I8F8CVT_FLOOR,
01652   INTRN_I8F8CVT_CEIL,
01653   INTRN_U8F8CVT_ROUND,
01654   INTRN_U8F8CVT_TRUNC,
01655   INTRN_U8F8CVT_FLOOR,
01656   INTRN_U8F8CVT_CEIL,
01657   INTRN_F8HLI2D,
01658   INTRN_I4D2LI,
01659   INTRN_I4D2HI,
01660   INTRN_I4ATOMICADD,
01661   INTRN_U4ATOMICADD,
01662   INTRN_F4ATOMICADD,
01663   INTRN_I4ATOMICMIN,
01664   INTRN_U4ATOMICMIN,
01665   INTRN_F4ATOMICMIN,
01666   INTRN_I4ATOMICMAX,
01667   INTRN_U4ATOMICMAX,
01668   INTRN_F4ATOMICMAX,
01669   INTRN_I4ATOMICEXCH,
01670   INTRN_U4ATOMICEXCH,
01671   INTRN_F4ATOMICEXCH,
01672   INTRN_U4ATOMICAND,
01673   INTRN_U4ATOMICOR,
01674   INTRN_U4ATOMICXOR,
01675   INTRN_U4ATOMICINC,
01676   INTRN_U4ATOMICDEC,
01677   INTRN_I4ATOMICCAS,
01678   INTRN_U4ATOMICCAS,
01679   INTRN_F4ATOMICCAS,
01680   /* CUDA CMC intrinsics */
01681   INTRN_GETSHAREDMEM,
01682   INTRN_GETBLOCKIDPTR,
01683 #endif // TARG_NVISA
01684 
01685   INTRN_TAN           ,
01686   INTRN_F8F8I4EXPEXPR   ,
01687   INTRN_F4F4I4EXPEXPR   ,
01688   INTRN_FQFQI4EXPEXPR   ,
01689   INTRN_EXPECT        ,
01690   INTRN_FLOOR          ,
01691   INTRN_FLOORF          ,
01692 
01693   INTRN_CTYPE_B_LOC      ,
01694   INTRN_CTYPE_TOUPPER_LOC,
01695   INTRN_CTYPE_TOLOWER_LOC,
01696   INTRINSIC_LAST = INTRN_CTYPE_TOLOWER_LOC ,
01697 
01698 #endif // KEY
01699 
01700 } INTRINSIC;
01701 
01702 #ifdef __cplusplus
01703 }
01704 #endif
01705 
01706 #endif