mnj/lua/Slot.java

   1 /*  $Header: //info.ravenbrook.com/project/jili/version/1.1/code/mnj/lua/Lua.java#3 $
   2  * Copyright (c) 2006 Nokia Corporation and/or its subsidiary(-ies).
   3  * All rights reserved.
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining
   6  * a copy of this software and associated documentation files (the
   7  * "Software"), to deal in the Software without restriction, including
   8  * without limitation the rights to use, copy, modify, merge, publish,
   9  * distribute, sublicense, and/or sell copies of the Software, and to
  10  * permit persons to whom the Software is furnished to do so, subject
  11  * to the following conditions:
  12  *
  13  * The above copyright notice and this permission notice shall be
  14  * included in all copies or substantial portions of the Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  17  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  18  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  19  * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR
  20  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
  21  * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  22  * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  23  */
  24
  25 package mnj.lua;
  26
  27 final class Slot
  28 {
  29   Object r;
  30   double d;
  31
  32   Slot()
  33   {
  34   }
  35
  36   Slot(Slot s)
  37   {
  38     this.r = s.r;
  39     this.d = s.d;
  40   }
  41
  42   Slot(Object o)
  43   {
  44     this.setObject(o);
  45   }
  46
  47   Object asObject()
  48   {
  49     if (r == Lua.NUMBER)
  50     {
  51       return new Double(d);
  52     }
  53     return r;
  54   }
  55
  56   void setObject(Object o)
  57   {
  58     r = o;
  59     if (o instanceof Double)
  60     {
  61       r = Lua.NUMBER;
  62       d = ((Double)o).doubleValue();
  63     }
  64   }
  65 }
  66