The R Project SVN R

Rev

Rev 52864 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 52864 Rev 52865
Line 340... Line 340...
340 
Rboolean (Rf_isString)(SEXP s);
 340 
Rboolean (Rf_isString)(SEXP s);
341 
Rboolean (Rf_isObject)(SEXP s);
 341 
Rboolean (Rf_isObject)(SEXP s);
342 
 
 342 
 
343 
#endif /* USE_RINTERNALS */
 343 
#endif /* USE_RINTERNALS */
344 
 
 344 
 
- 
 
 345 
/* experimental argument type macros */
- 
 
 346 
#define SET_ARGTYPE(x, type) Rf_setAttrib(x, R_TypeSymbol, type)
- 
 
 347 
#define GET_ARGTYPE(x) Rf_getAttrib(x, R_TypeSymbol)
- 
 
 348
345 
/* Accessor functions.  Many are declared using () to avoid the macro
 349 
/* Accessor functions.  Many are declared using () to avoid the macro
346 
   definitions in the USE_RINTERNALS section.
 350 
   definitions in the USE_RINTERNALS section.
347 
   The function STRING_ELT is used as an argument to arrayAssign even
 351 
   The function STRING_ELT is used as an argument to arrayAssign even
348 
   if the macro version is in use.
 352 
   if the macro version is in use.
349 
*/
 353 
*/
Line 532... Line 536...
532 
LibExtern SEXP  R_QuoteSymbol;	    /* "quote" */
 536 
LibExtern SEXP  R_QuoteSymbol;	    /* "quote" */
533 
LibExtern SEXP	R_RowNamesSymbol;   /* "row.names" */
 537 
LibExtern SEXP	R_RowNamesSymbol;   /* "row.names" */
534 
LibExtern SEXP	R_SeedsSymbol;	    /* ".Random.seed" */
 538 
LibExtern SEXP	R_SeedsSymbol;	    /* ".Random.seed" */
535 
LibExtern SEXP	R_SourceSymbol;     /* "source" */
 539 
LibExtern SEXP	R_SourceSymbol;     /* "source" */
536 
LibExtern SEXP	R_TspSymbol;	    /* "tsp" */
 540 
LibExtern SEXP	R_TspSymbol;	    /* "tsp" */
- 
 
 541 
LibExtern SEXP	R_TypeSymbol;	    /* "type" */
537 
 
 542 
 
538 
/* Missing Values - others from Arith.h */
 543 
/* Missing Values - others from Arith.h */
539 
#define NA_STRING	R_NaString
 544 
#define NA_STRING	R_NaString
540 
LibExtern SEXP	R_NaString;	    /* NA_STRING as a CHARSXP */
 545 
LibExtern SEXP	R_NaString;	    /* NA_STRING as a CHARSXP */
541 
LibExtern SEXP	R_BlankString;	    /* "" as a CHARSXP */
 546 
LibExtern SEXP	R_BlankString;	    /* "" as a CHARSXP */