| 12345678910111213141516171819202122232425262728293031323334 |
- (* Release 3.10 *)
- (*-------------------------------------------------------------------------*
- * *
- * PRINTFBA.DEF - COMMS Toolkit formatted i/o support *
- * *
- * COPYRIGHT (C) 1988..1992 Clarion Software Corporation. *
- * All Rights Reserved *
- * *
- *--------------------------------------------------------------------------*)
- DEFINITION MODULE PrintFBase;
- VAR
- Data : ADDRESS; (* A ptr to the value to be converted *)
- RightJustify, (* right justify if FieldWidth > 0, default FALSE *)
- AlwaysSigned : BOOLEAN; (* always output a sign, even when positive *)
- DataSize, (* the size in bytes of the data pointed to by Data *)
- FieldWidth, (* the requested total width of a field to be output *)
- Places : CARDINAL; (* the requested number of decimal places *)
- PadChar, (* the char to use for padding *)
- TypeChar, (* the type character used in the field specification *)
- Positive : CHAR; (* the character to use as the sign when positive, eg *)
- (* usually '+' or ' '. This char is not used when *)
- (* AlwaysSigned=FALSE *)
- DestString : ARRAY[0..255] OF CHAR;
- (* the result of all conversions should be placed in *)
- (* this string. *)
- PROCEDURE DoPrintF(VAR pat:ARRAY OF CHAR;VAR arg1,arg2,arg3,arg4,arg5:ARRAY OF BYTE;VAR dest:ARRAY OF CHAR;NumArgs:CARDINAL);
- PROCEDURE NewConversion(TypeChar:CHAR; ConvertRoutine:PROC);
- END PrintFBase.
|
