* support/cpp2/cpphash.h, support/cpp2/cpplex.c,
[fw/sdcc] / support / cpp2 / cpphash.h
1 /* Part of CPP library.
2    Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002
3    Free Software Foundation, Inc.
4
5 This program is free software; you can redistribute it and/or modify it
6 under the terms of the GNU General Public License as published by the
7 Free Software Foundation; either version 2, or (at your option) any
8 later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
18
19 /* This header defines all the internal data structures and functions
20    that need to be visible across files.  It's called cpphash.h for
21    historical reasons.  */
22
23 #ifndef GCC_CPPHASH_H
24 #define GCC_CPPHASH_H
25
26 #include "hashtable.h"
27
28 struct directive;               /* Deliberately incomplete.  */
29 struct pending_option;
30 struct op;
31
32 #ifndef HAVE_UCHAR
33 typedef unsigned char uchar;
34 #endif
35 #define U (const uchar *)  /* Intended use: U"string" */
36
37 #define BITS_PER_CPPCHAR_T (CHAR_BIT * sizeof (cppchar_t))
38
39 /* Test if a sign is valid within a preprocessing number.  */
40 #define VALID_SIGN(c, prevc) \
41   (((c) == '+' || (c) == '-') && \
42    ((prevc) == 'e' || (prevc) == 'E' \
43     || (((prevc) == 'p' || (prevc) == 'P') \
44         && CPP_OPTION (pfile, extended_numbers))))
45
46 #define CPP_OPTION(PFILE, OPTION) ((PFILE)->opts.OPTION)
47 #define CPP_BUFFER(PFILE) ((PFILE)->buffer)
48 #define CPP_BUF_COLUMN(BUF, CUR) ((CUR) - (BUF)->line_base + (BUF)->col_adjust)
49 #define CPP_BUF_COL(BUF) CPP_BUF_COLUMN(BUF, (BUF)->cur)
50
51 /* Maximum nesting of cpp_buffers.  We use a static limit, partly for
52    efficiency, and partly to limit runaway recursion.  */
53 #define CPP_STACK_MAX 200
54
55 /* Host alignment handling.  */
56 struct dummy
57 {
58   char c;
59   union
60   {
61     double d;
62     int *p;
63   } u;
64 };
65
66 #define DEFAULT_ALIGNMENT offsetof (struct dummy, u)
67 #define CPP_ALIGN2(size, align) (((size) + ((align) - 1)) & ~((align) - 1))
68 #define CPP_ALIGN(size) CPP_ALIGN2 (size, DEFAULT_ALIGNMENT)
69
70 /* Each macro definition is recorded in a cpp_macro structure.
71    Variadic macros cannot occur with traditional cpp.  */
72 struct cpp_macro
73 {
74   /* Parameters, if any.  */
75   cpp_hashnode **params;
76
77   /* Replacement tokens (ISO) or replacement text (traditional).  See
78      comment at top of cpptrad.c for how traditional function-like
79      macros are encoded.  */
80   union
81   {
82     cpp_token *tokens;
83     const uchar *text;
84   } exp;
85
86   /* Definition line number.  */
87   unsigned int line;
88
89   /* Number of tokens in expansion, or bytes for traditional macros.  */
90   unsigned int count;
91
92   /* Number of parameters.  */
93   unsigned short paramc;
94
95   /* If a function-like macro.  */
96   unsigned int fun_like : 1;
97
98   /* If a variadic macro.  */
99   unsigned int variadic : 1;
100
101   /* If macro defined in system header.  */
102   unsigned int syshdr   : 1;
103
104   /* Nonzero if it has been expanded or had its existence tested.  */
105   unsigned int used     : 1;
106 };
107
108 #define _cpp_mark_macro_used(NODE) do {                                 \
109   if ((NODE)->type == NT_MACRO && !((NODE)->flags & NODE_BUILTIN))      \
110     (NODE)->value.macro->used = 1; } while (0)
111
112 /* A generic memory buffer, and operations on it.  */
113 typedef struct _cpp_buff _cpp_buff;
114 struct _cpp_buff
115 {
116   struct _cpp_buff *next;
117   unsigned char *base, *cur, *limit;
118 };
119
120 extern _cpp_buff *_cpp_get_buff PARAMS ((cpp_reader *, size_t));
121 extern void _cpp_release_buff PARAMS ((cpp_reader *, _cpp_buff *));
122 extern void _cpp_extend_buff PARAMS ((cpp_reader *, _cpp_buff **, size_t));
123 extern _cpp_buff *_cpp_append_extend_buff PARAMS ((cpp_reader *, _cpp_buff *,
124                                                    size_t));
125 extern void _cpp_free_buff PARAMS ((_cpp_buff *));
126 extern unsigned char *_cpp_aligned_alloc PARAMS ((cpp_reader *, size_t));
127 extern unsigned char *_cpp_unaligned_alloc PARAMS ((cpp_reader *, size_t));
128
129 #define BUFF_ROOM(BUFF) (size_t) ((BUFF)->limit - (BUFF)->cur)
130 #define BUFF_FRONT(BUFF) ((BUFF)->cur)
131 #define BUFF_LIMIT(BUFF) ((BUFF)->limit)
132
133 /* List of directories to look for include files in.  */
134 struct search_path
135 {
136   struct search_path *next;
137
138   /* NOTE: NAME may not be null terminated for the case of the current
139      file's directory!  */
140   const char *name;
141   unsigned int len;
142   /* We use these to tell if the directory mentioned here is a duplicate
143      of an earlier directory on the search path.  */
144   ino_t ino;
145   dev_t dev;
146   /* Nonzero if it is a system include directory.  */
147   int sysp;
148   /* Mapping of file names for this directory.  Only used on MS-DOS
149      and related platforms.  */
150   struct file_name_map *name_map;
151 };
152
153 /* #include types.  */
154 enum include_type {IT_INCLUDE, IT_INCLUDE_NEXT, IT_IMPORT, IT_CMDLINE};
155
156 union utoken
157 {
158   const cpp_token *token;
159   const cpp_token **ptoken;
160 };
161
162 /* A "run" of tokens; part of a chain of runs.  */
163 typedef struct tokenrun tokenrun;
164 struct tokenrun
165 {
166   tokenrun *next, *prev;
167   cpp_token *base, *limit;
168 };
169
170 /* Accessor macros for struct cpp_context.  */
171 #define FIRST(c) ((c)->u.iso.first)
172 #define LAST(c) ((c)->u.iso.last)
173 #define CUR(c) ((c)->u.trad.cur)
174 #define RLIMIT(c) ((c)->u.trad.rlimit)
175
176 typedef struct cpp_context cpp_context;
177 struct cpp_context
178 {
179   /* Doubly-linked list.  */
180   cpp_context *next, *prev;
181
182   union
183   {
184     /* For ISO macro expansion.  Contexts other than the base context
185        are contiguous tokens.  e.g. macro expansions, expanded
186        argument tokens.  */
187     struct
188     {
189       union utoken first;
190       union utoken last;
191     } iso;
192
193     /* For traditional macro expansion.  */
194     struct
195     {
196       const uchar *cur;
197       const uchar *rlimit;
198     } trad;
199   } u;
200
201   /* If non-NULL, a buffer used for storage related to this context.
202      When the context is popped, the buffer is released.  */
203   _cpp_buff *buff;
204
205   /* For a macro context, the macro node, otherwise NULL.  */
206   cpp_hashnode *macro;
207
208   /* True if utoken element is token, else ptoken.  */
209   bool direct_p;
210 };
211
212 struct lexer_state
213 {
214   /* Nonzero if first token on line is CPP_HASH.  */
215   unsigned char in_directive;
216
217   /* Nonzero if in a directive that will handle padding tokens itself.
218      #include needs this to avoid problems with computed include and
219      spacing between tokens.  */
220   unsigned char directive_wants_padding;
221
222   /* True if we are skipping a failed conditional group.  */
223   unsigned char skipping;
224
225   /* Nonzero if in a directive that takes angle-bracketed headers.  */
226   unsigned char angled_headers;
227
228   /* Nonzero if in a #if or #elif directive.  */
229   unsigned char in_expression;
230
231   /* Nonzero to save comments.  Turned off if discard_comments, and in
232      all directives apart from #define.  */
233   unsigned char save_comments;
234
235   /* Nonzero if we're mid-comment.  */
236   unsigned char lexing_comment;
237
238   /* Nonzero if lexing __VA_ARGS__ is valid.  */
239   unsigned char va_args_ok;
240
241   /* Nonzero if lexing poisoned identifiers is valid.  */
242   unsigned char poisoned_ok;
243
244   /* Nonzero to prevent macro expansion.  */
245   unsigned char prevent_expansion;
246
247   /* Nonzero when parsing arguments to a function-like macro.  */
248   unsigned char parsing_args;
249
250   /* Nonzero to skip evaluating part of an expression.  */
251   unsigned int skip_eval;
252 };
253
254 /* Special nodes - identifiers with predefined significance.  */
255 struct spec_nodes
256 {
257   cpp_hashnode *n_defined;              /* defined operator */
258   cpp_hashnode *n_true;                 /* C++ keyword true */
259   cpp_hashnode *n_false;                /* C++ keyword false */
260   cpp_hashnode *n__VA_ARGS__;           /* C99 vararg macros */
261   /* SDCC _asm specific */
262   cpp_hashnode *n__asm;                 /* _asm ... _endasm ; */
263 };
264
265 /* Encapsulates state used to convert a stream of tokens into a text
266    file.  */
267 struct printer
268 {
269   FILE *outf;                   /* Stream to write to.  */
270   const struct line_map *map;   /* Logical to physical line mappings.  */
271   const cpp_token *prev;        /* Previous token.  */
272   const cpp_token *source;      /* Source token for spacing.  */
273   unsigned int line;            /* Line currently being written.  */
274   unsigned char printed;        /* Nonzero if something output at line.  */
275 };
276
277 /* Represents the contents of a file cpplib has read in.  */
278 struct cpp_buffer
279 {
280   const unsigned char *cur;      /* current position */
281   const unsigned char *backup_to; /* if peeked character is not wanted */
282   const unsigned char *rlimit; /* end of valid data */
283   const unsigned char *line_base; /* start of current line */
284
285   struct cpp_buffer *prev;
286
287   const unsigned char *buf;      /* Entire character buffer.  */
288
289   /* Pointer into the include table; non-NULL if this is a file
290      buffer.  Used for include_next and to record control macros.  */
291   struct include_file *inc;
292
293   /* Value of if_stack at start of this file.
294      Used to prohibit unmatched #endif (etc) in an include file.  */
295   struct if_stack *if_stack;
296
297   /* Token column position adjustment owing to tabs in whitespace.  */
298   unsigned int col_adjust;
299
300   /* Contains PREV_WHITE and/or AVOID_LPASTE.  */
301   unsigned char saved_flags;
302
303   /* Because of the way the lexer works, -Wtrigraphs can sometimes
304      warn twice for the same trigraph.  This helps prevent that.  */
305   const unsigned char *last_Wtrigraphs;
306
307   /* True if we have already warned about C++ comments in this file.
308      The warning happens only for C89 extended mode with -pedantic on,
309      or for -Wtraditional, and only once per file (otherwise it would
310      be far too noisy).  */
311   unsigned char warned_cplusplus_comments;
312
313   /* True if we don't process trigraphs and escaped newlines.  True
314      for preprocessed input, command line directives, and _Pragma
315      buffers.  */
316   unsigned char from_stage3;
317
318   /* Nonzero means that the directory to start searching for ""
319      include files has been calculated and stored in "dir" below.  */
320   unsigned char search_cached;
321
322   /* At EOF, a buffer is automatically popped.  If RETURN_AT_EOF is
323      true, a CPP_EOF token is then returned.  Otherwise, the next
324      token from the enclosing buffer is returned.  */
325   bool return_at_eof;
326
327   /* The directory of the this buffer's file.  Its NAME member is not
328      allocated, so we don't need to worry about freeing it.  */
329   struct search_path dir;
330
331   /* Used for buffer overlays by cpptrad.c.  */
332   const uchar *saved_cur, *saved_rlimit;
333 };
334
335 /* A cpp_reader encapsulates the "state" of a pre-processor run.
336    Applying cpp_get_token repeatedly yields a stream of pre-processor
337    tokens.  Usually, there is only one cpp_reader object active.  */
338 struct cpp_reader
339 {
340   /* Top of buffer stack.  */
341   cpp_buffer *buffer;
342
343   /* Overlaid buffer (can be different after processing #include).  */
344   cpp_buffer *overlaid_buffer;
345
346   /* Lexer state.  */
347   struct lexer_state state;
348
349   /* Source line tracking.  */
350   struct line_maps line_maps;
351   const struct line_map *map;
352   unsigned int line;
353
354   /* The line of the '#' of the current directive.  */
355   unsigned int directive_line;
356
357   /* Memory buffers.  */
358   _cpp_buff *a_buff;            /* Aligned permanent storage.  */
359   _cpp_buff *u_buff;            /* Unaligned permanent storage.  */
360   _cpp_buff *free_buffs;        /* Free buffer chain.  */
361
362   /* Context stack.  */
363   struct cpp_context base_context;
364   struct cpp_context *context;
365
366   /* If in_directive, the directive if known.  */
367   const struct directive *directive;
368
369   /* The next -include-d file; NULL if they all are done.  If it
370      points to NULL, the last one is in progress, and
371      _cpp_maybe_push_include_file has yet to restore the line map.  */
372   struct pending_option **next_include_file;
373
374   /* Multiple inlcude optimisation.  */
375   const cpp_hashnode *mi_cmacro;
376   const cpp_hashnode *mi_ind_cmacro;
377   bool mi_valid;
378
379   /* Lexing.  */
380   cpp_token *cur_token;
381   tokenrun base_run, *cur_run;
382   unsigned int lookaheads;
383
384   /* Nonzero prevents the lexer from re-using the token runs.  */
385   unsigned int keep_tokens;
386
387   /* Error counter for exit code.  */
388   unsigned int errors;
389
390   /* Buffer to hold macro definition string.  */
391   unsigned char *macro_buffer;
392   unsigned int macro_buffer_len;
393
394   /* Tree of other included files.  See cppfiles.c.  */
395   struct splay_tree_s *all_include_files;
396
397   /* Current maximum length of directory names in the search path
398      for include files.  (Altered as we get more of them.)  */
399   unsigned int max_include_len;
400
401   /* Macros on or after this line are warned about if unused.  */
402   unsigned int first_unused_line;
403
404   /* Date and time text.  Calculated together if either is requested.  */
405   const uchar *date;
406   const uchar *time;
407
408   /* EOF token, and a token forcing paste avoidance.  */
409   cpp_token avoid_paste;
410   cpp_token eof;
411
412   /* Opaque handle to the dependencies of mkdeps.c.  */
413   struct deps *deps;
414
415   /* Obstack holding all macro hash nodes.  This never shrinks.
416      See cpphash.c */
417   struct obstack hash_ob;
418
419   /* Obstack holding buffer and conditional structures.  This is a
420      real stack.  See cpplib.c.  */
421   struct obstack buffer_ob;
422
423   /* Pragma table - dynamic, because a library user can add to the
424      list of recognized pragmas.  */
425   struct pragma_entry *pragmas;
426
427   /* Call backs.  */
428   struct cpp_callbacks cb;
429
430   /* Identifier hash table.  */
431   struct ht *hash_table;
432
433   /* Expression parser stack.  */
434   struct op *op_stack, *op_limit;
435
436   /* User visible options.  */
437   struct cpp_options opts;
438
439   /* Special nodes - identifiers with predefined significance to the
440      preprocessor.  */
441   struct spec_nodes spec_nodes;
442
443   /* Used when doing preprocessed output.  */
444   struct printer print;
445
446   /* Whether to print our version number.  Done this way so
447      we don't get it twice for -v -version.  */
448   unsigned char print_version;
449
450   /* Whether cpplib owns the hashtable.  */
451   unsigned char our_hashtable;
452
453   /* Traditional preprocessing output buffer (a logical line).  */
454   struct
455   {
456     uchar *base;
457     uchar *limit;
458     uchar *cur;
459     unsigned int first_line;
460   } out;
461
462   /* Used to save the original line number during traditional
463      preprocessing.  */
464   unsigned int saved_line;
465 };
466
467 /* Character classes.  Based on the more primitive macros in safe-ctype.h.
468    If the definition of `numchar' looks odd to you, please look up the
469    definition of a pp-number in the C standard [section 6.4.8 of C99].
470
471    In the unlikely event that characters other than \r and \n enter
472    the set is_vspace, the macro handle_newline() in cpplex.c must be
473    updated.  */
474 #define _dollar_ok(x)   ((x) == '$' && CPP_OPTION (pfile, dollars_in_ident))
475
476 #define is_idchar(x)    (ISIDNUM(x) || _dollar_ok(x))
477 #define is_numchar(x)   ISIDNUM(x)
478 #define is_idstart(x)   (ISIDST(x) || _dollar_ok(x))
479 #define is_numstart(x)  ISDIGIT(x)
480 #define is_hspace(x)    ISBLANK(x)
481 #define is_vspace(x)    IS_VSPACE(x)
482 #define is_nvspace(x)   IS_NVSPACE(x)
483 #define is_space(x)     IS_SPACE_OR_NUL(x)
484
485 /* This table is constant if it can be initialized at compile time,
486    which is the case if cpp was compiled with GCC >=2.7, or another
487    compiler that supports C99.  */
488 #if HAVE_DESIGNATED_INITIALIZERS
489 extern const unsigned char _cpp_trigraph_map[UCHAR_MAX + 1];
490 #else
491 extern unsigned char _cpp_trigraph_map[UCHAR_MAX + 1];
492 #endif
493
494 /* Macros.  */
495
496 #define CPP_IN_SYSTEM_HEADER(PFILE) ((PFILE)->map && (PFILE)->map->sysp)
497 #define CPP_PEDANTIC(PF) CPP_OPTION (PF, pedantic)
498 #define CPP_WTRADITIONAL(PF) CPP_OPTION (PF, warn_traditional)
499
500 /* In cpperror.c  */
501 extern int _cpp_begin_message PARAMS ((cpp_reader *, int,
502                                        unsigned int, unsigned int));
503
504 /* In cppmacro.c */
505 extern void _cpp_free_definition        PARAMS ((cpp_hashnode *));
506 extern bool _cpp_create_definition      PARAMS ((cpp_reader *, cpp_hashnode *));
507 extern void _cpp_pop_context            PARAMS ((cpp_reader *));
508 extern void _cpp_push_text_context      PARAMS ((cpp_reader *, cpp_hashnode *,
509                                                  const uchar *, size_t));
510 extern bool _cpp_save_parameter         PARAMS ((cpp_reader *, cpp_macro *,
511                                                  cpp_hashnode *));
512 extern bool _cpp_arguments_ok           PARAMS ((cpp_reader *, cpp_macro *,
513                                                  const cpp_hashnode *,
514                                                  unsigned int));
515 extern const uchar *_cpp_builtin_macro_text PARAMS ((cpp_reader *,
516                                                      cpp_hashnode *));
517 int _cpp_warn_if_unused_macro           PARAMS ((cpp_reader *, cpp_hashnode *,
518                                                  void *));
519 /* In cpphash.c */
520 extern void _cpp_init_hashtable         PARAMS ((cpp_reader *, hash_table *));
521 extern void _cpp_destroy_hashtable      PARAMS ((cpp_reader *));
522
523 /* In cppfiles.c */
524 extern void _cpp_fake_include           PARAMS ((cpp_reader *, const char *));
525 extern void _cpp_never_reread           PARAMS ((struct include_file *));
526 extern char *_cpp_simplify_pathname     PARAMS ((char *));
527 extern bool _cpp_read_file              PARAMS ((cpp_reader *, const char *));
528 extern bool _cpp_execute_include        PARAMS ((cpp_reader *,
529                                                  const cpp_token *,
530                                                  enum include_type));
531 extern int _cpp_compare_file_date       PARAMS ((cpp_reader *,
532                                                  const cpp_token *));
533 extern void _cpp_report_missing_guards  PARAMS ((cpp_reader *));
534 extern void _cpp_init_includes          PARAMS ((cpp_reader *));
535 extern void _cpp_cleanup_includes       PARAMS ((cpp_reader *));
536 extern void _cpp_pop_file_buffer        PARAMS ((cpp_reader *,
537                                                  struct include_file *));
538
539 /* In cppexp.c */
540 extern bool _cpp_parse_expr             PARAMS ((cpp_reader *));
541 extern struct op *_cpp_expand_op_stack  PARAMS ((cpp_reader *));
542
543 /* In cpplex.c */
544 extern cpp_token *_cpp_temp_token       PARAMS ((cpp_reader *));
545 extern const cpp_token *_cpp_lex_token  PARAMS ((cpp_reader *));
546 extern cpp_token *_cpp_lex_direct       PARAMS ((cpp_reader *));
547 extern int _cpp_equiv_tokens            PARAMS ((const cpp_token *,
548                                                  const cpp_token *));
549 extern void _cpp_init_tokenrun          PARAMS ((tokenrun *, unsigned int));
550
551 /* In cppinit.c.  */
552 extern void _cpp_maybe_push_include_file PARAMS ((cpp_reader *));
553
554 /* In cpplib.c */
555 extern int _cpp_test_assertion PARAMS ((cpp_reader *, unsigned int *));
556 extern int _cpp_handle_directive PARAMS ((cpp_reader *, int));
557 extern void _cpp_define_builtin PARAMS ((cpp_reader *, const char *));
558 extern void _cpp_do__Pragma     PARAMS ((cpp_reader *));
559 extern void _cpp_init_directives PARAMS ((cpp_reader *));
560 extern void _cpp_init_internal_pragmas PARAMS ((cpp_reader *));
561 extern void _cpp_do_file_change PARAMS ((cpp_reader *, enum lc_reason,
562                                          const char *,
563                                          unsigned int, unsigned int));
564 extern void _cpp_pop_buffer PARAMS ((cpp_reader *));
565
566 /* In cpptrad.c.  */
567 extern bool _cpp_read_logical_line_trad PARAMS ((cpp_reader *));
568 extern void _cpp_overlay_buffer PARAMS ((cpp_reader *pfile, const uchar *,
569                                          size_t));
570 extern void _cpp_remove_overlay PARAMS ((cpp_reader *));
571 extern bool _cpp_create_trad_definition PARAMS ((cpp_reader *, cpp_macro *));
572 extern bool _cpp_expansions_different_trad PARAMS ((const cpp_macro *,
573                                                     const cpp_macro *));
574 extern uchar *_cpp_copy_replacement_text PARAMS ((const cpp_macro *, uchar *));
575 extern size_t _cpp_replacement_text_len PARAMS ((const cpp_macro *));
576
577 /* Utility routines and macros.  */
578 #define DSC(str) (const uchar *)str, sizeof str - 1
579 #define xnew(T)         (T *) xmalloc (sizeof(T))
580 #define xcnew(T)        (T *) xcalloc (1, sizeof(T))
581 #define xnewvec(T, N)   (T *) xmalloc (sizeof(T) * (N))
582 #define xcnewvec(T, N)  (T *) xcalloc (N, sizeof(T))
583 #define xobnew(O, T)    (T *) obstack_alloc (O, sizeof(T))
584
585 /* These are inline functions instead of macros so we can get type
586    checking.  */
587 static inline int ustrcmp       PARAMS ((const uchar *, const uchar *));
588 static inline int ustrncmp      PARAMS ((const uchar *, const uchar *,
589                                          size_t));
590 static inline size_t ustrlen    PARAMS ((const uchar *));
591 static inline uchar *uxstrdup   PARAMS ((const uchar *));
592 static inline uchar *ustrchr    PARAMS ((const uchar *, int));
593 static inline int ufputs        PARAMS ((const uchar *, FILE *));
594
595 static inline int
596 ustrcmp (s1, s2)
597      const uchar *s1, *s2;
598 {
599   return strcmp ((const char *)s1, (const char *)s2);
600 }
601
602 static inline int
603 ustrncmp (s1, s2, n)
604      const uchar *s1, *s2;
605      size_t n;
606 {
607   return strncmp ((const char *)s1, (const char *)s2, n);
608 }
609
610 static inline size_t
611 ustrlen (s1)
612      const uchar *s1;
613 {
614   return strlen ((const char *)s1);
615 }
616
617 static inline uchar *
618 uxstrdup (s1)
619      const uchar *s1;
620 {
621   return (uchar *) xstrdup ((const char *)s1);
622 }
623
624 static inline uchar *
625 ustrchr (s1, c)
626      const uchar *s1;
627      int c;
628 {
629   return (uchar *) strchr ((const char *)s1, c);
630 }
631
632 static inline int
633 ufputs (s, f)
634      const uchar *s;
635      FILE *f;
636 {
637   return fputs ((const char *)s, f);
638 }
639
640 #endif /* ! GCC_CPPHASH_H */