The R Project SVN R-packages

Rev

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

Rev 3473 Rev 3684
Line 81... Line 81...
81
 
81
 
82
 
82
 
83
/* workspace utilities */
83
/* workspace utilities */
84
int _prepare_attach2();  /* prepare workspace before attaching a sqlite db */
84
int _prepare_attach2();  /* prepare workspace before attaching a sqlite db */
85
 
85
 
-
 
86
/* sqlite vector utilities */
-
 
87
SEXP _create_svector_sexp(const char *iname, const char *tblname, const char *varname, const char *type);
-
 
88
 
86
/* misc utilities */
89
/* misc utilities */
87
char *_r2iname(char *internal_name, char *filename);
90
char *_r2iname(char *internal_name, char *filename);
88
char *_fixname(char *rname);
91
char *_fixname(char *rname);
89
char *_str_tolower(char *out, const char *ref);
92
char *_str_tolower(char *out, const char *ref);
90
 
93
 
Line 105... Line 108...
105
/* R object accessors shortcuts */
108
/* R object accessors shortcuts */
106
#define CHAR_ELT(str, i) CHAR(STRING_ELT(str,i))
109
#define CHAR_ELT(str, i) CHAR(STRING_ELT(str,i))
107
 
110
 
108
/* SDF object accessors shortcuts */
111
/* SDF object accessors shortcuts */
109
#define SDF_INAME(sdf) CHAR(STRING_ELT(_getListElement(sdf, "iname"),0))
112
#define SDF_INAME(sdf) CHAR(STRING_ELT(_getListElement(sdf, "iname"),0))
-
 
113
#define SVEC_TBLNAME(sdf) CHAR(STRING_ELT(_getListElement(sdf, "tblname"),0))
110
#define SVEC_VARNAME(sdf) CHAR(STRING_ELT(_getListElement(sdf, "varname"),0))
114
#define SVEC_VARNAME(sdf) CHAR(STRING_ELT(_getListElement(sdf, "varname"),0))
111
 
115
 
112
/* possible var types when stored in sqlite as integer */
116
/* possible var types when stored in sqlite as integer */
113
#define VAR_INTEGER 0
117
#define VAR_INTEGER 0
114
#define VAR_FACTOR  1
118
#define VAR_FACTOR  1