;*DDK*************************************************************************/
;
; COPYRIGHT    Copyright (C) 1995 IBM Corporation
;
;    The following IBM OS/2 WARP source code is provided to you solely for
;    the purpose of assisting you in your development of OS/2 WARP device
;    drivers. You may use this code in accordance with the IBM License
;    Agreement provided in the IBM Device Driver Source Kit for OS/2. This
;    Copyright statement may not be removed.;
;*****************************************************************************/
.386p
;**********************************************************************/
;* Routines to enable and disable interrupts.                         */
;**********************************************************************/

INCL_GPIBITMAPS EQU     1
include os2.inc
include eddinclt.inc


_CURSOR         segment dword use32 public 'CODE'                       ;**
;**********************************************************************/
;* Trivial routine to allow the C cursor routine (DeviceSetCursor)    */
;* to disable interrupts for critical sections                        */
;**********************************************************************/

public                  _eddm_Interrupts_Off
                        assume    cs:_CURSOR, ds: nothing, es: nothing
_eddm_Interrupts_Off    proc                                            ;**
%out Warning: We cant do IO for the moment, so Interrupts_Off is a dummy routine
;                       cli
                        ret
_eddm_Interrupts_Off    endp


;**********************************************************************/
;* Trivial routine to allow the C cursor routine (DeviceSetCursor)    */
;* to enable interrupts after critical sections                       */
;**********************************************************************/

public                  _eddm_Interrupts_On
                        assume    cs:_CURSOR, ds: nothing, es: nothing
_eddm_Interrupts_On     proc                                            ;**
%out Warning: We cant do IO for the moment, so Interrupts_On is a dummy routine
;                       sti
                        ret
_eddm_Interrupts_On     endp


_CURSOR ends                                                            ;**

END
