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.VARIABLE_TYPE;
25  
26  import io.github.prolobjectlink.prolog.ArityError;
27  import io.github.prolobjectlink.prolog.FunctorError;
28  import io.github.prolobjectlink.prolog.PrologProvider;
29  import io.github.prolobjectlink.prolog.PrologTerm;
30  import io.github.prolobjectlink.prolog.PrologVariable;
31  import jpl.Term;
32  import jpl.Variable;
33  
34  /**
35   * 
36   * @author Jose Zalacain
37   * @since 1.0
38   */
39  public class JplVariable extends JplTerm implements PrologVariable {
40  
41  	protected JplVariable(PrologProvider provider) {
42  		super(VARIABLE_TYPE, provider, new Variable("_"));
43  	}
44  
45  	protected JplVariable(PrologProvider provider, String name) {
46  		super(VARIABLE_TYPE, provider, new Variable(name));
47  	}
48  
49  	protected JplVariable(int type, PrologProvider provider) {
50  		super(type, provider);
51  	}
52  
53  	protected JplVariable(int type, PrologProvider provider, String name) {
54  		super(type, provider, new Variable(name));
55  	}
56  
57  	protected JplVariable(int type, PrologProvider provider, Term var) {
58  		super(type, provider, var);
59  	}
60  
61  	public boolean isAnonymous() {
62  		return ((Variable) value).name().equals("_");
63  	}
64  
65  	public String getName() {
66  		return ((Variable) value).name();
67  	}
68  
69  	public void setName(String name) {
70  		this.value = new Variable(name);
71  	}
72  
73  	public PrologTerm[] getArguments() {
74  		return new JplVariable[0];
75  	}
76  
77  	public int getArity() {
78  		throw new ArityError(this);
79  	}
80  
81  	public String getFunctor() {
82  		throw new FunctorError(this);
83  	}
84  
85  	public int getPosition() {
86  		throw new UnsupportedOperationException("getPosition()");
87  	}
88  
89  }