*** C linkage routines (Lattice version) for PPIPC Library
***     Pete Goodeve 1989 April 15

    INCLUDE 'IPClink.i'

        csect text


        XDEF  _LeaveIPCPort
_LeaveIPCPort:
        GETPARM 1,A0
        IPCVECT  LeaveIPCPort

        END