package postgresql
Source file error_field.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65(* PostgreSQL-OCAML - OCaml-interface to the PostgreSQL database Copyright (C) 2017 Sean Grove email: sean@bushi.do WWW: http://www.riseos.com Copyright (C) 2017- Markus Mottl email: markus.mottl@gmail.com WWW: http://www.ocaml.info This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library 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 Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA *) type t = | SEVERITY | SEVERITY_NONLOCALIZED | SQLSTATE | MESSAGE_PRIMARY | MESSAGE_DETAIL | MESSAGE_HINT | STATEMENT_POSITION | INTERNAL_POSITION | INTERNAL_QUERY | CONTEXT | SCHEMA_NAME | TABLE_NAME | COLUMN_NAME | DATATYPE_NAME | CONSTRAINT_NAME | SOURCE_FILE | SOURCE_LINE | SOURCE_FUNCTION let to_string = function | SEVERITY -> "SEVERITY" | SEVERITY_NONLOCALIZED -> "SEVERITY_NONLOCALIZED" | SQLSTATE -> "SQLSTATE" | MESSAGE_PRIMARY -> "MESSAGE_PRIMARY" | MESSAGE_DETAIL -> "MESSAGE_DETAIL" | MESSAGE_HINT -> "MESSAGE_HINT" | STATEMENT_POSITION -> "STATEMENT_POSITION" | INTERNAL_POSITION -> "INTERNAL_POSITION" | INTERNAL_QUERY -> "INTERNAL_QUERY" | CONTEXT -> "CONTEXT" | SCHEMA_NAME -> "SCHEMA_NAME" | TABLE_NAME -> "TABLE_NAME" | COLUMN_NAME -> "COLUMN_NAME" | DATATYPE_NAME -> "DATATYPE_NAME" | CONSTRAINT_NAME -> "CONSTRAINT_NAME" | SOURCE_FILE -> "SOURCE_FILE" | SOURCE_LINE -> "SOURCE_LINE" | SOURCE_FUNCTION -> "SOURCE_FUNCTION"