RedUNIT\Sqlite\Foreignkeys::testForeignKeysWithSQLite PHP Метод

    public function testForeignKeysWithSQLite()
    {
        $book = R::dispense('book');
        $page = R::dispense('page');
        $cover = R::dispense('cover');
        list($g1, $g2) = R::dispense('genre', 2);
        $g1->name = '1';
        $g2->name = '2';
        $book->ownPage = array($page);
        $book->cover = $cover;
        $book->sharedGenre = array($g1, $g2);
        R::store($book);
        $fkbook = R::getAll('pragma foreign_key_list(book)');
        $fkgenre = R::getAll('pragma foreign_key_list(book_genre)');
        $fkpage = R::getAll('pragma foreign_key_list(page)');
        asrt($fkpage[0]['from'], 'book_id');
        asrt($fkpage[0]['to'], 'id');
        asrt($fkpage[0]['table'], 'book');
        asrt(count($fkgenre), 2);
        if ($fkgenre[0]['from'] == 'book') {
            asrt($fkgenre[0]['to'], 'id');
            asrt($fkgenre[0]['table'], 'book');
        }
        if ($fkgenre[0]['from'] == 'genre') {
            asrt($fkgenre[0]['to'], 'id');
            asrt($fkgenre[0]['table'], 'genre');
        }
        asrt($fkbook[0]['from'], 'cover_id');
        asrt($fkbook[0]['to'], 'id');
        asrt($fkbook[0]['table'], 'cover');
    }