Return to spl.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / d / ether

Annotation of cci/d/ether/spl.c, revision 1.1

1.1     ! root        1: /*     spl.c   Tahoe version Feb. 1983         */
        !             2: #include "mtpr.h"
        !             3: 
        !             4: short  spl8()
        !             5: {
        !             6:        register short oldipl;
        !             7: 
        !             8:        oldipl = mfpr(IPL);
        !             9:        mtpr(0x18);
        !            10:        return (oldipl);
        !            11: }
        !            12: 
        !            13: splx(oldipl)
        !            14: short oldipl;
        !            15: {
        !            16:        mtpr(oldipl);
        !            17: }
        !            18: 
        !            19: mtpr(value)
        !            20: {
        !            21:        asm("mtpr 4(fp), $0x8");
        !            22: }
        !            23: 
        !            24: mfpr(regno)
        !            25: {
        !            26:        asm("mfpr 4(fp), r0");
        !            27: }

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