Changeset 141 for oup


Ignore:
Timestamp:
Mar 30, 2007, 3:16:54 AM (18 years ago)
Author:
alloc
Message:
 
Location:
oup/current
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • oup/current/Helper/LevelDB.pas

    r140 r141  
    586586  Query.SQL.Text :=
    587587    '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);';
    590593  Query.ExecSQL;
    591594  Query.SQL.Text :=
    592595    'CREATE TABLE rawmap  ( id AUTOINC PRIMARY KEY, src_id INTEGER, ' +
    593596    'src_link_offset INTEGER, sep BOOLEAN, size INTEGER, ' +
    594     'data BLOB BlobCompressionMode 9 BlobBlockSize 1024 BlobCompressionAlgorithm ZLib, ' +
    595     'INDEX idsrcid x src_id);';
     597    'data BLOB BlobCompressionMode 9 BlobBlockSize 1024 BlobCompressionAlgorithm ZLib);';
    596598  //    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);';
    597601  Query.ExecSQL;
    598602  Query.SQL.Text :=
Note: See TracChangeset for help on using the changeset viewer.