View Javadoc

1   /*
2    * #%L
3    * prolobjectlink-jpi-jpl
4    * %%
5    * Copyright (C) 2019 Prolobjectlink Project
6    * %%
7    * This program is free software: you can redistribute it and/or modify
8    * it under the terms of the GNU Lesser General Public License as
9    * published by the Free Software Foundation, either version 2.1 of the
10   * License, or (at your option) any later version.
11   * 
12   * This program is distributed in the hope that it will be useful,
13   * but WITHOUT ANY WARRANTY; without even the implied warranty of
14   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15   * GNU General Lesser Public License for more details.
16   * 
17   * You should have received a copy of the GNU General Lesser Public
18   * License along with this program.  If not, see
19   * <http://www.gnu.org/licenses/lgpl-2.1.html>.
20   * #L%
21   */
22  package io.github.prolobjectlink.prolog.jpl;
23  
24  import static io.github.prolobjectlink.prolog.PrologTermType.INTEGER_TYPE;
25  
26  import io.github.prolobjectlink.prolog.PrologInteger;
27  import io.github.prolobjectlink.prolog.PrologProvider;
28  import io.github.prolobjectlink.prolog.PrologTerm;
29  import jpl.Integer;
30  import jpl.Term;
31  
32  /**
33   * 
34   * @author Jose Zalacain
35   * @since 1.0
36   */
37  class JplInteger extends JplNumber implements PrologInteger {
38  
39  	JplInteger(PrologProvider provider, Number value) {
40  		super(INTEGER_TYPE, provider, new Integer(value.intValue()));
41  	}
42  
43  	JplInteger(int type, PrologProvider provider, Term value) {
44  		super(type, provider, value);
45  	}
46  
47  	public final long getLongValue() {
48  		return ((Integer) value).longValue();
49  	}
50  
51  	public final double getDoubleValue() {
52  		return ((Integer) value).doubleValue();
53  	}
54  
55  	public final int getIntegerValue() {
56  		return ((Integer) value).intValue();
57  	}
58  
59  	public final float getFloatValue() {
60  		return ((Integer) value).floatValue();
61  	}
62  
63  	public final PrologTerm[] getArguments() {
64  		return new JplInteger[0];
65  	}
66  
67  }