1 /* XSB extended foreign language interface: declarations.
2    Copyright (C) 2001-2010 Roberto Bagnara <bagnara@cs.unipr.it>
3    Copyright (C) 2010-2016 BUGSENG srl (http://bugseng.com)
4 
5 This file is part of the Parma Polyhedra Library (PPL).
6 
7 The PPL is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by the
9 Free Software Foundation; either version 3 of the License, or (at your
10 option) any later version.
11 
12 The PPL is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
15 for more details.
16 
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software Foundation,
19 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1307, USA.
20 
21 For the most up-to-date information see the Parma Polyhedra Library
22 site: http://bugseng.com/products/ppl/ . */
23 
24 #ifndef PPL_xsb_efli_hh
25 #define PPL_xsb_efli_hh 1
26 
27 #include "ppl.hh"
28 #include "xsb_cfli.hh"
29 
30 namespace Parma_Polyhedra_Library {
31 
32 namespace Interfaces {
33 
34 namespace Prolog {
35 
36 namespace XSB {
37 
38 /*!
39   True if and only if the Prolog engine supports unbounded integers.
40 */
41 extern bool Prolog_has_unbounded_integers;
42 
43 /*!
44   If \p Prolog_has_unbounded_integers is false, holds the minimum
45   integer value representable by a Prolog integer.
46   Holds zero otherwise.
47 */
48 extern long Prolog_min_integer;
49 
50 /*!
51   If \p Prolog_has_unbounded_integers is false, holds the maximum
52   integer value representable by a Prolog integer.
53   Holds zero otherwise.
54 */
55 extern long Prolog_max_integer;
56 
57 /*!
58   Performs system-dependent initialization.
59 */
60 void
61 ppl_Prolog_sysdep_init();
62 
63 /*!
64   Perform system-dependent de-itialization.
65 */
66 void
67 ppl_Prolog_sysdep_deinit();
68 
69 // FIXME: write the documentation.
70 int
71 Prolog_get_Coefficient(Prolog_term_ref t, Coefficient& n);
72 
73 // FIXME: write the documentation.
74 int
75 Prolog_unify_Coefficient(Prolog_term_ref t, const Coefficient& n);
76 
77 // FIXME: write the documentation.
78 int
79 Prolog_put_Coefficient(Prolog_term_ref& t, const Coefficient& n);
80 
81 } // namespace XSB
82 
83 } // namespace Prolog
84 
85 } // namespace Interfaces
86 
87 } // namespace Parma_Polyhedra_Library
88 
89 #endif // !defined(PPL_xsb_efli_hh)
90