The R Project SVN R-packages

Rev

Rev 3397 | Rev 3684 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3397 Rev 3419
Line 47... Line 47...
47 
    res = _sqlite_exec(g_sql_buf[0]);
 47 
    res = _sqlite_exec(g_sql_buf[0]);
48 
    if (_sqlite_error(res)) return R_NilValue;
 48 
    if (_sqlite_error(res)) return R_NilValue;
49 
 
 49 
 
50
50
51 
    /* create the sdf where the data will be imported to */
 51 
    /* create the sdf where the data will be imported to */
52 
    iname = _create_sdf_skeleton1(_sdfiname, NULL);
 52 
    iname = _create_sdf_skeleton1(_sdfiname, NULL, FALSE);
53 
    if (iname == NULL) goto sdf_import_sqlite_table__out;
 53 
    if (iname == NULL) goto sdf_import_sqlite_table__out;
54 
 
 54 
 
55 
    iname_len = strlen(iname);  /* needed for buf resizing below */
 55 
    iname_len = strlen(iname);  /* needed for buf resizing below */
56 
    tblname_len = strlen(tblname);
 56 
    tblname_len = strlen(tblname);
57 
 
 57