[Bug modula2/119650] New: WriteString for String

[gaius at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=119650

            Bug ID: 119650
           Summary: WriteString for String
           Product: gcc
           Version: 15.0
            Status: UNCONFIRMED
          Severity: enhancement
          Priority: P3
         Component: modula2
          Assignee: gaius at gcc dot gnu.org
          Reporter: gaius at gcc dot gnu.org
  Target Milestone: ---

Forwarded from the mailing list.

It would be useful to have WriteString (s: String) somewhere in the standard
libraries.
Ie:

(* Like Terminal.WriteString, except that it takes a String, not an ARRAY OF 
CHAR. *)

PROCEDURE WriteString (s: String);
VAR
   l, i: CARDINAL;
BEGIN
   l := Length(s);
   i := 0;
   WHILE i < l DO
      Write(char(s, i));
      INC (i);
   END;
END WriteString;