Paste: test

Author: slava
Mode: factor
Date: Sat, 28 Feb 2009 07:09:44
Plain Text | 
TUPLE: testing foo ;

testing "TESTING" {
    { "foo" "FOO" TEXT }
} define-persistent

"xxx.db" <sqlite-db> [
    testing new
    "レイプレイ in 人工少女３～その１" >>foo
    insert-tuple

    testing new
    select-tuples .
] with-db

New Annotation

Summary:
Author:
Mode:
Body: