1 /* elfos.h -- operating system specific defines to be used when
2 targeting GCC for some generic ELF system
3 Copyright (C) 1991, 1994, 1995, 1999, 2000, 2001
4 Free Software Foundation, Inc.
5 Based on svr4.h contributed by Ron Guilmette (rfg@netcom.com).
7 This file is part of GNU CC.
9 GNU CC is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2, or (at your option)
14 GNU CC is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with GNU CC; see the file COPYING. If not, write to
21 the Free Software Foundation, 59 Temple Place - Suite 330,
22 Boston, MA 02111-1307, USA. */
25 /* Define a symbol indicating that we are using elfos.h.
26 Some CPU specific configuration files use this. */
29 /* The prefix to add to user-visible assembler symbols.
31 For ELF systems the convention is *not* to prepend a leading
32 underscore onto user-level symbol names. */
34 #undef USER_LABEL_PREFIX
35 #define USER_LABEL_PREFIX ""
37 /* Biggest alignment supported by the object file format of this
38 machine. Use this macro to limit the alignment which can be
39 specified using the `__attribute__ ((aligned (N)))' construct. If
40 not defined, the default value is `BIGGEST_ALIGNMENT'. */
41 #ifndef MAX_OFILE_ALIGNMENT
42 #define MAX_OFILE_ALIGNMENT (32768 * 8)
46 #define ENDFILE_SPEC "crtend.o%s"
49 #define STARTFILE_SPEC "%{!shared: \
51 %{pg:gcrt0.o%s}%{!pg:%{p:mcrt0.o%s}%{!p:crt0.o%s}}}}\
54 /* Use periods rather than dollar signs in special g++ assembler names. */
56 #define NO_DOLLAR_IN_LABEL
58 /* Writing `int' for a bitfield forces int alignment for the structure. */
60 #define PCC_BITFIELD_TYPE_MATTERS 1
62 /* Implicit library calls should use memcpy, not bcopy, etc. */
64 #define TARGET_MEM_FUNCTIONS
66 /* Handle #pragma weak and #pragma pack. */
68 #define HANDLE_SYSV_PRAGMA
70 /* System V Release 4 uses DWARF debugging info. */
72 #ifndef DWARF_DEBUGGING_INFO
73 #define DWARF_DEBUGGING_INFO 1
76 /* All ELF targets can support DWARF-2. */
78 #ifndef DWARF2_DEBUGGING_INFO
79 #define DWARF2_DEBUGGING_INFO 1
82 /* Also allow them to support STABS debugging. */
86 /* The GNU tools operate better with stabs. Since we don't have
87 any native tools to be compatible with, default to stabs. */
89 #ifndef PREFERRED_DEBUGGING_TYPE
90 #define PREFERRED_DEBUGGING_TYPE DBX_DEBUG
93 /* All SVR4 targets use the ELF object file format. */
94 #define OBJECT_FORMAT_ELF
97 /* Output #ident as a .ident. */
99 #define ASM_OUTPUT_IDENT(FILE, NAME) \
100 fprintf (FILE, "%s\"%s\"\n", IDENT_ASM_OP, NAME);
102 #define IDENT_ASM_OP "\t.ident\t"
105 #define ASM_BYTE_OP "\t.byte\t"
108 #define SET_ASM_OP "\t.set\t"
110 /* This is how to begin an assembly language file. Most svr4 assemblers want
111 at least a .file directive to come first, and some want to see a .version
112 directive come right after that. Here we just establish a default
113 which generates only the .file directive. If you need a .version
114 directive for any specific target, you should override this definition
115 in the target-specific file which includes this one. */
117 #undef ASM_FILE_START
118 #define ASM_FILE_START(FILE) \
119 output_file_directive ((FILE), main_input_filename)
121 /* This is how to allocate empty space in some section. The .zero
122 pseudo-op is used for this on most svr4 assemblers. */
124 #define SKIP_ASM_OP "\t.zero\t"
126 #undef ASM_OUTPUT_SKIP
127 #define ASM_OUTPUT_SKIP(FILE, SIZE) \
128 fprintf (FILE, "%s%u\n", SKIP_ASM_OP, (SIZE))
130 /* This is how to output an internal numbered label where
131 PREFIX is the class of label and NUM is the number within the class.
133 For most svr4 systems, the convention is that any symbol which begins
134 with a period is not put into the linker symbol table by the assembler. */
136 #undef ASM_OUTPUT_INTERNAL_LABEL
137 #define ASM_OUTPUT_INTERNAL_LABEL(FILE, PREFIX, NUM) \
140 fprintf (FILE, ".%s%d:\n", PREFIX, NUM); \
144 /* This is how to store into the string LABEL
145 the symbol_ref name of an internal numbered label where
146 PREFIX is the class of label and NUM is the number within the class.
147 This is suitable for output with `assemble_name'.
149 For most svr4 systems, the convention is that any symbol which begins
150 with a period is not put into the linker symbol table by the assembler. */
152 #undef ASM_GENERATE_INTERNAL_LABEL
153 #define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM) \
156 sprintf (LABEL, "*.%s%u", PREFIX, (unsigned) (NUM)); \
160 /* Output the label which precedes a jumptable. Note that for all svr4
161 systems where we actually generate jumptables (which is to say every
162 svr4 target except i386, where we use casesi instead) we put the jump-
163 tables into the .rodata section and since other stuff could have been
164 put into the .rodata section prior to any given jumptable, we have to
165 make sure that the location counter for the .rodata section gets pro-
166 perly re-aligned prior to the actual beginning of the jump table. */
169 #define ALIGN_ASM_OP "\t.align\t"
171 #ifndef ASM_OUTPUT_BEFORE_CASE_LABEL
172 #define ASM_OUTPUT_BEFORE_CASE_LABEL(FILE, PREFIX, NUM, TABLE) \
173 ASM_OUTPUT_ALIGN ((FILE), 2);
176 #undef ASM_OUTPUT_CASE_LABEL
177 #define ASM_OUTPUT_CASE_LABEL(FILE, PREFIX, NUM, JUMPTABLE) \
180 ASM_OUTPUT_BEFORE_CASE_LABEL (FILE, PREFIX, NUM, JUMPTABLE) \
181 ASM_OUTPUT_INTERNAL_LABEL (FILE, PREFIX, NUM); \
185 /* The standard SVR4 assembler seems to require that certain builtin
186 library routines (e.g. .udiv) be explicitly declared as .globl
187 in each assembly file where they are referenced. */
189 #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN) \
190 ASM_GLOBALIZE_LABEL (FILE, XSTR (FUN, 0))
192 /* This says how to output assembler code to declare an
193 uninitialized external linkage data object. Under SVR4,
194 the linker seems to want the alignment of data objects
195 to depend on their types. We do exactly that here. */
197 #define COMMON_ASM_OP "\t.comm\t"
199 #undef ASM_OUTPUT_ALIGNED_COMMON
200 #define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN) \
203 fprintf ((FILE), "%s", COMMON_ASM_OP); \
204 assemble_name ((FILE), (NAME)); \
205 fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT); \
209 /* This says how to output assembler code to declare an
210 uninitialized internal linkage data object. Under SVR4,
211 the linker seems to want the alignment of data objects
212 to depend on their types. We do exactly that here. */
214 #define LOCAL_ASM_OP "\t.local\t"
216 #undef ASM_OUTPUT_ALIGNED_LOCAL
217 #define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \
220 fprintf ((FILE), "%s", LOCAL_ASM_OP); \
221 assemble_name ((FILE), (NAME)); \
222 fprintf ((FILE), "\n"); \
223 ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN); \
227 /* This is the pseudo-op used to generate a reference to a specific
228 symbol in some section. It is only used in machine-specific
229 configuration files. This is the same for all known svr4
230 assemblers, except those in targets that don't use 32-bit pointers.
231 Those should override INT_ASM_OP. Yes, the name of the macro is
235 #define INT_ASM_OP "\t.long\t"
238 /* This is the pseudo-op used to generate a contiguous sequence of byte
239 values from a double-quoted string WITHOUT HAVING A TERMINATING NUL
240 AUTOMATICALLY APPENDED. This is the same for most svr4 assemblers. */
242 #undef ASCII_DATA_ASM_OP
243 #define ASCII_DATA_ASM_OP "\t.ascii\t"
245 /* Support const sections and the ctors and dtors sections for g++.
246 Note that there appears to be two different ways to support const
247 sections at the moment. You can either #define the symbol
248 READONLY_DATA_SECTION (giving it some code which switches to the
249 readonly data section) or else you can #define the symbols
250 EXTRA_SECTIONS, EXTRA_SECTION_FUNCTIONS, SELECT_SECTION, and
251 SELECT_RTX_SECTION. We do both here just to be on the safe side. */
253 #define USE_CONST_SECTION 1
255 #define CONST_SECTION_ASM_OP "\t.section\t.rodata"
257 /* On svr4, we *do* have support for the .init and .fini sections, and we
258 can put stuff in there to be executed before and after `main'. We let
259 crtstuff.c and other files know this by defining the following symbols.
260 The definitions say how to change sections to the .init and .fini
261 sections. This is the same for all known svr4 assemblers. */
263 #define INIT_SECTION_ASM_OP "\t.section\t.init"
264 #define FINI_SECTION_ASM_OP "\t.section\t.fini"
266 #ifdef HAVE_GAS_SUBSECTION_ORDERING
268 #define ASM_SECTION_START_OP "\t.subsection\t-1"
270 /* Output assembly directive to move to the beginning of current section. */
271 #define ASM_OUTPUT_SECTION_START(FILE) \
272 fprintf ((FILE), "%s\n", ASM_SECTION_START_OP)
276 /* A default list of other sections which we might be "in" at any given
277 time. For targets that use additional sections (e.g. .tdesc) you
278 should override this definition in the target-specific file which
279 includes this file. */
281 #undef EXTRA_SECTIONS
282 #define EXTRA_SECTIONS in_const
284 /* A default list of extra section function definitions. For targets
285 that use additional sections (e.g. .tdesc) you should override this
286 definition in the target-specific file which includes this file. */
288 #undef EXTRA_SECTION_FUNCTIONS
289 #define EXTRA_SECTION_FUNCTIONS \
290 CONST_SECTION_FUNCTION
292 #define READONLY_DATA_SECTION() const_section ()
294 #define CONST_SECTION_FUNCTION \
298 if (!USE_CONST_SECTION) \
300 else if (in_section != in_const) \
302 fprintf (asm_out_file, "%s\n", CONST_SECTION_ASM_OP); \
303 in_section = in_const; \
307 #define MAKE_DECL_ONE_ONLY(DECL) (DECL_WEAK (DECL) = 1)
309 #define UNIQUE_SECTION(DECL, RELOC) \
316 const char *prefix; \
317 static const char *const prefixes[4][2] = \
319 { ".text.", ".gnu.linkonce.t." }, \
320 { ".rodata.", ".gnu.linkonce.r." }, \
321 { ".data.", ".gnu.linkonce.d." }, \
322 { ".bss.", ".gnu.linkonce.b." } \
325 if (TREE_CODE (DECL) == FUNCTION_DECL) \
327 else if (DECL_INITIAL (DECL) == 0 \
328 || DECL_INITIAL (DECL) == error_mark_node) \
330 else if (DECL_READONLY_SECTION (DECL, RELOC)) \
335 name = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (DECL)); \
336 /* Strip off any encoding in name. */ \
337 STRIP_NAME_ENCODING (name, name); \
338 prefix = prefixes[sec][DECL_ONE_ONLY(DECL)]; \
339 len = strlen (name) + strlen (prefix); \
340 string = alloca (len + 1); \
342 sprintf (string, "%s%s", prefix, name); \
344 DECL_SECTION_NAME (DECL) = build_string (len, string); \
348 /* Switch into a generic section. */
349 #define TARGET_ASM_NAMED_SECTION default_elf_asm_named_section
351 /* A C statement or statements to switch to the appropriate
352 section for output of RTX in mode MODE. RTX is some kind
353 of constant in RTL. The argument MODE is redundant except
354 in the case of a `const_int' rtx.
355 If assembler supports SHF_MERGE sections, put it into
356 a .rodata.cstN section where N is size of the constant,
357 otherwise into const section. */
359 #undef SELECT_RTX_SECTION
360 #define SELECT_RTX_SECTION(MODE, RTX, ALIGN) \
361 mergeable_constant_section ((MODE), (ALIGN), 0)
363 /* A C statement or statements to switch to the appropriate
364 section for output of DECL. DECL is either a `VAR_DECL' node
365 or a constant of some sort. RELOC indicates whether forming
366 the initial value of DECL requires link-time relocations. */
368 #undef SELECT_SECTION
369 #define SELECT_SECTION(DECL, RELOC, ALIGN) \
371 if (TREE_CODE (DECL) == STRING_CST) \
373 if (! flag_writable_strings) \
374 mergeable_string_section ((DECL), (ALIGN), 0); \
378 else if (TREE_CODE (DECL) == VAR_DECL) \
380 if ((flag_pic && RELOC) \
381 || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL) \
382 || !DECL_INITIAL (DECL) \
383 || (DECL_INITIAL (DECL) != error_mark_node \
384 && !TREE_CONSTANT (DECL_INITIAL (DECL)))) \
386 else if (flag_merge_constants < 2) \
387 /* C and C++ don't allow different variables to share \
388 the same location. -fmerge-all-constants allows \
389 even that (at the expense of not conforming). */ \
391 else if (TREE_CODE (DECL_INITIAL (DECL)) == STRING_CST) \
392 mergeable_string_section (DECL_INITIAL (DECL), (ALIGN), \
395 mergeable_constant_section (DECL_MODE (DECL), (ALIGN), \
398 else if (TREE_CODE (DECL) == CONSTRUCTOR) \
400 if ((flag_pic && RELOC) \
401 || !TREE_READONLY (DECL) || TREE_SIDE_EFFECTS (DECL) \
402 || ! TREE_CONSTANT (DECL)) \
411 /* Define the strings used for the special svr4 .type and .size directives.
412 These strings generally do not vary from one system running svr4 to
413 another, but if a given system (e.g. m88k running svr) needs to use
414 different pseudo-op names for these, they may be overridden in the
415 file which includes this one. */
417 #define TYPE_ASM_OP "\t.type\t"
418 #define SIZE_ASM_OP "\t.size\t"
420 /* This is how we tell the assembler that a symbol is weak. */
422 #define ASM_WEAKEN_LABEL(FILE, NAME) \
425 fputs ("\t.weak\t", (FILE)); \
426 assemble_name ((FILE), (NAME)); \
427 fputc ('\n', (FILE)); \
431 /* The following macro defines the format used to output the second
432 operand of the .type assembler directive. Different svr4 assemblers
433 expect various different forms for this operand. The one given here
434 is just a default. You may need to override it in your machine-
435 specific tm.h file (depending upon the particulars of your assembler). */
437 #define TYPE_OPERAND_FMT "@%s"
439 /* Write the extra assembler code needed to declare a function's result.
440 Most svr4 assemblers don't require any special declaration of the
441 result value, but there are exceptions. */
443 #ifndef ASM_DECLARE_RESULT
444 #define ASM_DECLARE_RESULT(FILE, RESULT)
447 /* These macros generate the special .type and .size directives which
448 are used to set the corresponding fields of the linker symbol table
449 entries in an ELF object file under SVR4. These macros also output
450 the starting labels for the relevant functions/objects. */
452 /* Write the extra assembler code needed to declare a function properly.
453 Some svr4 assemblers need to also have something extra said about the
454 function's return value. We allow for that here. */
456 #ifndef ASM_DECLARE_FUNCTION_NAME
457 #define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL) \
460 fprintf (FILE, "%s", TYPE_ASM_OP); \
461 assemble_name (FILE, NAME); \
463 fprintf (FILE, TYPE_OPERAND_FMT, "function"); \
466 ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL)); \
467 ASM_OUTPUT_LABEL(FILE, NAME); \
472 /* Write the extra assembler code needed to declare an object properly. */
474 #define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL) \
477 fprintf (FILE, "%s", TYPE_ASM_OP); \
478 assemble_name (FILE, NAME); \
480 fprintf (FILE, TYPE_OPERAND_FMT, "object"); \
483 size_directive_output = 0; \
485 if (!flag_inhibit_size_directive \
486 && (DECL) && DECL_SIZE (DECL)) \
488 size_directive_output = 1; \
489 fprintf (FILE, "%s", SIZE_ASM_OP); \
490 assemble_name (FILE, NAME); \
492 fprintf (FILE, HOST_WIDE_INT_PRINT_DEC, \
493 int_size_in_bytes (TREE_TYPE (DECL))); \
494 fputc ('\n', FILE); \
497 ASM_OUTPUT_LABEL (FILE, NAME); \
501 /* Output the size directive for a decl in rest_of_decl_compilation
502 in the case where we did not do so before the initializer.
503 Once we find the error_mark_node, we know that the value of
504 size_directive_output was set
505 by ASM_DECLARE_OBJECT_NAME when it was run for the same decl. */
507 #define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END)\
510 const char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0); \
512 if (!flag_inhibit_size_directive \
513 && DECL_SIZE (DECL) \
514 && ! AT_END && TOP_LEVEL \
515 && DECL_INITIAL (DECL) == error_mark_node \
516 && !size_directive_output) \
518 size_directive_output = 1; \
519 fprintf (FILE, "%s", SIZE_ASM_OP); \
520 assemble_name (FILE, name); \
522 fprintf (FILE, HOST_WIDE_INT_PRINT_DEC, \
523 int_size_in_bytes (TREE_TYPE (DECL))); \
524 fputc ('\n', FILE); \
529 /* This is how to declare the size of a function. */
530 #ifndef ASM_DECLARE_FUNCTION_SIZE
531 #define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL) \
534 if (!flag_inhibit_size_directive) \
537 static int labelno; \
541 ASM_GENERATE_INTERNAL_LABEL (label, "Lfe", labelno); \
542 ASM_OUTPUT_INTERNAL_LABEL (FILE, "Lfe", labelno); \
544 fprintf (FILE, "%s", SIZE_ASM_OP); \
545 assemble_name (FILE, (FNAME)); \
546 fprintf (FILE, ","); \
547 assemble_name (FILE, label); \
548 fprintf (FILE, "-"); \
549 assemble_name (FILE, (FNAME)); \
556 /* A table of bytes codes used by the ASM_OUTPUT_ASCII and
557 ASM_OUTPUT_LIMITED_STRING macros. Each byte in the table
558 corresponds to a particular byte value [0..255]. For any
559 given byte value, if the value in the corresponding table
560 position is zero, the given character can be output directly.
561 If the table value is 1, the byte must be output as a \ooo
562 octal escape. If the tables value is anything else, then the
563 byte value should be output as a \ followed by the value
564 in the table. Note that we can use standard UN*X escape
565 sequences for many control characters, but we don't use
566 \a to represent BEL because some svr4 assemblers (e.g. on
567 the i386) don't know about that. Also, we don't use \v
568 since some versions of gas, such as 2.2 did not accept it. */
571 "\1\1\1\1\1\1\1\1btn\1fr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
572 \0\0\"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\
573 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\\\0\0\0\
574 \0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\
575 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
576 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
577 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\
578 \1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1"
580 /* Some svr4 assemblers have a limit on the number of characters which
581 can appear in the operand of a .string directive. If your assembler
582 has such a limitation, you should define STRING_LIMIT to reflect that
583 limit. Note that at least some svr4 assemblers have a limit on the
584 actual number of bytes in the double-quoted string, and that they
585 count each character in an escape sequence as one byte. Thus, an
586 escape sequence like \377 would count as four bytes.
588 If your target assembler doesn't support the .string directive, you
589 should define this to zero.
592 #define STRING_LIMIT ((unsigned) 256)
594 #define STRING_ASM_OP "\t.string\t"
596 /* The routine used to output NUL terminated strings. We use a special
597 version of this for most svr4 targets because doing so makes the
598 generated assembly code more compact (and thus faster to assemble)
599 as well as more readable, especially for targets like the i386
600 (where the only alternative is to output character sequences as
601 comma separated lists of numbers). */
603 #define ASM_OUTPUT_LIMITED_STRING(FILE, STR) \
606 register const unsigned char *_limited_str = \
607 (const unsigned char *) (STR); \
608 register unsigned ch; \
610 fprintf ((FILE), "%s\"", STRING_ASM_OP); \
612 for (; (ch = *_limited_str); _limited_str++) \
614 register int escape; \
616 switch (escape = ESCAPES[ch]) \
622 fprintf ((FILE), "\\%03o", ch); \
625 putc ('\\', (FILE)); \
626 putc (escape, (FILE)); \
631 fprintf ((FILE), "\"\n"); \
635 /* The routine used to output sequences of byte values. We use a special
636 version of this for most svr4 targets because doing so makes the
637 generated assembly code more compact (and thus faster to assemble)
638 as well as more readable. Note that if we find subparts of the
639 character sequence which end with NUL (and which are shorter than
640 STRING_LIMIT) we output those using ASM_OUTPUT_LIMITED_STRING. */
642 #undef ASM_OUTPUT_ASCII
643 #define ASM_OUTPUT_ASCII(FILE, STR, LENGTH) \
646 register const unsigned char *_ascii_bytes = \
647 (const unsigned char *) (STR); \
648 register const unsigned char *limit = _ascii_bytes + (LENGTH); \
649 register unsigned bytes_in_chunk = 0; \
651 for (; _ascii_bytes < limit; _ascii_bytes++) \
653 register const unsigned char *p; \
655 if (bytes_in_chunk >= 60) \
657 fprintf ((FILE), "\"\n"); \
658 bytes_in_chunk = 0; \
661 for (p = _ascii_bytes; p < limit && *p != '\0'; p++) \
664 if (p < limit && (p - _ascii_bytes) <= (long)STRING_LIMIT) \
666 if (bytes_in_chunk > 0) \
668 fprintf ((FILE), "\"\n"); \
669 bytes_in_chunk = 0; \
672 ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes); \
677 register int escape; \
678 register unsigned ch; \
680 if (bytes_in_chunk == 0) \
681 fprintf ((FILE), "%s\"", ASCII_DATA_ASM_OP); \
683 switch (escape = ESCAPES[ch = *_ascii_bytes]) \
690 fprintf ((FILE), "\\%03o", ch); \
691 bytes_in_chunk += 4; \
694 putc ('\\', (FILE)); \
695 putc (escape, (FILE)); \
696 bytes_in_chunk += 2; \
702 if (bytes_in_chunk > 0) \
703 fprintf ((FILE), "\"\n"); \