Annotation of cci/sys/tahoe/spl.c, revision 1.1.1.1

1.1       root        1: /*     spl.c   Tahoe version Feb. 1983         */
                      2: #include "../machine/mtpr.h"
                      3: 
                      4: int    spl0()
                      5: {
                      6:        register int oldipl;
                      7: 
                      8:        oldipl = mfpr(IPL);
                      9:        mtpr(0, IPL);
                     10:        return (oldipl);
                     11: }
                     12: 
                     13: int    spl1()
                     14: {
                     15:        register int oldipl;
                     16: 
                     17:        oldipl = mfpr(IPL);
                     18:        mtpr(0x10+1, IPL);
                     19:        return (oldipl);
                     20: }
                     21: 
                     22: int    spl2()
                     23: {
                     24:        register int oldipl;
                     25: 
                     26:        oldipl = mfpr(IPL);
                     27:        mtpr(0x10+2, IPL);
                     28:        return (oldipl);
                     29: }
                     30: 
                     31: int    spl3()
                     32: {
                     33:        register int oldipl;
                     34: 
                     35:        oldipl = mfpr(IPL);
                     36:        mtpr(0x10+3, IPL);
                     37:        return (oldipl);
                     38: }
                     39: 
                     40: int    spl4()
                     41: {
                     42:        register int oldipl;
                     43: 
                     44:        oldipl = mfpr(IPL);
                     45:        mtpr(0x10+4, IPL);
                     46:        return (oldipl);
                     47: }
                     48: 
                     49: int    spl5()
                     50: {
                     51:        register int oldipl;
                     52: 
                     53:        oldipl = mfpr(IPL);
                     54:        mtpr(0x10+5, IPL);
                     55:        return (oldipl);
                     56: }
                     57: 
                     58: int    spl6()
                     59: {
                     60:        register int oldipl;
                     61: 
                     62:        oldipl = mfpr(IPL);
                     63:        mtpr(0x10+6, IPL);
                     64:        return (oldipl);
                     65: }
                     66: 
                     67: int    spl7()
                     68: {
                     69:        register int oldipl;
                     70: 
                     71:        oldipl = mfpr(IPL);
                     72:        mtpr(0x10+7, IPL);
                     73:        return (oldipl);
                     74: }
                     75: 
                     76: int    spl8()
                     77: {
                     78:        register int oldipl;
                     79: 
                     80:        oldipl = mfpr(IPL);
                     81:        mtpr(0x10+8, IPL);
                     82:        return (oldipl);
                     83: }
                     84: 
                     85: int    splimp()
                     86: {
                     87:        register int oldipl;
                     88: 
                     89:        oldipl = mfpr(IPL);
                     90:        mtpr(0x10+8, IPL);
                     91:        return (oldipl);
                     92: }
                     93: 
                     94: int    splnet()
                     95: {
                     96:        register int oldipl;
                     97: 
                     98:        oldipl = mfpr(IPL);
                     99:        mtpr(0xC, IPL);
                    100:        return (oldipl);
                    101: }
                    102: 
                    103: splx(oldipl)
                    104: int oldipl;
                    105: {
                    106:        mtpr(oldipl, IPL);
                    107: }

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.