The R Project SVN R

Rev

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

Rev 32151 Rev 32205
Line 140... Line 140...
140 
    Rboolean canGenMouseMove; /* can the device generate mousemove events */
 140 
    Rboolean canGenMouseMove; /* can the device generate mousemove events */
141 
    Rboolean canGenMouseUp;   /* can the device generate mouseup events */
 141 
    Rboolean canGenMouseUp;   /* can the device generate mouseup events */
142 
    Rboolean canGenKeybd;     /* can the device generate keyboard events */
 142 
    Rboolean canGenKeybd;     /* can the device generate keyboard events */
143
143
144 
    Rboolean gettingEvent;    /* This is set while getGraphicsEvent is actively looking for events */
 144 
    Rboolean gettingEvent;    /* This is set while getGraphicsEvent is actively looking for events */
145 
    SEXP eventRho;	      /* This is the environment of getGraphicsEvent in which to evaluate the handlers */
 - 
 
146 
    SEXP eventResult;	      /* The result of the last event handler is stored here, unprotected */
 - 
 
147
- 
 
148 
    /* These are the event handlers */
 - 
 
149
- 
 
150 
    SEXP mouseDownHandler;
 - 
 
151 
    SEXP mouseMoveHandler;
 - 
 
152 
    SEXP mouseUpHandler;
 - 
 
153 
    SEXP keybdHandler;
 - 
 
154
145
155 
    /********************************************************
 146 
    /********************************************************
156 
     * Device procedures.
 147 
     * Device procedures.
157 
     ********************************************************/
 148 
     ********************************************************/
158 
 
 149 
 
Line 450... Line 441...
450 
     * graphics event.  It should call R_ProcessEvents() until one
 441 
     * graphics event.  It should call R_ProcessEvents() until one
451 
     * of the event handlers sets eventResult to a non-null value,
 442 
     * of the event handlers sets eventResult to a non-null value,
452 
     * and then return it
 443 
     * and then return it
453 
     * An example is ...
 444 
     * An example is ...
454 
     *
 445 
     *
455 
     * static SEXP GA_getEvent(char *prompt);
 446 
     * static SEXP GA_getEvent(SEXP eventRho, char *prompt);
456 
     */
 447 
     */
457 
    SEXP (*getEvent)();
 448 
    SEXP (*getEvent)();
458
449
459 
} NewDevDesc;
 450 
} NewDevDesc;
460 
 
 451