Annotation of qemu/target-alpha/op_template.h, revision 1.1.1.1

1.1       root        1: /*
                      2:  *  Alpha emulation cpu micro-operations templates for qemu.
                      3:  *
                      4:  *  Copyright (c) 2007 Jocelyn Mayer
                      5:  *
                      6:  * This library is free software; you can redistribute it and/or
                      7:  * modify it under the terms of the GNU Lesser General Public
                      8:  * License as published by the Free Software Foundation; either
                      9:  * version 2 of the License, or (at your option) any later version.
                     10:  *
                     11:  * This library is distributed in the hope that it will be useful,
                     12:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
                     13:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
                     14:  * Lesser General Public License for more details.
                     15:  *
                     16:  * You should have received a copy of the GNU Lesser General Public
                     17:  * License along with this library; if not, write to the Free Software
                     18:  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
                     19:  */
                     20: 
                     21: /* Optimized constant loads */
                     22: #if REG < 3
                     23: void OPPROTO glue(op_reset_T, REG) (void)
                     24: {
                     25:     glue(T, REG) = 0;
                     26:     RETURN();
                     27: }
                     28: 
                     29: #if !defined(HOST_SPARC) && !defined(HOST_SPARC64)
                     30: void OPPROTO glue(op_reset_FT, REG) (void)
                     31: {
                     32:     glue(FT, REG) = 0;
                     33:     RETURN();
                     34: }
                     35: #else
                     36: void OPPROTO glue(op_reset_FT, REG) (void)
                     37: {
                     38:     glue(helper_reset_FT, REG)();
                     39:     RETURN();
                     40: }
                     41: #endif
                     42: 
                     43: /* XXX: This can be great on most RISC machines */
                     44: #if !defined(__i386__) && !defined(__x86_64__)
                     45: void OPPROTO glue(op_set_s16_T, REG) (void)
                     46: {
                     47:     glue(T, REG) = (int16_t)PARAM(1);
                     48:     RETURN();
                     49: }
                     50: 
                     51: void OPPROTO glue(op_set_u16_T, REG) (void)
                     52: {
                     53:     glue(T, REG) = (uint16_t)PARAM(1);
                     54:     RETURN();
                     55: }
                     56: #endif
                     57: 
                     58: void OPPROTO glue(op_set_s32_T, REG) (void)
                     59: {
                     60:     glue(T, REG) = (int32_t)PARAM(1);
                     61:     RETURN();
                     62: }
                     63: 
                     64: void OPPROTO glue(op_set_u32_T, REG) (void)
                     65: {
                     66:     glue(T, REG) = (uint32_t)PARAM(1);
                     67:     RETURN();
                     68: }
                     69: 
                     70: #if 0 // Qemu does not know how to do this...
                     71: void OPPROTO glue(op_set_64_T, REG) (void)
                     72: {
                     73:     glue(T, REG) = (int64_t)PARAM(1);
                     74:     RETURN();
                     75: }
                     76: #else
                     77: void OPPROTO glue(op_set_64_T, REG) (void)
                     78: {
                     79:     glue(T, REG) = ((int64_t)PARAM(1) << 32) | (int64_t)PARAM(2);
                     80:     RETURN();
                     81: }
                     82: #endif
                     83: 
                     84: #endif /* REG < 3 */
                     85: 
                     86: /* Fixed-point register moves */
                     87: #if REG < 31
                     88: void OPPROTO glue(op_load_T0_ir, REG) (void)
                     89: {
                     90:     T0 = env->ir[REG];
                     91:     RETURN();
                     92: }
                     93: 
                     94: void OPPROTO glue(op_load_T1_ir, REG) (void)
                     95: {
                     96:     T1 = env->ir[REG];
                     97:     RETURN();
                     98: }
                     99: 
                    100: void OPPROTO glue(op_load_T2_ir, REG) (void)
                    101: {
                    102:     T2 = env->ir[REG];
                    103:     RETURN();
                    104: }
                    105: 
                    106: void OPPROTO glue(op_store_T0_ir, REG) (void)
                    107: {
                    108:     env->ir[REG] = T0;
                    109:     RETURN();
                    110: }
                    111: 
                    112: void OPPROTO glue(op_store_T1_ir, REG) (void)
                    113: {
                    114:     env->ir[REG] = T1;
                    115:     RETURN();
                    116: }
                    117: 
                    118: void OPPROTO glue(op_store_T2_ir, REG) (void)
                    119: {
                    120:     env->ir[REG] = T2;
                    121:     RETURN();
                    122: }
                    123: 
                    124: void OPPROTO glue(op_cmov_ir, REG) (void)
                    125: {
                    126:     if (T0)
                    127:         env->ir[REG] = T1;
                    128:     RETURN();
                    129: }
                    130: 
                    131: /* floating point registers moves */
                    132: void OPPROTO glue(op_load_FT0_fir, REG) (void)
                    133: {
                    134:     FT0 = env->fir[REG];
                    135:     RETURN();
                    136: }
                    137: 
                    138: void OPPROTO glue(op_load_FT1_fir, REG) (void)
                    139: {
                    140:     FT1 = env->fir[REG];
                    141:     RETURN();
                    142: }
                    143: 
                    144: void OPPROTO glue(op_load_FT2_fir, REG) (void)
                    145: {
                    146:     FT2 = env->fir[REG];
                    147:     RETURN();
                    148: }
                    149: 
                    150: void OPPROTO glue(op_store_FT0_fir, REG) (void)
                    151: {
                    152:     env->fir[REG] = FT0;
                    153:     RETURN();
                    154: }
                    155: 
                    156: void OPPROTO glue(op_store_FT1_fir, REG) (void)
                    157: {
                    158:     env->fir[REG] = FT1;
                    159:     RETURN();
                    160: }
                    161: 
                    162: void OPPROTO glue(op_store_FT2_fir, REG) (void)
                    163: {
                    164:     env->fir[REG] = FT2;
                    165:     RETURN();
                    166: }
                    167: 
                    168: void OPPROTO glue(op_cmov_fir, REG) (void)
                    169: {
                    170:     helper_cmov_fir(REG);
                    171:     RETURN();
                    172: }
                    173: #endif /* REG < 31 */
                    174: 
                    175: #undef REG

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.