The R Project SVN R

Rev

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

Rev 15903 Rev 15912
Line 710... Line 710...
710
 
710
 
711
/* standardGeneric:  uses a pointer to R_standardGeneric, to be
711
/* standardGeneric:  uses a pointer to R_standardGeneric, to be
712
   initialized when the methods package is attached.  When and if the
712
   initialized when the methods package is attached.  When and if the
713
   methods code is automatically included, the pointer will not be
713
   methods code is automatically included, the pointer will not be
714
   needed 
714
   needed 
715
*/
-
 
716
R_stdGen_ptr_t R_standardGeneric_ptr = 0;
-
 
717
 
715
 
-
 
716
in Defn.h now:
-
 
717
R_stdGen_ptr_t R_standardGeneric_ptr = 0;
-
 
718
*/
718
 
719
 
719
SEXP do_standardGeneric(SEXP call, SEXP op, SEXP args, SEXP env)
720
SEXP do_standardGeneric(SEXP call, SEXP op, SEXP args, SEXP env)
720
{
721
{
721
  SEXP arg, value;
722
  SEXP arg, value;
722
  if(!R_standardGeneric_ptr)
723
  if(!R_standardGeneric_ptr)