<<--File: IPImpl.mesa>> <> DIRECTORY Rope USING [ROPE], IP; <<--Currently just to implement Error procedure. May get more complicated later>> IPImpl: CEDAR PROGRAM EXPORTS IP = BEGIN OPEN IP; Error: PUBLIC ERROR [ec: ErrorCode _ programmingError, explanation: Rope.ROPE _ NIL] = CODE; END.