[Indigo]<Chipndale>5.2>Alps20>AlpsPWGen.mesa!2

AlpsPWGen.mesa

Created by Bertrand Serlet, March 12, 1985 2:22:02 pm PST

Last edited by Bertrand Serlet, July 1, 1985 10:51:25 pm PDT

This program generates a file suitable for layout generation from a truth table.

DIRECTORY

AlpsTile, CD, Rope;

AlpsPWGen: CEDAR DEFINITIONS =

BEGIN

ROPE: TYPE = Rope.ROPE;

CellFromTile: PROC [context: AlpsTile.Context, tile: AlpsTile.Tile] RETURNS [cell: CD.ObPtr];

CellsFromTiles: PROC [context: AlpsTile.Context, tiles: LIST OF AlpsTile.Tile] RETURNS [cells: LIST OF CD.ObPtr ← NIL];

This one is the only one clients have to know

TableToLayout: PROC [context: AlpsTile.Context] RETURNS [cell: CD.ObPtr];

END.