ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Helper/LevelDB.pas
(Generate patch)

Comparing oup/current/Helper/LevelDB.pas (file contents):
Revision 140 by alloc, Fri Mar 30 01:06:52 2007 UTC vs.
Revision 141 by alloc, Fri Mar 30 01:16:54 2007 UTC

# Line 585 | Line 585 | begin
585    Query.ExecSQL;
586    Query.SQL.Text :=
587      'CREATE TABLE linkmap  ( id AUTOINC PRIMARY KEY, src_id INTEGER, ' +
588 <    'src_link_offset INTEGER, target_id INTEGER,  INDEX idsrcid x src_id, ' +
589 <    'INDEX iddestid x target_id);';
588 >    'src_link_offset INTEGER, target_id INTEGER);';
589 >  Query.ExecSQL;
590 >  Query.SQL.Text := 'CREATE INDEX idsrcid ON linkmap (src_id);';
591 >  Query.ExecSQL;
592 >  Query.SQL.Text := 'CREATE INDEX idtargetid ON linkmap (target_id);';
593    Query.ExecSQL;
594    Query.SQL.Text :=
595      'CREATE TABLE rawmap  ( id AUTOINC PRIMARY KEY, src_id INTEGER, ' +
596      'src_link_offset INTEGER, sep BOOLEAN, size INTEGER, ' +
597 <    'data BLOB BlobCompressionMode 9 BlobBlockSize 1024 BlobCompressionAlgorithm ZLib, ' +
595 <    'INDEX idsrcid x src_id);';
597 >    'data BLOB BlobCompressionMode 9 BlobBlockSize 1024 BlobCompressionAlgorithm ZLib);';
598    //    Query.SQL.Text:='CREATE TABLE rawmap  ( id AUTOINC PRIMARY KEY, src_id INTEGER, src_link_offset INTEGER, size INTEGER, data BLOB BlobCompressionAlgorithm None );';
599    Query.ExecSQL;
600 +  Query.SQL.Text := 'CREATE INDEX idsrcid ON rawmap (src_id);';
601 +  Query.ExecSQL;
602    Query.SQL.Text :=
603      'CREATE TABLE datfiles  ( id INTEGER PRIMARY KEY, extension CHAR(4), ' +
604      'name STRING(128), contenttype INTEGER, size INTEGER, ' +

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)