The R Project SVN R

Rev

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

Rev 83755 Rev 84952
Line 33... Line 33...
33 
 
 33 
 
34 
/* one way to allow user interrupts: called in ProcessEvents */
 34 
/* one way to allow user interrupts: called in ProcessEvents */
35 
extern int UserBreak;
 35 
extern int UserBreak;
36 
 
 36 
 
37 
/* calls into the R DLL */
 37 
/* calls into the R DLL */
38 
extern char *getDLLVersion(), *getRUser(), *get_R_HOME();
 38 
extern char *getDLLVersion(void), *getRUser(void), *get_R_HOME(void);
39 
extern void freeRUser(char *), free_R_HOME(char *);
 39 
extern void freeRUser(char *), free_R_HOME(char *);
40 
extern void R_SetParams(Rstart), R_setStartTime();
 40 
extern void R_SetParams(Rstart), R_setStartTime(void);
41 
extern void ProcessEvents(void);
 41 
extern void ProcessEvents(void);
42 
extern int R_DefParamsEx(Rstart, int), R_ReplDLLdo1();
 42 
extern int R_DefParamsEx(Rstart, int), R_ReplDLLdo1(void);
43 
 
 43 
 
44 
 
 44 
 
45 
/* simple input, simple output */
 45 
/* simple input, simple output */
46 
 
 46 
 
47 
/* This version blocks all events: a real one needs to call ProcessEvents
 47 
/* This version blocks all events: a real one needs to call ProcessEvents
Line 60... Line 60...
60 
static void myWriteConsole(const char *buf, int len)
 60 
static void myWriteConsole(const char *buf, int len)
61 
{
 61 
{
62 
    printf("%s", buf);
 62 
    printf("%s", buf);
63 
}
 63 
}
64 
 
 64 
 
65 
static void myCallBack()
 65 
static void myCallBack(void)
66 
{
 66 
{
67 
    /* called during i/o, eval, graphics in ProcessEvents */
 67 
    /* called during i/o, eval, graphics in ProcessEvents */
68 
}
 68 
}
69 
 
 69 
 
70 
static void myBusy(int which)
 70 
static void myBusy(int which)