DEFINITION MODULE Compile;

EXPORT QUALIFIED
   expression;
   
TYPE
   STRptr = POINTER TO ARRAY [0..255] OF CHAR;
   
PROCEDURE expression (Polygons :ARRAY OF CHAR) :STRptr;

END Compile.
