home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / m2 / CycloneModules.lha / modules / txt / String.def < prev    next >
Text File  |  1996-10-26  |  784b  |  23 lines
  1. DEFINITION MODULE String;
  2.  
  3. (* (C) Copyright 1994 Marcel Timmermans. All rights reserved. *)
  4.  
  5. CONST
  6.  NoOccur = -1;
  7.  
  8.  
  9.  PROCEDURE Length(s:ARRAY OF CHAR):INTEGER;
  10.  PROCEDURE Compare(a,b:ARRAY OF CHAR ):INTEGER;
  11.  PROCEDURE Copy(VAR dest:ARRAY OF CHAR; src:ARRAY OF CHAR);
  12.  PROCEDURE Delete(VAR s:ARRAY OF CHAR; start,len : INTEGER);
  13.  PROCEDURE Concat(VAR s1:ARRAY OF CHAR; s2:ARRAY OF CHAR);
  14.  PROCEDURE Occurs(VAR s:ARRAY OF CHAR; subs:ARRAY OF CHAR):INTEGER;
  15.  PROCEDURE Insert(VAR s:ARRAY OF CHAR; at:INTEGER; str:ARRAY OF CHAR);
  16.  PROCEDURE AppendChar(VAR String:ARRAY OF CHAR;Char:CHAR);
  17.  PROCEDURE CapIntl(VAR Char:CHAR);
  18.  PROCEDURE Upper(VAR s:ARRAY OF CHAR);
  19.  PROCEDURE UpperIntl(VAR s:ARRAY OF CHAR);
  20.  PROCEDURE FindChar(s:ARRAY OF CHAR;ch:CHAR;Start:INTEGER):INTEGER;
  21.  
  22. END String.
  23.