;*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.;
;*****************************************************************************/
;STARTASM(),INT3(),LEAVEASM()
;void NP STARTASM(void),void NP INT3(void),void NP LEAVEASM(void)

EXTRN  _StrProc:near
PUBLIC _STRENTRY
PUBLIC INT3

_DATA segment  word public 'DATA'
_DATA ends

CONST segment  word  public   'CONST'
CONST ends

_BSS  segment  word  public   'BSS'
_BSS  ends

DGROUP   group CONST,_BSS,_DATA

_TEXT    segment word   public   'CODE'
assume CS:_TEXT,ds:DGROUP,es:NOTHING,ss:NOTHING
.286p

_STRENTRY proc  far
   int   3
   ;mov word ptr rp[0], bx
   ;mov word ptr rp[2], es
   push es
   push bx
   call _StrProc
   int   3
   pop   bx
   pop   es
;   add   sp,2
   mov   word ptr es:[bx+3],ax
   ret
_STRENTRY endp

INT3  proc  near
   int   3
   ret
INT3  endp

_TEXT ends
      end
