diff options
| author | 2021-08-10 10:22:05 -0400 | |
|---|---|---|
| committer | 2021-08-10 10:22:05 -0400 | |
| commit | 47eed18958495f6d7c3b6676f2fb055d76c776cf (patch) | |
| tree | c44cc8d6a2557aac28145ad191437708191e2acf | |
| parent | generate database from command line arguments (diff) | |
change 'cache' to 'searchtable' in database
Diffstat (limited to '')
| -rw-r--r-- | makedb.ml | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,7 +1,7 @@ (** Init script for the SQLite database. **) let inits = "\ DROP TABLE IF EXISTS elements; \ - DROP TABLE IF EXISTS cache; \ + DROP TABLE IF EXISTS searchtable; \ CREATE TABLE elements ( \ num INTEGER PRIMARY KEY NOT NULL, \ symb TEXT UNIQUE NOT NULL, \ @@ -11,7 +11,7 @@ let inits = "\ oxidation TEXT, state TEXT, \ melting FLOAT, boiling FLOAT, density FLOAT, \ block TEXT, discovered INTEGER) WITHOUT ROWID; \ - CREATE TABLE cache ( \ + CREATE TABLE searchtable ( \ name TEXT PRIMARY KEY NOT NULL, \ dat BLOB NOT NULL) WITHOUT ROWID; \ " @@ -84,6 +84,6 @@ let makedb db json = let open Sqlite3 let stmt = "INSERT INTO cache VALUES (:name, :cache);" |> prepare db in - do_model stmt "symbs" !symbs; - do_model stmt "names" !names; + do_model stmt "symb" !symbs; + do_model stmt "name" !names; finalize stmt |> Rc.check |
