The R Project SVN R

Rev

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

Rev 46580 Rev 46629
Line 105... Line 105...
105 
}
 105 
}
106 
 
 106 
 
107 
void R_CheckUserInterrupt(void)
 107 
void R_CheckUserInterrupt(void)
108 
{
 108 
{
109 
    R_CheckStack();
 109 
    R_CheckStack();
- 
 
 110 
 
- 
 
 111 
    /* Don't do any processing of interrupts, timing limits, or other
- 
 
 112 
       asynchronous events if interrupts are suspended. */
- 
 
 113 
    if (R_interrupts_suspended)
- 
 
 114 
	return;
- 
 
 115 
 
110 
    /* This is the point where GUI systems need to do enough event
 116 
    /* This is the point where GUI systems need to do enough event
111 
       processing to determine whether there is a user interrupt event
 117 
       processing to determine whether there is a user interrupt event
112 
       pending.  Need to be careful not to do too much event
 118 
       pending.  Need to be careful not to do too much event
113 
       processing though: if event handlers written in R are allowed
 119 
       processing though: if event handlers written in R are allowed
114 
       to run at this point then we end up with concurrent R
 120 
       to run at this point then we end up with concurrent R