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 }