|
|
1.1 ! root 1: / $Header: /kernel/kersrc/ldrv/RCS/getcs.s,v 1.1 92/07/17 15:27:51 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) 1986 ! 11: / An unpublished work by INETCO Systems, Ltd. ! 12: / All rights reserved. ! 13: / ! 14: / $Log: getcs.s,v $ ! 15: / Revision 1.1 92/07/17 15:27:51 bin ! 16: / Initial revision ! 17: / ! 18: / Revision 1.1 88/03/24 16:30:36 src ! 19: / Initial revision ! 20: / ! 21: / 87/12/08 Allan Cornish /usr/src/sys/ldrv/getcs.s ! 22: / Getcs() function obtains current code segment. ! 23: / ! 24: //////// ! 25: ! 26: //////// ! 27: / ! 28: / Get code selector. ! 29: / ! 30: //////// ! 31: ! 32: .globl getcs_ ! 33: ! 34: getcs_: mov ax, cs / Return code selector. ! 35: ret
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.