1 /*
2 * #%L
3 * prolobjectlink-jpi-jpl7
4 * %%
5 * Copyright (C) 2019 Prolobjectlink Project
6 * %%
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions are met:
9 *
10 * 1. Redistributions of source code must retain the above copyright notice,
11 * this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright notice,
13 * this list of conditions and the following disclaimer in the documentation
14 * and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 * #L%
28 */
29 package io.github.prolobjectlink.prolog.jpl7;
30
31 import org.jpl7.Term;
32
33 import io.github.prolobjectlink.prolog.ArityError;
34 import io.github.prolobjectlink.prolog.FunctorError;
35 import io.github.prolobjectlink.prolog.PrologDouble;
36 import io.github.prolobjectlink.prolog.PrologFloat;
37 import io.github.prolobjectlink.prolog.PrologInteger;
38 import io.github.prolobjectlink.prolog.PrologLong;
39 import io.github.prolobjectlink.prolog.PrologNumber;
40 import io.github.prolobjectlink.prolog.PrologProvider;
41
42 /**
43 *
44 * @author Jose Zalacain
45 * @since 1.0
46 */
47 abstract class JplNumber extends JplTerm implements PrologNumber {
48
49 protected JplNumber(int type, PrologProvider provider, Term value) {
50 super(type, provider, value);
51 }
52
53 public final PrologInteger getPrologInteger() {
54 return new JplInteger(provider, getIntegerValue());
55 }
56
57 public final PrologFloat getPrologFloat() {
58 return new JplFloat(provider, getFloatValue());
59 }
60
61 public final PrologDouble getPrologDouble() {
62 return new JplDouble(provider, getDoubleValue());
63 }
64
65 public final PrologLong getPrologLong() {
66 return new JplLong(provider, getLongValue());
67 }
68
69 public final int getArity() {
70 throw new ArityError(this);
71 }
72
73 public final String getFunctor() {
74 throw new FunctorError(this);
75 }
76
77 }