Paste: db bug

Author: Maxim Savchenko
Mode: factor
Date: Thu, 9 Apr 2009 15:16:27
Plain Text | 
TUPLE: example id data ;

example "EXAMPLE"
{
    { "id" "ID" +db-assigned-id+ }
    { "data" "DATA" BLOB }
} define-persistent

"example.db" <sqlite-db>
[
    example create-table
    example new B{ 1 2 3 4 5 } >>data
    select-tuple
] with-db

New Annotation

Summary:
Author:
Mode:
Body: