35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
function Is_Newline
(Data : in Atom;
Position : in Offset;
Encoding : in Newline_Encoding)
return Boolean;
-- Check whether Data contains a newline at Position
procedure Newline (Output : in out Printer);
-- Output a newline and indentation
|
<
<
<
|
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
function Is_Newline
(Data : in Atom;
Position : in Offset;
Encoding : in Newline_Encoding)
return Boolean;
-- Check whether Data contains a newline at Position
procedure Quoted_Lengths
(Data : in Atom;
Encoding : in Character_Encoding;
Width : in Screen_Offset;
Newline : in Newline_Encoding;
Single_Line : in Boolean;
Size : out Count;
|