DEFINITION MODULE LongStr;
(* LONGREAL/string conversion wrapper *)
IMPORT
ConvTypes, RealStr;
TYPE
ConvResults = ConvTypes.ConvResults;
(* strAllRight, strOutOfRange, strWrongFormat, strEmpty *)
(*
* the string form of a signed fixed-point real number is
* ["+" | "-"], decimal digit, {decimal digit}, [".", {decimal digit}]
*)
(*
* the string form of a signed floating-point real number is
* signed fixed-point real number, "E", ["+" | "-"], decimal digit, {decimal digit}
*)
(****************************************************************)
(* *)
(* GPM defines LONGREAL as a type alias of REAL so no *)
(* seperate implementation is required. *)
(* LongStr is implemented by RealStr *)
(* *)
(****************************************************************)
CONST
StrToReal = RealStr.StrToReal;
RealToFloat = RealStr.RealToFloat;
RealToEng = RealStr.RealToEng;
RealToFixed = RealStr.RealToFixed;
RealToStr = RealStr.RealToStr;
END LongStr.