mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
eb6118992b
* eval.c (set_method_visibility): should have clear cache forq updated visibility. * numeric.c (flo_to_s): default format precision to be "%.16g". * util.c (ruby_strtod): use own strtod(3) implementation to avoid locale hell. Due to this change "0xff".to_f no longer returns 255.0 * eval.c (avalue_to_yvalue): new function to distinguish yvalue (no-arg == Qundef) from svalue (no-arg == Qnil). * eval.c (rb_yield_0): use avalue_to_yvalue(). * eval.c (assign): warn if val == Qundef where it means rhs is void (e.g. yield without value or call without argument). * parse.y (value_expr): need not to warn for WHILE and UNTIL, since they can have return value (via valued break). git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2457 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
67 lines
1.5 KiB
C
67 lines
1.5 KiB
C
/**********************************************************************
|
|
|
|
util.h -
|
|
|
|
$Author$
|
|
$Date$
|
|
created at: Thu Mar 9 11:55:53 JST 1995
|
|
|
|
Copyright (C) 1993-2002 Yukihiro Matsumoto
|
|
|
|
**********************************************************************/
|
|
|
|
#ifndef UTIL_H
|
|
#define UTIL_H
|
|
|
|
#ifndef _
|
|
#ifdef __cplusplus
|
|
# ifndef HAVE_PROTOTYPES
|
|
# define HAVE_PROTOTYPES 1
|
|
# endif
|
|
# ifndef HAVE_STDARG_PROTOTYPES
|
|
# define HAVE_STDARG_PROTOTYPES 1
|
|
# endif
|
|
#endif
|
|
#ifdef HAVE_PROTOTYPES
|
|
# define _(args) args
|
|
#else
|
|
# define _(args) ()
|
|
#endif
|
|
#ifdef HAVE_STDARG_PROTOTYPES
|
|
# define __(args) args
|
|
#else
|
|
# define __(args) ()
|
|
#endif
|
|
#endif
|
|
|
|
#define scan_oct ruby_scan_oct
|
|
unsigned long scan_oct _((const char*, int, int*));
|
|
#define scan_hex ruby_scan_hex
|
|
unsigned long scan_hex _((const char*, int, int*));
|
|
|
|
#if defined(MSDOS) || defined(__CYGWIN32__) || defined(NT)
|
|
void ruby_add_suffix();
|
|
#define add_suffix ruby_add_suffix
|
|
#endif
|
|
|
|
void ruby_qsort _((void*, const int, const int, int (*)()));
|
|
#define qsort(b,n,s,c) ruby_qsort(b,n,s,c)
|
|
|
|
void ruby_setenv _((const char*, const char*));
|
|
void ruby_unsetenv _((const char*));
|
|
#undef setenv
|
|
#undef unsetenv
|
|
#define setenv(name,val) ruby_setenv((name),(val))
|
|
#define unsetenv(name,val) ruby_unsetenv((name));
|
|
|
|
char *ruby_strdup _((const char*));
|
|
#undef strdup
|
|
#define strdup(s) ruby_strdup((s))
|
|
|
|
char *ruby_getcwd _((void));
|
|
#define my_getcwd() ruby_getcwd()
|
|
|
|
double ruby_strtod _((const char*, char **));
|
|
#define strtod(s,e) ruby_strtod((s),(e))
|
|
|
|
#endif /* UTIL_H */
|