View Javadoc

1   /*
2    * #%L
3    * prolobjectlink-jpi-tuprolog
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.tuprolog;
23  
24  import io.github.prolobjectlink.prolog.AbstractClause;
25  import io.github.prolobjectlink.prolog.PrologClause;
26  import io.github.prolobjectlink.prolog.PrologIndicator;
27  import io.github.prolobjectlink.prolog.PrologProvider;
28  import io.github.prolobjectlink.prolog.PrologTerm;
29  
30  /**
31   * 
32   * @author Jose Zalacain
33   * @since 1.0
34   */
35  final class TuPrologClause extends AbstractClause implements PrologClause {
36  
37  	private PrologIndicator indicator;
38  
39  	TuPrologClause(PrologProvider provider, PrologTerm head, boolean dynamic, boolean multifile,
40  			boolean discontiguous) {
41  		super(provider, head, dynamic, multifile, discontiguous);
42  		this.indicator = new TuPrologIndicator(head.getFunctor(), head.getArity());
43  	}
44  
45  	TuPrologClause(PrologProvider provider, PrologTerm head, PrologTerm body, boolean dynamic, boolean multifile,
46  			boolean discontiguous) {
47  		super(provider, head, body, dynamic, multifile, discontiguous);
48  		this.indicator = new TuPrologIndicator(head.getFunctor(), head.getArity());
49  	}
50  
51  	public PrologIndicator getPrologIndicator() {
52  		return indicator;
53  	}
54  
55  }