longInt.cpp

Go to the documentation of this file.
00001 /* Copyright 1994, 1995 LongView Technologies L.L.C. $Revision: 1.1 $ */
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 # include "incls/_longInt.cpp.incl"
00026 
00027 inline long_int::long_int() {}
00028 
00029 long_int::long_int(unsigned int low, unsigned int high) {
00030   this->low  = low;
00031   this->high = high;
00032 }
00033 
00034 long_int::long_int(double value) {
00035   long_int result = double_conversion(value);
00036   low  = result.low;
00037   high = result.high;
00038 }
00039 
00040 long_int long_int::operator +(long_int arg) {
00041   long_int receiver = *this;
00042   long_int result;
00043   __asm {
00044     mov eax, receiver.low
00045     mov edx, receiver.high
00046     add eax, arg.low
00047     adc edx, arg.high
00048     mov result.low,  eax
00049     mov result.high, edx
00050   }
00051   return result;
00052 }
00053 
00054 long_int long_int::operator -(long_int arg) {
00055   long_int receiver = *this;
00056   long_int result;
00057   __asm {
00058     mov eax, receiver.low
00059     mov edx, receiver.high
00060     sub eax, arg.low
00061     sbb edx, arg.high
00062     mov result.low,  eax
00063     mov result.high, edx
00064   }
00065   return result;
00066 }
00067 
00068 double long_int::as_double() {
00069   long_int receiver = *this;  
00070   double result;
00071   __asm {
00072     fild receiver
00073     fstp result
00074   }
00075   return result;
00076 }
00077 
00078 long_int long_int::double_conversion(double value) {
00079   register long_int result;
00080   __asm {
00081     fld   value
00082     fistp result
00083   }
00084   return result;
00085 }
00086 

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