Mercurial > urweb

comparison src/settings.sig @ 874:3c7b48040dcf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
MySQL demo/sql succeeds in reading no rows
author Adam Chlipala <adamc@hcoop.net>
date Sun, 12 Jul 2009 15:05:40 -0400
parents 41971801b62d
children dae141d911d9
comparison
equal deleted inserted replaced
873:41971801b62d 874:3c7b48040dcf
121 (* Call it this on the command line *) 121 (* Call it this on the command line *)
122 header : string, 122 header : string,
123 (* Include this C header file *) 123 (* Include this C header file *)
124 link : string, 124 link : string,
125 (* Pass these linker arguments *) 125 (* Pass these linker arguments *)
126 global_init : Print.PD.pp_desc,
127 (* Define uw_client_init() *)
128 p_sql_type : sql_type -> string, 126 p_sql_type : sql_type -> string,
129 init : {dbstring : string, 127 init : {dbstring : string,
130 prepared : (string * int) list, 128 prepared : (string * int) list,
131 tables : (string * (string * sql_type) list) list, 129 tables : (string * (string * sql_type) list) list,
132 views : (string * (string * sql_type) list) list, 130 views : (string * (string * sql_type) list) list,
133 sequences : string list} -> Print.PD.pp_desc, 131 sequences : string list} -> Print.PD.pp_desc,
134 (* Define uw_db_init(), uw_db_close(), uw_db_begin(), uw_db_commit(), and uw_db_rollback() *) 132 (* Define uw_client_init(), uw_db_init(), uw_db_close(), uw_db_begin(), uw_db_commit(), and uw_db_rollback() *)
135 query : {loc : ErrorMsg.span, cols : sql_type list, 133 query : {loc : ErrorMsg.span, cols : sql_type list,
136 doCols : ({wontLeakStrings : bool, col : int, typ : sql_type} -> Print.PD.pp_desc) 134 doCols : ({wontLeakStrings : bool, col : int, typ : sql_type} -> Print.PD.pp_desc)
137 -> Print.PD.pp_desc} 135 -> Print.PD.pp_desc}
138 -> Print.PD.pp_desc, 136 -> Print.PD.pp_desc,
139 queryPrepared : {loc : ErrorMsg.span, id : int, query : string, 137 queryPrepared : {loc : ErrorMsg.span, id : int, query : string,
143 -> Print.PD.pp_desc, 141 -> Print.PD.pp_desc,
144 dml : ErrorMsg.span -> Print.PD.pp_desc, 142 dml : ErrorMsg.span -> Print.PD.pp_desc,
145 dmlPrepared : {loc : ErrorMsg.span, id : int, dml : string, 143 dmlPrepared : {loc : ErrorMsg.span, id : int, dml : string,
146 inputs : sql_type list} -> Print.PD.pp_desc, 144 inputs : sql_type list} -> Print.PD.pp_desc,
147 nextval : ErrorMsg.span -> Print.PD.pp_desc, 145 nextval : ErrorMsg.span -> Print.PD.pp_desc,
148 nextvalPrepared : {loc : ErrorMsg.span, id : int, query : string} -> Print.PD.pp_desc 146 nextvalPrepared : {loc : ErrorMsg.span, id : int, query : string} -> Print.PD.pp_desc,
147 sqlifyString : string -> string,
148 p_cast : string * sql_type -> string,
149 p_blank : int * sql_type -> string (* Prepared statement input *),
150 supportsDeleteAs : bool
149 } 151 }
150 152
151 val addDbms : dbms -> unit 153 val addDbms : dbms -> unit
152 val setDbms : string -> unit 154 val setDbms : string -> unit
153 val currentDbms : unit -> dbms 155 val currentDbms : unit -> dbms