The R Project SVN R

/* Declarations of device  and UI pointers */

#ifdef __SYSTEM__
#define extern
#endif

extern int  (*ptr_X11DeviceDriver)(DevDesc*, char*, double, double, double, double,
                   int, int);
extern SEXP (*ptr_dataentry)(SEXP call, SEXP op, SEXP args, SEXP rho);

extern int (*ptr_GnomeDeviceDriver)(DevDesc*, char*, double, double, double);

extern int (*ptr_GTKDeviceDriver)(DevDesc*, char*, double, double, double);

extern void (*ptr_R_Suicide)(char *);
extern void (*ptr_R_ShowMessage)();
extern int  (*ptr_R_ReadConsole)(char *, unsigned char *, int, int);
extern void (*ptr_R_WriteConsole)(char *, int);
extern void (*ptr_R_ResetConsole)();
extern void (*ptr_R_FlushConsole)();
extern void (*ptr_R_ClearerrConsole)();
extern void (*ptr_R_Busy)(int);
extern void (*ptr_R_CleanUp)(int, int, int);
extern int  (*ptr_R_ShowFiles)(int, char **, char **, char *, int, char *);
extern int  (*ptr_R_ChooseFile)(int, char *, int);

#if HAVE_TCLTK
extern int (*tcltk_ReadConsole)();
extern void (*tcltk_init)();
extern char * (*tk_eval)(char *);

#include "R_ext/eventloop.h" /* needed for defn of InputHandler etc */

InputHandler *(*ptr_R_addInputHandler)(InputHandler *, int, 
                                      InputHandlerProc, int);

int (*ptr_R_removeInputHandler)(InputHandler **, InputHandler *);

InputHandler *(*ptr_R_getInputHandler)(InputHandler *, int);

#endif

#ifdef __SYSTEM__
#undef extern
#endif


int stub_X11DeviceDriver(DevDesc*, char*, double, double, double, double, 
             int, int);
int stub_GnomeDeviceDriver(DevDesc*, char*, double, double, double);

int stub_GTKDeviceDriver(DevDesc*, char*, double, double, double);

SEXP stub_dataentry(SEXP call, SEXP op, SEXP args, SEXP rho);