View Javadoc

1   /*
2    * Copyright (c) 2001, Zoltan Farkas All Rights Reserved.
3    *
4    * This library is free software; you can redistribute it and/or
5    * modify it under the terms of the GNU Lesser General Public
6    * License as published by the Free Software Foundation; either
7    * version 2.1 of the License, or (at your option) any later version.
8    *
9    * This library is distributed in the hope that it will be useful,
10   * but WITHOUT ANY WARRANTY; without even the implied warranty of
11   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12   * GNU General Public License for more details.
13   *
14   * You should have received a copy of the GNU Lesser General Public
15   * License along with this program; if not, write to the Free Software
16   * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
17   */
18  
19  package net.sf.zel.instr.var;
20  
21  import net.sf.zel.instr.*;
22  import net.sf.zel.nr.ExtendedNumber;
23  import net.sf.zel.nr.OperableBigInteger;
24  import net.sf.zel.nr.OperableDouble;
25  import net.sf.zel.nr.OperableInteger;
26  import net.sf.zel.nr.OperableLong;
27  import net.sf.zel.nr.OperableNumber;
28  import net.sf.zel.vm.*;
29  
30  /**
31   *
32   * @author zoly
33   */
34  public class INT extends Instruction
35  {
36  
37      /**
38       * instance
39       */
40      public static final Instruction instance = new INT();
41  
42  
43      private static final long serialVersionUID = 5154431044890636019L;
44  
45  
46      private INT(){};
47  
48      /**
49       * experimental cast
50       *
51       * @param context ExecutionContext
52       * @throws ZExecutionException
53       */
54      public final void execute(ExecutionContext context) throws ZExecutionException
55      {
56          OperableNumber val = (OperableNumber) context.popSyncStackVal();
57          context.stack.pop();
58          if (val.getType() == ExtendedNumber.Type.INTEGER )
59              context.stack.push(val); // No transformation needed
60          else
61          {
62              if (val.compareTo(new OperableDouble(Double.valueOf((double)Integer.MAX_VALUE))) <= 0)
63                  context.stack.push(new OperableInteger(val.intValue()));
64              else if (val.compareTo(new OperableDouble(Double.valueOf((double)Long.MAX_VALUE))) <= 0)
65                  context.stack.push(new OperableLong(val.longValue()));
66              else
67                  context.stack.push(new OperableBigInteger(val.bigIntegerValue()));
68          }
69          context.ip++;
70  
71  
72      }
73  }