]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/hmysql/hSqlite3.ml
added mkdir
[helm.git] / helm / software / components / hmysql / hSqlite3.ml
index b8687c5e9e20e85ce89a3f8a96c06e0508007519..c6ba66c2e3f52f217f53daf90c343edd7a93d781 100644 (file)
@@ -103,6 +103,7 @@ let quick_connect
     else
       db_name
   in
+  HExtlib.mkdir (Filename.dirname db_open);
   let db = Sqlite3.db_open db_to_open in
   (* attach the REGEX function *)
   Sqlite3.create_fun2 db "REGEXP"