]> git.ipfire.org Git - thirdparty/gcc.git/blame - gcc/m2/gm2-libs/FormatStrings.def
Update copyright years.
[thirdparty/gcc.git] / gcc / m2 / gm2-libs / FormatStrings.def
CommitLineData
1eee94d3
GM
1(* FormatStrings.def provides a pseudo printf capability.
2
83ffe9cd 3Copyright (C) 2005-2023 Free Software Foundation, Inc.
1eee94d3
GM
4Contributed by Gaius Mulley <gaius.mulley@southwales.ac.uk>.
5
6This file is part of GNU Modula-2.
7
8GNU Modula-2 is free software; you can redistribute it and/or modify
9it under the terms of the GNU General Public License as published by
10the Free Software Foundation; either version 3, or (at your option)
11any later version.
12
13GNU Modula-2 is distributed in the hope that it will be useful, but
14WITHOUT ANY WARRANTY; without even the implied warranty of
15MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16General Public License for more details.
17
18Under Section 7 of GPL version 3, you are granted additional
19permissions described in the GCC Runtime Library Exception, version
203.1, as published by the Free Software Foundation.
21
22You should have received a copy of the GNU General Public License and
23a copy of the GCC Runtime Library Exception along with this program;
24see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
25<http://www.gnu.org/licenses/>. *)
26
27DEFINITION MODULE FormatStrings ;
28
29FROM SYSTEM IMPORT BYTE ;
30FROM DynamicStrings IMPORT String ;
31EXPORT QUALIFIED Sprintf0, Sprintf1, Sprintf2, Sprintf3, Sprintf4,
32 HandleEscape ;
33
34
35(*
36 Sprintf0 - returns a String containing, fmt, after it has had its
37 escape sequences translated.
38*)
39
40PROCEDURE Sprintf0 (fmt: String) : String ;
41
42
43(*
44 Sprintf1 - returns a String containing, fmt, together with
45 encapsulated entity, w. It only formats the
46 first %s or %d with n.
47*)
48
49PROCEDURE Sprintf1 (fmt: String; w: ARRAY OF BYTE) : String ;
50
51
52(*
53 Sprintf2 - returns a string, fmt, which has been formatted.
54*)
55
56PROCEDURE Sprintf2 (fmt: String; w1, w2: ARRAY OF BYTE) : String ;
57
58
59(*
60 Sprintf3 - returns a string, fmt, which has been formatted.
61*)
62
63PROCEDURE Sprintf3 (fmt: String; w1, w2, w3: ARRAY OF BYTE) : String ;
64
65
66(*
67 Sprintf4 - returns a string, fmt, which has been formatted.
68*)
69
70PROCEDURE Sprintf4 (fmt: String;
71 w1, w2, w3, w4: ARRAY OF BYTE) : String ;
72
73
74(*
75 HandleEscape - translates \a, \b, \e, \f, \n, \r, \x[hex] \[octal]
76 into their respective ascii codes. It also converts
77 \[any] into a single [any] character.
78*)
79
80PROCEDURE HandleEscape (s: String) : String ;
81
82
83END FormatStrings.