From 92d54db84f792a70054ac43c65ccf613397ed30d Mon Sep 17 00:00:00 2001 From: Doug Coleman <doug.coleman@gmail.com> Date: Mon, 21 Apr 2008 17:02:12 -0500 Subject: [PATCH] add primary key to modifiers slot in sqlite table --- extra/db/sqlite/sqlite.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/extra/db/sqlite/sqlite.factor b/extra/db/sqlite/sqlite.factor index 2175b69f35..9ec8892add 100755 --- a/extra/db/sqlite/sqlite.factor +++ b/extra/db/sqlite/sqlite.factor @@ -163,9 +163,9 @@ M: sqlite-db bind% ( spec -- ) M: sqlite-db persistent-table ( -- assoc ) H{ - { +native-id+ { "integer primary key" "integer primary key" f } } + { +native-id+ { "integer primary key" "integer primary key" "primary key" } } { +assigned-id+ { f f "primary key" } } - { +random-id+ { "integer primary key" "integer primary key" f } } + { +random-id+ { "integer primary key" "integer primary key" "primary key" } } { INTEGER { "integer" "integer" "primary key" } } { BIG-INTEGER { "bigint" "bigint" } } { SIGNED-BIG-INTEGER { "bigint" "bigint" } }