File: utils.h

package info (click to toggle)
ftnchek 3.3.1-7
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 8,684 kB
  • sloc: ansic: 21,908; fortran: 5,748; yacc: 4,071; sh: 3,035; makefile: 895; lisp: 322; f90: 118; perl: 76
file content (23 lines) | stat: -rw-r--r-- 659 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
#ifndef UTILS_H
#define UTILS_H

#if ! HAVE_STRCASECMP
#  if HAVE_STRICMP
#    define strcasecmp(A,B) stricmp(A,B)
#    define strncasecmp(A,B,C) strnicmp(A,B,C)
#  elif HAVE_STRCMPI
#    define strcasecmp(A,B) strcmpi(A,B)
#    define strncasecmp(A,B,C) strncmpi(A,B,C)
#  else /* neither STRICMP nor STRCMPI: roll our own */
#    define USE_OUR_CASECMP
#    define strcasecmp(A,B) our_strcasecmp(A,B)
#    define strncasecmp(A,B,C) our_strncasecmp(A,B,C)
#  endif
#endif

#ifdef USE_OUR_CASECMP
int our_strcasecmp(register const char *s1, register const char *s2);
int our_strncasecmp(const char *s1, const char *s2, size_t n);
#endif

#endif /* UTILS_H */