home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / MODULAV2GERMAN.DMS / in.adf / Def.zoo / Conversions.def < prev    next >
Encoding:
Modula Definition  |  1988-06-14  |  986 b   |  32 lines
  1. (* $N- *)
  2. DEFINITION MODULE Conversions; (* jr/17mai87 *)
  3.  
  4. PROCEDURE StrToVal(VAR s: ARRAY OF CHAR; VAR l: LONGINT; VAR signed: BOOLEAN;
  5.                    base: INTEGER; VAR err: BOOLEAN);
  6.  
  7. (* Converts a string 's' with base 'base' to value 'l'.
  8.    
  9.    Possible error conditions:
  10.    - illegal 'base'
  11.    - some characters in 's' are illegal digits to 'base'
  12.    - the resulting value is too large for a LONGINT
  13. *)
  14.  
  15.  
  16. PROCEDURE ValToStr(l: LONGINT; signed: BOOLEAN; VAR s: ARRAY OF CHAR;
  17.                    base, width: INTEGER; fillC: CHAR; VAR err: BOOLEAN);
  18.  
  19. (* Converts value 'l' with base 'base' to output string 's'. The value will
  20.    be positioned within a field of size 'width'.  If 'width' is larger than
  21.    the needed amount of characters to represent 'l', the field is filled up
  22.    with 'fillC'.
  23.      'width'>0: number is right adjusted
  24.      'width'<0: number is left adjusted
  25.    
  26.    Possible error conditions:
  27.     - illegal 'base'
  28.     - 's' is to small
  29. *)
  30.  
  31. END Conversions.def
  32.