DIRECTORY CD USING [DesignNumber, ObPtr, Layer, combined]; CMosContacts: CEDAR DEFINITIONS = BEGIN ContactType: TYPE = {burr, mDif, difShort, butt, mPol, mm2}; ContactPtr: TYPE = REF ContactRec; ContactRec: TYPE = RECORD [ typ: ContactType, wExt: CD.DesignNumber _ 0, lExt: CD.DesignNumber _ 0 ]; undef: PRIVATE CD.Layer=CD.combined; --used to specify diffusion as default CreatePolyCon: PROC [l: CD.DesignNumber] RETURNS [CD.ObPtr]; CreateDifCon: PROC [l: CD.DesignNumber, difLev: CD.Layer_undef] RETURNS [CD.ObPtr]; CreateDifShortCon: PROC [difLev: CD.Layer_undef] RETURNS [CD.ObPtr]; CreateButCon: PROC [difLev: CD.Layer_undef] RETURNS [CD.ObPtr]; CreateBurCon: PROC [w, l: CD.DesignNumber, wex: CD.DesignNumber_0, lex: CD.DesignNumber_0, difLev: CD.Layer_undef] RETURNS [CD.ObPtr]; CreateMmCon: PROC [l: CD.DesignNumber, wex: CD.DesignNumber_0, lex: CD.DesignNumber_0] RETURNS [CD.ObPtr]; END. ~CMosContacts.mesa (part of ChipNDale) Copyright c 1983 by Xerox Corporation. All rights reserved. by Christian Jacobi May 3, 1983 11:22 am last edited by Christian Jacobi September 22, 1983 5:31 pm --burr, mDif, butt contacts can be characterized by the layer of their diffusion --(ndif, pdif, nwelCont, pwelCont) --difShort contacts can also be characterized by the layer of their diffusion, --but only (ndif, pdif) are allowed --All create procedures may (or may not) create references to --the same object. Therefore consider the contact objects as --readonly. If a contact needs to be modified create a new one! Êô˜Jšœ,™,˜Jšœ Ïmœ1™™>Jšœ@™@J˜Jšžœ˜J˜—…—