X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=helm%2Focaml%2Fmathql_interpreter%2FmQIConn.mli;fp=helm%2Focaml%2Fmathql_interpreter%2FmQIConn.mli;h=0000000000000000000000000000000000000000;hp=94ea83f76148895ad7db7e6f90dee400e58b9bb3;hb=1696761e4b8576e8ed81caa905fd108717019226;hpb=5325734bc2e4927ed7ec146e35a6f0f2b49f50c1 diff --git a/helm/ocaml/mathql_interpreter/mQIConn.mli b/helm/ocaml/mathql_interpreter/mQIConn.mli deleted file mode 100644 index 94ea83f76..000000000 --- a/helm/ocaml/mathql_interpreter/mQIConn.mli +++ /dev/null @@ -1,65 +0,0 @@ -(* Copyright (C) 2000, HELM Team. - * - * This file is part of HELM, an Hypertextual, Electronic - * Library of Mathematics, developed at the Computer Science - * Department, University of Bologna, Italy. - * - * HELM is free software; you can redistribute it and/or - * modify it under the terms of the GNU General Public License - * as published by the Free Software Foundation; either version 2 - * of the License, or (at your option) any later version. - * - * HELM is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with HELM; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place - Suite 330, Boston, - * MA 02111-1307, USA. - * - * For details, see the HELM World-Wide-Web page, - * http://cs.unibo.it/helm/. - *) - -(* AUTOR: Ferruccio Guidi - *) - -type connection = MySQL_C of Mysql.dbd - | Postgres_C of Postgres.connection - | No_C - -type flag = Galax | Postgres | Queries | Result | Source | Times | Warn - -type handle = { - log : string -> unit; (* logging function *) - set : flag list; (* options *) - pgc : connection; (* PG connection *) - pgm : MQIMap.pg_map; (* PG conversion function *) - pga : MQIMap.pg_alias (* PG table aliases *) -} - -val string_of_flags : flag list -> string -val flags_of_string : string -> flag list - -val init : ?flags:(flag list) -> ?log:(string -> unit) -> unit -> handle -val close : handle -> unit -val connected : handle -> bool -val exec : handle -> (MQITypes.query -> unit) -> - MQITypes.table -> MQITypes.columns -> - string MQITypes.con_true -> string MQITypes.con_false -> - MQITypes.result - -val init_if_connected : ?flags:(flag list) -> ?log:(string -> unit) -> unit -> handle - -(* The following functions allow to read the handle internal fields. - * For exclusive use of the interpreter. - *) - -val log : handle -> string -> unit -val set : handle -> flag -> bool -val flags : handle -> flag list -val tables : handle -> MathQL.path -> MQIMap.pg_tables -val field : handle -> MathQL.path -> string -> string -val resolve : handle -> string -> string