<> <> <<>> DIRECTORY CD, IntStorageDefs, IO, ReadCifUserCmd; DefaultUserCmdParser: CEDAR PROGRAM IMPORTS IO EXPORTS ReadCifUserCmd = BEGIN ParseUserCmd: PUBLIC PROC [userCmd: IntStorageDefs.UserCmd, cell: CD.Object, design: CD.Design, reportError: ReadCifUserCmd.ReportErrorProc] = BEGIN reportError[IO.PutFR["UserCmd %g not defined", IO.int[userCmd.command]], Warning]; END; END.