|
|
1.1 ! root 1: / $Header: /kernel/kersrc/ldrv/RCS/spl.s,v 1.1 92/07/17 15:28:09 bin Exp Locker: bin $ ! 2: / ! 3: / The information contained herein is a trade secret of INETCO ! 4: / Systems, and is confidential information. It is provided under ! 5: / a license agreement, and may be copied or disclosed only under ! 6: / the terms of that agreement. Any reproduction or disclosure of ! 7: / this material without the express written authorization of ! 8: / INETCO Systems or persuant to the license agreement is unlawful. ! 9: / ! 10: / Copyright (c) 1988 ! 11: / An unpublished work by INETCO Systems, Ltd. ! 12: / All rights reserved. ! 13: / ! 14: / $Log: spl.s,v $ ! 15: / Revision 1.1 92/07/17 15:28:09 bin ! 16: / Initial revision ! 17: / ! 18: / Revision 1.1 88/03/24 16:31:16 src ! 19: / Initial revision ! 20: / ! 21: / ! 22: //////// ! 23: ! 24: //////// ! 25: / ! 26: / Change interrupt flag. Previous value is returned. ! 27: / ! 28: //////// ! 29: .globl spl_ ! 30: ! 31: spl_: ! 32: pop ax / ip ! 33: pop bx / psw ! 34: push bx ! 35: push bx / push psw, cs, ip for iret ! 36: push cs ! 37: push ax ! 38: pushf / old psw ! 39: pop ax ! 40: iret
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.