1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* cont.c (rb_cont_call, fiber_switch, rb_fiber_resume, rb_fiber_yield):

Browse Source 
suppress warnings.

* cont.c (rb_fiber_start): change on non-volatile variable between
  setjmp and longjmp may not has an effect.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13237 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2007-08-23 07:55:37 +00:00
parent e39eb9dab5
commit 4af553f1e7
2 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ChangeLog
View File

@ -1,3 +1,11 @@
Thu Aug 23 16:55:35 2007 Nobuyoshi Nakada <nobu@ruby-lang.org>
* cont.c (rb_cont_call, fiber_switch, rb_fiber_resume, rb_fiber_yield):
suppress warnings.
* cont.c (rb_fiber_start): change on non-volatile variable between
setjmp and longjmp may not has an effect.
Thu Aug 23 16:04:11 2007 Koichi Sasada <ko1@atdot.net> Thu Aug 23 16:04:11 2007 Koichi Sasada <ko1@atdot.net>
* compile.c, insns.def, parse.y: fix massign order. This change * compile.c, insns.def, parse.y: fix massign order. This change

10
cont.c
View File

@ -465,7 +465,7 @@ rb_cont_call(int argc, VALUE *argv, VALUE contval)
cont->value = make_passing_arg(argc, argv); cont->value = make_passing_arg(argc, argv);
cont_restore_0(cont, (VALUE *)&cont); cont_restore_0(cont, &contval);
return Qnil; /* unreachable */ return Qnil; /* unreachable */
} }
@ -555,9 +555,9 @@ rb_fiber_start(void)
VALUE args; VALUE args;
int state; int state;
GetContPtr(th->fiber, cont);
TH_PUSH_TAG(th); TH_PUSH_TAG(th);
if ((state = EXEC_TAG()) == 0) { if ((state = EXEC_TAG()) == 0) {
GetContPtr(th->fiber, cont);
GetProcPtr(cont->saved_thread.first_proc, proc); GetProcPtr(cont->saved_thread.first_proc, proc);
args = cont->value; args = cont->value;
cont->value = Qnil; cont->value = Qnil;
@ -651,7 +651,7 @@ fiber_switch(VALUE fib, int argc, VALUE *argv, int is_resume)
cont->value = make_passing_arg(argc, argv); cont->value = make_passing_arg(argc, argv);
if ((value = cont_store(cont)) == Qundef) { if ((value = cont_store(cont)) == Qundef) {
cont_restore_0(cont, (VALUE *)&cont); cont_restore_0(cont, &value);
rb_bug("rb_fiber_resume: unreachable"); rb_bug("rb_fiber_resume: unreachable");
} }
@ -669,9 +669,7 @@ rb_fiber_transfer(VALUE fib, int argc, VALUE *argv)
VALUE VALUE
rb_fiber_resume(VALUE fib, int argc, VALUE *argv) rb_fiber_resume(VALUE fib, int argc, VALUE *argv)
{ {
int i;
rb_context_t *cont; rb_context_t *cont;
VALUE curr = rb_fiber_current();
GetContPtr(fib, cont); GetContPtr(fib, cont);
if (cont->prev != Qnil) { if (cont->prev != Qnil) {
@ -684,7 +682,7 @@ rb_fiber_resume(VALUE fib, int argc, VALUE *argv)
VALUE VALUE
rb_fiber_yield(int argc, VALUE *argv) rb_fiber_yield(int argc, VALUE *argv)
{ {
rb_fiber_transfer(return_fiber(), argc, argv); return rb_fiber_transfer(return_fiber(), argc, argv);
} }
VALUE VALUE