
    <<EthernetOneHeadDLion.mesa>>
        <<Hal Murray, February 4, 1986 11:10:37 pm PST>>

    DIRECTORY
        EthernetOneFace USING [IOCB, Status];

    EthernetOneHeadDLion: CEDAR PROGRAM
        EXPORTS EthernetOneFace = {

    <<EXPORTed variables>>
        Handle: PUBLIC TYPE = LONG POINTER;
        nullHandle: PUBLIC Handle _ NIL;
        controlBlockSize: PUBLIC CARDINAL _ 0;
        hearSelf: PUBLIC BOOLEAN _ FALSE;

        BYTE: TYPE = [0..100H);
        IOCB: TYPE = EthernetOneFace.IOCB;
        Status: TYPE = EthernetOneFace.Status;

        GetNextDevice: PUBLIC PROC [Handle] RETURNS [Handle] = { RETURN[nullHandle]; };

        GetHostNumber: PUBLIC PROC [Handle] RETURNS [BYTE] = { ERROR; };

        AddCleanup: PUBLIC PROC [Handle] = { ERROR; };

        TurnOn: PUBLIC PROC [Handle, WORD, WORD] = { ERROR; };
        TurnOff: PUBLIC PROC [Handle] = { ERROR; };

        SetInputHosts: PUBLIC PROC [Handle, LONG POINTER] = { ERROR; };
        SetOutputDelay: PUBLIC PROC [Handle, CARDINAL] = { ERROR; };

        QueueOutput: PUBLIC PROC [Handle, LONG POINTER, NAT, IOCB] = { ERROR; };
        QueueInput: PUBLIC PROC [Handle, LONG POINTER, NAT, IOCB] = { ERROR; };

        MarkKilled: PUBLIC PROC [IOCB] = { ERROR; };
            <<>>
        GetStatusAndLength: PUBLIC PROC [IOCB] RETURNS [Status, NAT] = { ERROR; };
        GetStatusAndCollisions: PUBLIC PROC [IOCB] RETURNS [Status, NAT] = { ERROR; };

        GetPacketsMissed: PUBLIC PROC [Handle] RETURNS [CARDINAL] = { ERROR; };


    }....