--file JaMTypeChkDefs.mesa
--Written by John Warnock, January, 1978.
--Last changed by Doug Wyatt, March 29, 1980  1:46 PM

DIRECTORY
	JaMMasterDefs: FROM "JaMMasterDefs" USING [Object];

JaMTypeChkDefs: DEFINITIONS =
BEGIN OPEN JaMMasterDefs;

JaMTypeChk: PROGRAM;

DescIntegerType: PROCEDURE [ob:Object] 
		RETURNS [iob:IntegerType Object];

DescLongIntegerType: PROCEDURE [ob:Object] 
		RETURNS [iob:LongIntegerType Object];

DescRealType: PROCEDURE [ob:Object] 
		RETURNS [iob:RealType Object];

DescBooleanType: PROCEDURE [ob:Object] 
		RETURNS [iob:BooleanType Object];

DescStringType: PROCEDURE [ob:Object] 
		RETURNS [iob:StringType Object];

DescStreamType: PROCEDURE [ob:Object] 
		RETURNS [iob:StreamType Object];

DescCommandType: PROCEDURE [ob:Object] 
		RETURNS [iob:CommandType Object];

DescDictType: PROCEDURE [ob:Object] 
		RETURNS [iob:DictType Object];

DescArrayType: PROCEDURE [ob:Object] 
		RETURNS [iob:ArrayType Object];

DescStackType: PROCEDURE [ob:Object] 
		RETURNS [iob:StackType Object];

DescFrameType: PROCEDURE [ob:Object] 
		RETURNS [iob:FrameType Object];

DescUserType: PROCEDURE [ob:Object] 
		RETURNS [iob:UserType Object];

END.

DKW  March 27, 1980  6:22 PM
	added JaMTypeChk: PROGRAM;
(600)\245b10B12b15B62b19B66b12B59b15B62b14B61b14B61b15B62b12B59b13B60b13B60b13B60b12B