Release 4.1

[unix-history] / usr / src / usr.bin / tn3270 / distribution / sys_dos / support.asm

diff --git a/usr/src/usr.bin/tn3270/distribution/sys_dos/support.asm b/usr/src/usr.bin/tn3270/distribution/sys_dos/support.asm
index 39bea1d..eca2947 100644 (file)
--- a/usr/src/usr.bin/tn3270/distribution/sys_dos/support.asm
+++ b/usr/src/usr.bin/tn3270/distribution/sys_dos/support.asm
@@ -1,5 +1,21 @@
-; $Header: /lapis_d/minshall/src/misc/minshall/src/netsys/RCS/support.asm,v 1.5 87/01/14 11:29:19 minshall Exp $
-
+;
+; Copyright (c) 1988 Regents of the University of California.
+; All rights reserved.
+;
+; Redistribution and use in source and binary forms are permitted
+; provided that the above copyright notice and this paragraph are
+; duplicated in all such forms and that any documentation,
+; advertising materials, and other materials related to such
+; distribution and use acknowledge that the software was developed
+; by the University of California, Berkeley.  The name of the
+; University may not be used to endorse or promote products derived
+; from this software without specific prior written permission.
+; THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+; IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+; WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+;
+;      @(#)support.asm 4.1 (Berkeley) %G%
+;

 
 _TEXT  segment byte public 'CODE'
 _TEXT  ends
 
 _TEXT  segment byte public 'CODE'
 _TEXT  ends


@@ -18,26 +34,11 @@ DGROUP      group   CONST, _BSS, _DATA
        assume  cs:_TEXT, ds:DGROUP, ss:DGROUP, es:DGROUP
 
 _TEXT  segment
        assume  cs:_TEXT, ds:DGROUP, ss:DGROUP, es:DGROUP
 
 _TEXT  segment

+       public  _iret_subr

 
 

-       public  dirconio
-
-dirconio       proc    near
-       push    bp
-       mov     bp,sp
-
-       mov     ah,01H          ; test input
-       int     16H
-       mov     ax,0ffffH       ; nothing read
-       jz      dirconiodone
-       mov     ah,00H          ; consume the input
-       int     16H
-
-dirconiodone:
-
-       mov     sp,bp
-       pop     bp
-       ret
-dirconio       endp
+_iret_subr     proc    far
+       iret
+_iret_subr     endp

 
 _TEXT  ends
 
 
 _TEXT  ends