DEFINITION MODULE M2FM;
(*$ LargeVars:=FALSE NameChk:=FALSE LongAlign:=FALSE *)
FROM M2DM IMPORT
 StrPtr,Standard,Register,Condition,ObjPtr;
FROM M2SM IMPORT
 Symbol;
FROM M2XM IMPORT
 Item;


PROCEDURE InitM2FM;
PROCEDURE GenMathInits;
PROCEDURE FixMathInits;
PROCEDURE FPreProcess(VAR op:Symbol; VAR x,y:Item);

PROCEDURE FShort1(VAR x:Item);
PROCEDURE FLong1(VAR x:Item);

PROCEDURE FFix1(VAR x:Item);
PROCEDURE FFlt1(VAR x:Item; astyp:StrPtr);

PROCEDURE FAbs1(VAR x:Item);
PROCEDURE FNeg1(VAR x:Item);

PROCEDURE FCmp2(VAR x,y:Item; c:Condition);
PROCEDURE FAdd2(VAR x,y:Item);
PROCEDURE FSub2(VAR x,y:Item);
PROCEDURE FMul2(VAR x,y:Item);
PROCEDURE FDiv2(VAR x,y:Item);

PROCEDURE FFpu1(VAR x:Item; func:Standard);

END M2FM.
