Initial revision
This commit is contained in:
20
lang/m2/libm2/Conversion.def
Normal file
20
lang/m2/libm2/Conversion.def
Normal file
@@ -0,0 +1,20 @@
|
||||
DEFINITION MODULE Conversions;
|
||||
|
||||
PROCEDURE ConvertOctal(num, len: CARDINAL; VAR str: ARRAY OF CHAR);
|
||||
(* Convert number "num" to right-justified octal representation of
|
||||
"len" positions, and put the result in "str".
|
||||
If the result does not fit in "str", it is truncated on the right.
|
||||
*)
|
||||
|
||||
PROCEDURE ConvertHex(num, len: CARDINAL; VAR str: ARRAY OF CHAR);
|
||||
(* Convert a hexadecimal number to a string *)
|
||||
|
||||
PROCEDURE ConvertCardinal(num, len: CARDINAL; VAR str: ARRAY OF CHAR);
|
||||
(* Convert a cardinal number to a string *)
|
||||
|
||||
PROCEDURE ConvertInteger(num: INTEGER;
|
||||
len: CARDINAL;
|
||||
VAR str: ARRAY OF CHAR);
|
||||
(* Convert an integer number to a string *)
|
||||
|
||||
END Conversions.
|
||||
Reference in New Issue
Block a user