2000-05-01 05:42:38 -04:00
|
|
|
/**********************************************************************
|
1999-08-13 01:45:20 -04:00
|
|
|
|
|
|
|
rubysig.h -
|
|
|
|
|
|
|
|
$Author$
|
|
|
|
created at: Wed Aug 16 01:15:38 JST 1995
|
|
|
|
|
* encoding.c: provide basic features for M17N.
* parse.y: encoding aware parsing.
* parse.y (pragma_encoding): encoding specification pragma.
* parse.y (rb_intern3): encoding specified symbols.
* string.c (rb_str_length): length based on characters.
for older behavior, bytesize method added.
* string.c (rb_str_index_m): index based on characters. rindex as
well.
* string.c (succ_char): encoding aware succeeding string.
* string.c (rb_str_reverse): reverse based on characters.
* string.c (rb_str_inspect): encoding aware string description.
* string.c (rb_str_upcase_bang): encoding aware case conversion.
downcase, capitalize, swapcase as well.
* string.c (rb_str_tr_bang): tr based on characters. delete,
squeeze, tr_s, count as well.
* string.c (rb_str_split_m): split based on characters.
* string.c (rb_str_each_line): encoding aware each_line.
* string.c (rb_str_each_char): added. iteration based on
characters.
* string.c (rb_str_strip_bang): encoding aware whitespace
stripping. lstrip, rstrip as well.
* string.c (rb_str_justify): encoding aware justifying (ljust,
rjust, center).
* string.c (str_encoding): get encoding attribute from a string.
* re.c (rb_reg_initialize): encoding aware regular expression
* sprintf.c (rb_str_format): formatting (i.e. length count) based
on characters.
* io.c (rb_io_getc): getc to return one-character string.
for older behavior, getbyte method added.
* ext/stringio/stringio.c (strio_getc): ditto.
* io.c (rb_io_ungetc): allow pushing arbitrary string at the
current reading point.
* ext/stringio/stringio.c (strio_ungetc): ditto.
* ext/strscan/strscan.c: encoding support.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13261 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2007-08-24 23:29:39 -04:00
|
|
|
Copyright (C) 1993-2007 Yukihiro Matsumoto
|
2000-05-01 05:42:38 -04:00
|
|
|
|
|
|
|
**********************************************************************/
|
|
|
|
|
2004-01-08 21:52:19 -05:00
|
|
|
#ifndef RUBYSIG_H
|
2007-06-09 23:06:15 -04:00
|
|
|
#define RUBYSIG_H 1
|
|
|
|
|
|
|
|
#if defined(__cplusplus)
|
|
|
|
extern "C" {
|
|
|
|
#if 0
|
|
|
|
} /* satisfy cc-mode */
|
|
|
|
#endif
|
|
|
|
#endif
|
|
|
|
|
2004-01-08 21:52:19 -05:00
|
|
|
#include <errno.h>
|
1999-08-13 01:45:20 -04:00
|
|
|
|
* configure.in, defines.h, dir.c, dir.h, dln.c, error.c,
eval.c, file.c, hash.c, io.c, main.c, missing.c,
process.c, ruby.c, rubysig.h, signal.c, st.c, util.c, util.h,
bcc/Makefile.sub, win32/Makefile.sub, win32/win32.h,
ext/Win32API/Win32API.c, ext/socket/getaddrinfo.c,
ext/socket/getnameinfo.c, ext/socket/socket.c,
ext/tcltklib/stubs.c
: replace "NT" with "_WIN32", add DOSISH_DRIVE_LETTER
* wince/exe.mak : delete \r at the end of lines.
* wince/mswince-ruby17.def : delete rb_obj_become
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3148 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2002-12-14 22:18:08 -05:00
|
|
|
#ifdef _WIN32
|
2000-11-14 02:10:31 -05:00
|
|
|
typedef LONG rb_atomic_t;
|
|
|
|
|
|
|
|
# define ATOMIC_TEST(var) InterlockedExchange(&(var), 0)
|
|
|
|
# define ATOMIC_SET(var, val) InterlockedExchange(&(var), (val))
|
|
|
|
# define ATOMIC_INC(var) InterlockedIncrement(&(var))
|
|
|
|
# define ATOMIC_DEC(var) InterlockedDecrement(&(var))
|
|
|
|
|
|
|
|
/* Windows doesn't allow interrupt while system calls */
|
2001-02-17 10:17:10 -05:00
|
|
|
# define TRAP_BEG do {\
|
2002-04-24 00:54:16 -04:00
|
|
|
rb_atomic_t trap_immediate = ATOMIC_SET(rb_trap_immediate, 1)
|
2006-12-31 10:02:22 -05:00
|
|
|
|
2002-04-24 00:54:16 -04:00
|
|
|
# define TRAP_END\
|
2004-01-02 12:46:02 -05:00
|
|
|
ATOMIC_SET(rb_trap_immediate, trap_immediate);\
|
2001-02-17 10:17:10 -05:00
|
|
|
} while (0)
|
2006-12-31 10:02:22 -05:00
|
|
|
|
2000-11-14 02:10:31 -05:00
|
|
|
# define RUBY_CRITICAL(statements) do {\
|
2007-04-11 03:37:02 -04:00
|
|
|
rb_atomic_t trap_immediate = ATOMIC_SET(rb_trap_immediate, 0);\
|
2000-11-14 02:10:31 -05:00
|
|
|
statements;\
|
2007-04-11 03:37:02 -04:00
|
|
|
ATOMIC_SET(rb_trap_immediate, trap_immediate);\
|
2000-11-14 02:10:31 -05:00
|
|
|
} while (0)
|
2000-09-27 05:11:13 -04:00
|
|
|
#else
|
2000-11-14 02:10:31 -05:00
|
|
|
typedef int rb_atomic_t;
|
|
|
|
|
|
|
|
# define ATOMIC_TEST(var) ((var) ? ((var) = 0, 1) : 0)
|
|
|
|
# define ATOMIC_SET(var, val) ((var) = (val))
|
|
|
|
# define ATOMIC_INC(var) (++(var))
|
|
|
|
# define ATOMIC_DEC(var) (--(var))
|
|
|
|
|
2000-11-16 02:24:21 -05:00
|
|
|
# define TRAP_BEG do {\
|
|
|
|
int trap_immediate = rb_trap_immediate;\
|
2002-04-24 00:54:16 -04:00
|
|
|
rb_trap_immediate = 1
|
2006-12-31 10:02:22 -05:00
|
|
|
|
|
|
|
# define TRAP_END \
|
|
|
|
rb_trap_immediate = trap_immediate;\
|
2000-11-16 02:24:21 -05:00
|
|
|
} while (0)
|
|
|
|
|
2000-11-14 02:10:31 -05:00
|
|
|
# define RUBY_CRITICAL(statements) do {\
|
|
|
|
int trap_immediate = rb_trap_immediate;\
|
|
|
|
rb_trap_immediate = 0;\
|
|
|
|
statements;\
|
|
|
|
rb_trap_immediate = trap_immediate;\
|
|
|
|
} while (0)
|
2000-09-27 05:11:13 -04:00
|
|
|
#endif
|
2003-03-04 09:12:19 -05:00
|
|
|
RUBY_EXTERN rb_atomic_t rb_trap_immediate;
|
1999-08-13 01:45:20 -04:00
|
|
|
|
2003-03-04 09:12:19 -05:00
|
|
|
RUBY_EXTERN int rb_prohibit_interrupt;
|
2002-04-24 00:54:16 -04:00
|
|
|
#define DEFER_INTS (rb_prohibit_interrupt++)
|
|
|
|
#define ALLOW_INTS do {\
|
|
|
|
rb_prohibit_interrupt--;\
|
|
|
|
} while (0)
|
|
|
|
#define ENABLE_INTS (rb_prohibit_interrupt--)
|
1999-08-13 01:45:20 -04:00
|
|
|
|
* bignum.c: changed `foo _((boo))' to `foo(boo)`. [ruby-dev:27056]
* defines.h, dir.c, dln.h, enumerator.c, env.h, error.c, eval.c, file.c,
gc.c, hash.c, inits.c, intern.h, io.c, lex.c, marshal.c, missing.h,
node.h, numeric.c, pack.c, process.c, re.h, ruby.c, ruby.h, rubyio.h,
rubysig.h, signal.c, sprintf.c, st.h, string.c, struct.c, time.c,
util.c, util.h, variable.c: ditto.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9155 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2005-09-14 02:32:32 -04:00
|
|
|
VALUE rb_with_disable_interrupt(VALUE(*)(ANYARGS),VALUE);
|
1999-08-13 01:45:20 -04:00
|
|
|
|
2003-03-04 09:12:19 -05:00
|
|
|
RUBY_EXTERN rb_atomic_t rb_trap_pending;
|
* bignum.c: changed `foo _((boo))' to `foo(boo)`. [ruby-dev:27056]
* defines.h, dir.c, dln.h, enumerator.c, env.h, error.c, eval.c, file.c,
gc.c, hash.c, inits.c, intern.h, io.c, lex.c, marshal.c, missing.h,
node.h, numeric.c, pack.c, process.c, re.h, ruby.c, ruby.h, rubyio.h,
rubysig.h, signal.c, sprintf.c, st.h, string.c, struct.c, time.c,
util.c, util.h, variable.c: ditto.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9155 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2005-09-14 02:32:32 -04:00
|
|
|
void rb_trap_restore_mask(void);
|
1999-08-13 01:45:20 -04:00
|
|
|
|
2003-03-04 09:12:19 -05:00
|
|
|
RUBY_EXTERN int rb_thread_critical;
|
* bignum.c: changed `foo _((boo))' to `foo(boo)`. [ruby-dev:27056]
* defines.h, dir.c, dln.h, enumerator.c, env.h, error.c, eval.c, file.c,
gc.c, hash.c, inits.c, intern.h, io.c, lex.c, marshal.c, missing.h,
node.h, numeric.c, pack.c, process.c, re.h, ruby.c, ruby.h, rubyio.h,
rubysig.h, signal.c, sprintf.c, st.h, string.c, struct.c, time.c,
util.c, util.h, variable.c: ditto.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9155 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2005-09-14 02:32:32 -04:00
|
|
|
void rb_thread_schedule(void);
|
1999-08-13 01:45:20 -04:00
|
|
|
|
2007-06-09 23:06:15 -04:00
|
|
|
#if defined(__cplusplus)
|
|
|
|
#if 0
|
|
|
|
{ /* satisfy cc-mode */
|
|
|
|
#endif
|
|
|
|
} /* extern "C" { */
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#endif /* RUBYSIG_H */
|