strings.def

一个Modula-2语言分析器

DEFINITION MODULE Strings;
(* Semi-standard Strings module as found on many MS-DOS implementations *)

PROCEDURE Length (s: ARRAY OF CHAR): CARDINAL;

PROCEDURE Assign (source: ARRAY OF CHAR; VAR dest: ARRAY OF CHAR);

PROCEDURE Insert (substr: ARRAY OF CHAR; VAR s: ARRAY OF CHAR; pos: CARDINAL);

PROCEDURE Delete (VAR s: ARRAY OF CHAR; pos, len: CARDINAL);

PROCEDURE Pos (substr: ARRAY OF CHAR; VAR s: ARRAY OF CHAR): CARDINAL;

PROCEDURE Copy (s: ARRAY OF CHAR; pos: CARDINAL; len: CARDINAL;
                VAR result: ARRAY OF CHAR);

PROCEDURE Concat (s1, s2: ARRAY OF CHAR; VAR result: ARRAY OF CHAR);

PROCEDURE CompareStr (s1, s2: ARRAY OF CHAR) : INTEGER;

END Strings.