1. _
2. _
3. __
4. __

   1  /**********************************************************************
   2  
   3    util.h -
   4  
   5    $Author: matz $
   6    $Date: 2002/05/14 06:22:26 $
   7    created at: Thu Mar  9 11:55:53 JST 1995
   8  
   9    Copyright (C) 1993-2002 Yukihiro Matsumoto
  10  
  11  **********************************************************************/
  12  
  13  #ifndef UTIL_H
  14  #define UTIL_H
  15  
  16  #ifndef _
  17  #ifdef __cplusplus
  18  # ifndef  HAVE_PROTOTYPES
  19  #  define HAVE_PROTOTYPES 1
  20  # endif
  21  # ifndef  HAVE_STDARG_PROTOTYPES
  22  #  define HAVE_STDARG_PROTOTYPES 1
  23  # endif
  24  #endif
  25  #ifdef HAVE_PROTOTYPES
  26  # define _(args) args
  27  #else
  28  # define _(args) ()
  29  #endif
  30  #ifdef HAVE_STDARG_PROTOTYPES
  31  # define __(args) args
  32  #else
  33  # define __(args) ()
  34  #endif
  35  #endif
  36  
  37  #define scan_oct ruby_scan_oct
  38  unsigned long scan_oct _((const char*, int, int*));
  39  #define scan_hex ruby_scan_hex
  40  unsigned long scan_hex _((const char*, int, int*));
  41  
  42  #if defined(MSDOS) || defined(__CYGWIN32__) || defined(NT)
  43  void ruby_add_suffix();
  44  #define add_suffix ruby_add_suffix
  45  #endif
  46  
  47  void ruby_qsort _((void*, const int, const int, int (*)()));
  48  #define qsort(b,n,s,c) ruby_qsort(b,n,s,c)
  49  
  50  void ruby_setenv _((const char*, const char*));
  51  void ruby_unsetenv _((const char*));
  52  #undef setenv
  53  #undef unsetenv
  54  #define setenv(name,val) ruby_setenv((name),(val))
  55  #define unsetenv(name,val) ruby_unsetenv((name));
  56  
  57  char *ruby_strdup _((const char*));
  58  #undef strdup
  59  #define strdup(s) ruby_strdup((s))
  60  
  61  char *ruby_getcwd _((void));
  62  #define my_getcwd() ruby_getcwd()
  63  
  64  double ruby_strtod _((const char*, char **));
  65  #define strtod(s,e) ruby_strtod((s),(e))
  66  
  67  #endif /* UTIL_H */