The R Project SVN R-packages

Rev

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

Rev 3282 Rev 3284
Line 249... Line 249...
249 
    sprintf(g_sql_buf[2], "select level, label from %s order by level asc",
 249 
    sprintf(g_sql_buf[2], "select level, label from %s order by level asc",
250 
            table);
 250 
            table);
251 
    res = sqlite3_prepare(g_workspace, g_sql_buf[2], -1, &stmt, 0);
 251 
    res = sqlite3_prepare(g_workspace, g_sql_buf[2], -1, &stmt, 0);
252 
    _sqlite_error(res);
 252 
    _sqlite_error(res);
253 
    while (sqlite3_step(stmt) == SQLITE_ROW) {
253 
    while (sqlite3_step(stmt) == SQLITE_ROW) {
254 
        SET_STRING_ELT(levels, idx, mkChar(sqlite3_column_text(stmt, 1)));
 254 
        SET_STRING_ELT(levels, idx, mkChar((char *)sqlite3_column_text(stmt, 1)));
255 
        idx++;
 255 
        idx++;
256 
    }
 256 
    }
257 
    SET_LEVELS(var, levels);
 257 
    SET_LEVELS(var, levels);
258 
    UNPROTECT(1);
 258 
    UNPROTECT(1);
259 
}
 259 
}