opcode.cpp

Go to the documentation of this file.
00001 /* Copyright 1994, LongView Technologies L.L.C. $Revision: 1.14 $ */
00002 /* Copyright (c) 2006, Sun Microsystems, Inc.
00003 All rights reserved.
00004 
00005 Redistribution and use in source and binary forms, with or without modification, are permitted provided that the 
00006 following conditions are met:
00007 
00008     * Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
00009     * Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following 
00010           disclaimer in the documentation and/or other materials provided with the distribution.
00011     * Neither the name of Sun Microsystems nor the names of its contributors may be used to endorse or promote products derived 
00012           from this software without specific prior written permission.
00013 
00014 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT 
00015 NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL 
00016 THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 
00017 (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 
00018 INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE 
00019 OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE
00020 
00021 
00022 */
00023 
00024 # include "incls/_precompiled.incl"
00025 
00026 #ifdef DELTA_COMPILER
00027 
00028 # include "incls/_opcode.cpp.incl"
00029 
00030 char* BranchOpName[] = {
00031   "B=",    "B#",
00032   "B<",    "B<=",    "Bu<",    "Bu<=",
00033   "B>",    "B>=",    "Bu>",    "Bu>=",
00034   "Bovfl", "Bnofvl",
00035 
00036   "last (INVALID)"
00037 };
00038 
00039 
00040 char* ArithOpName[] = {
00041   "nil (INVALID)",
00042   "test",
00043 
00044   // untagged operations
00045   "+",    "-",    "*",    "div",    "mod",
00046   "and",  "or",   "xor",  "shift",  "cmp",
00047 
00048   // tagged operations
00049   "t+",   "t-",   "t*",   "tdiv",   "tmod",
00050   "tand", "tor",  "txor", "tshift", "tcmp",
00051 
00052   // untagged float operations
00053   "f+",   "f-",   "f*",   "fdiv",   "fmod",
00054   "fcmp",
00055 
00056   "fneg", "fabs", "f^2", "f2oop", 
00057 
00058   // tagged float operation
00059   "f2float",
00060 
00061   "last (INVALID)"
00062 };
00063 
00064 
00065 bool ArithOpIsCommutative[] = {
00066   false,
00067   true,
00068 
00069   // untagged operations
00070   true,  false, true,  false, false,
00071   true,  true,  true,  false, false,
00072 
00073   // tagged operations
00074   true,  false, true,  false, false,
00075   true,  true,  true,  false, false,
00076 
00077   // untagged float operations
00078   true,  false, true,  false, false,
00079   false,
00080 
00081   false, false, false, false,
00082 
00083   // tagged float operation
00084   false,
00085 
00086   false
00087 };
00088 
00089 
00090 void opcode_init() {
00091   if (sizeof(BranchOpName) / sizeof(char*) != LastBranchOp + 1) {
00092     fatal("forgot to change BranchOpName after changing BranchOpCode");
00093   }
00094   if (sizeof(ArithOpName) / sizeof(char*) != LastArithOp + 1) {
00095     fatal("forgot to change ArithOpName after changing ArithOpCode");
00096   }
00097   if (sizeof(ArithOpIsCommutative) / sizeof(bool) !=  LastArithOp + 1) {
00098     fatal("forgot to change ArithOpIsCommutative after changing ArithOpCode");
00099   }
00100 }
00101 
00102 #endif

Generated on Mon Oct 9 13:37:21 2006 for Strongtalk VM by  doxygen 1.4.7