* blockinlining.c, compile.c, compile.h, debug.c, debug.h,

id.c, insnhelper.h, insns.def, thread.c, thread_pthread.ci,
  thread_pthread.h, thread_win32.ci, thread_win32.h, vm.h,
  vm_dump.c, vm_evalbody.ci, vm_opts.h: fix comments and
  copyright year.



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13920 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
ko1 2007-11-13 22:13:04 +00:00
Родитель 3688c7a1ee
Коммит d907cbc81d
18 изменённых файлов: 115 добавлений и 107 удалений

Просмотреть файл

@ -1,3 +1,11 @@
Wed Nov 14 07:09:48 2007 Koichi Sasada <ko1@atdot.net>
* blockinlining.c, compile.c, compile.h, debug.c, debug.h,
id.c, insnhelper.h, insns.def, thread.c, thread_pthread.ci,
thread_pthread.h, thread_win32.ci, thread_win32.h, vm.h,
vm_dump.c, vm_evalbody.ci, vm_opts.h: fix comments and
copyright year.
Wed Nov 14 07:07:51 2007 Koichi Sasada <ko1@atdot.net>
* tool/makedocs.rb, template/insnstbl.html: removed.

Просмотреть файл

@ -5,7 +5,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: 04/01/01 03:42:15 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/
@ -252,7 +252,6 @@ iseq_translate_threaded_code(rb_iseq_t *iseq)
/* definition of data structure for compiler */
/*********************************************/
static void *
compile_data_alloc(rb_iseq_t *iseq, size_t size)
{
@ -336,8 +335,7 @@ ADD_ELEM(LINK_ANCHOR *anchor, LINK_ELEMENT *elem)
verify_list("add", anchor);
}
/*******************************************/
#if 0
#if 0 /* unused */
/*
* elem1, elemX => elem1, elem2, elemX
*/
@ -369,8 +367,6 @@ INSERT_ELEM_PREV(LINK_ELEMENT *elem1, LINK_ELEMENT *elem2)
}
#endif
/*******************************************/
/*
* elemX, elem1, elemY => elemX, elem2, elemY
*/
@ -402,13 +398,13 @@ FIRST_ELEMENT(LINK_ANCHOR *anchor)
return anchor->anchor.next;
}
/*
#if 0 /* unused */
static LINK_ELEMENT *
LAST_ELEMENT(LINK_ANCHOR *anchor)
{
return anchor->last;
}
*/
#endif
static LINK_ELEMENT *
POP_ELEMENT(LINK_ANCHOR *anchor)
@ -501,7 +497,7 @@ INSERT_LIST(LINK_ANCHOR *anc1, LINK_ANCHOR *anc2)
verify_list("append", anc1);
}
#if 0
#if 0 /* unused */
/*
* anc1: e1, e2, e3
* anc2: e4, e5

Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: 04/01/01 23:36:57 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: 04/08/25 02:31:54 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: 04/08/25 02:33:49 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

2
id.c
Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: Thu Jul 12 04:37:51 2007
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: 04/01/01 15:50:34 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

170
insns.def
Просмотреть файл

@ -5,7 +5,7 @@
$Date: $
created at: 04/01/01 01:17:55 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
*/
/** ##skip
@ -47,7 +47,7 @@ nop
/**
@c variable
@e get local variable(which is pointed by idx).
@e get local variable value (which is pointed by idx).
@j idx
*/
DEFINE_INSN
@ -61,8 +61,8 @@ getlocal
/**
@c variable
@e get local variable (which is pointed by idx) as val.
@j idx val
@e set local variable value (which is pointed by idx) as val.
@j idx val
*/
DEFINE_INSN
setlocal
@ -75,8 +75,8 @@ setlocal
/**
@c variable
@e get special local variable ($~, $_, ..)
@j
@e get special local variable ($~, $_, ..) value.
@j $~, $_, ...
*/
DEFINE_INSN
getspecial
@ -89,8 +89,8 @@ getspecial
/**
@c variable
@e set special local variables
@j
@e set special local variable ($~, $_, ...) value as obj.
@j $~, $_, ...
*/
DEFINE_INSN
setspecial
@ -147,8 +147,7 @@ setdynamic
@c variable
@e get instance variable id of obj.
if is_local is not 0, search as class local variable.
@j obj id
is_local !0
@j self id
*/
DEFINE_INSN
getinstancevariable
@ -163,8 +162,7 @@ getinstancevariable
@c variable
@e set instance variable id of obj as val.
if is_local is not 0, search as class local variable.
@j obj val
is_local !0
@j self id val
*/
DEFINE_INSN
setinstancevariable
@ -178,7 +176,7 @@ setinstancevariable
/**
@c variable
@e get class variable id of klass as val.
@j klass id
@j id
*/
DEFINE_INSN
getclassvariable
@ -211,9 +209,9 @@ setclassvariable
are searched in current scope. if klass is Qfalse, constant as
top level constant. otherwise, get constant under klass
class or module.
@j
klass Qnil
Qfalse
@j id
klass Qnil
Qfalse
klass
*/
DEFINE_INSN
@ -233,11 +231,10 @@ getconstant
top level constant. otherwise, set constant under klass
class or module.
@j
id val klass Qfalse
id Qnil
klass
@j id val
klass Qfalse id
Qnil
klass
*/
DEFINE_INSN
setconstant
@ -270,7 +267,7 @@ setconstant
/**
@c variable
@e get global variable id.
@j id
@j id
*/
DEFINE_INSN
getglobal
@ -284,7 +281,7 @@ getglobal
/**
@c variable
@e set global variable id as val.
@j id
@j id
*/
DEFINE_INSN
setglobal
@ -302,8 +299,8 @@ setglobal
/**
@c put
@e put nil
@j put nil
@e put nil to stack.
@j nil
*/
DEFINE_INSN
putnil
@ -317,7 +314,7 @@ putnil
/**
@c put
@e put self.
@j self
@j self
*/
DEFINE_INSN
putself
@ -332,7 +329,8 @@ putself
@c put
@e put some object.
i.e. Fixnum, true, false, nil, and so on.
@j i.e. Fixnum, true, false, nil, and so on.
@j val
i.e. Fixnum, true, false, nil, and so on.
*/
DEFINE_INSN
putobject
@ -346,9 +344,8 @@ putobject
/**
@c put
@e put string val. string will be copied.
@j
@j
*/
DEFINE_INSN
putstring
(VALUE str)
@ -361,7 +358,7 @@ putstring
/**
@c put
@e put concatenate strings
@j
@j n
*/
DEFINE_INSN
concatstrings
@ -383,7 +380,7 @@ concatstrings
/**
@c put
@e to_str
@j to_str
@j to_str
*/
DEFINE_INSN
tostring
@ -397,22 +394,23 @@ tostring
/**
@c put
@e to Regexp
@j to Regexp
@j str
opt
*/
DEFINE_INSN
toregexp
(rb_num_t flag)
(rb_num_t opt)
(VALUE str)
(VALUE val)
{
volatile VALUE tmp = str; /* for GC */
val = rb_reg_new(str, flag);
val = rb_reg_new(str, opt);
}
/**
@c put
@e put new array.
@j num
@j num
*/
DEFINE_INSN
newarray
@ -427,7 +425,7 @@ newarray
/**
@c put
@e dup array
@j dup
@j ary dup
*/
DEFINE_INSN
duparray
@ -462,7 +460,7 @@ expandarray
/**
@c put
@e concat two arrays
@j
@j ary1, ary2
*/
DEFINE_INSN
concatarray
@ -491,7 +489,7 @@ concatarray
/**
@c put
@e splat array
@j splat array
@j ary to_splat
*/
DEFINE_INSN
splatarray
@ -509,7 +507,7 @@ splatarray
/**
@c put
@e check value is included in ary
@j case/when 使
@j ary obj case/when
*/
DEFINE_INSN
checkincludearray
@ -549,7 +547,8 @@ checkincludearray
/**
@c put
@e put new Hash.
@j Hash.new
@j n
n 2
*/
DEFINE_INSN
newhash
@ -572,7 +571,7 @@ newhash
/**
@c put
@e put new Range object.(Range.new(low, high, flag))
@j Range.new(low, high, flag)
@j Range.new(low, high, flag)
*/
DEFINE_INSN
newrange
@ -586,7 +585,7 @@ newrange
/**
@c put
@e put !val.
@j !val
@j !val
*/
DEFINE_INSN
putnot
@ -625,7 +624,7 @@ pop
/**
@c stack
@e duplicate stack top.
@j
@j
*/
DEFINE_INSN
dup
@ -639,7 +638,7 @@ dup
/**
@c stack
@e duplicate stack top n elements
@j n
@j n
*/
DEFINE_INSN
dupn
@ -659,7 +658,7 @@ dupn
/**
@c stack
@e swap top 2 vals
@j 2
@j 2
*/
DEFINE_INSN
swap
@ -672,8 +671,8 @@ swap
/**
@c stack
@e
@j
@e for stack caching.
@j 調
*/
DEFINE_INSN
reput
@ -687,7 +686,7 @@ reput
/**
@c stack
@e get nth stack value from stack top
@j n
@j n
*/
DEFINE_INSN
topn
@ -715,7 +714,7 @@ setn
/**
@c stack
@e empt current stack
@j current stack
@j current stack
*/
DEFINE_INSN
emptstack
@ -734,7 +733,7 @@ emptstack
/**
@c setting
@e define (singleton) method id as body
@j m body
@j id body
*/
DEFINE_INSN
definemethod
@ -749,7 +748,7 @@ definemethod
/**
@c setting
@e make alias (if v_p is Qtrue, make valias)
@j alias v_p Qtrue valias (global variable)
@j alias v_p Qtrue valias (global variable)
*/
DEFINE_INSN
alias
@ -771,7 +770,7 @@ alias
/**
@c setting
@e undef
@j undef
@j undef
*/
DEFINE_INSN
undef
@ -787,7 +786,7 @@ undef
/**
@c setting
@e defined?
@j defined?
@j defined?
*/
DEFINE_INSN
defined
@ -896,7 +895,7 @@ defined
/**
@c setting
@e END{}
@j END{}
@j END{}
*/
DEFINE_INSN
postexe
@ -918,7 +917,7 @@ postexe
/**
@c setting
@e trace
@j trace
@j trace
*/
DEFINE_INSN
trace
@ -939,9 +938,9 @@ trace
@e
enter class definition scope. if super is Qfalse, and clsas
"klass" is defined, it's redefine. otherwise, define "klass" class.
@j
super Qfalse klassクラスが
klass
@j
super Qfalse klassクラスが定義されていれば再定義である
klass
*/
DEFINE_INSN
defineclass
@ -1041,11 +1040,13 @@ defineclass
/**
@c method/iterator
@e obj.send(id, args..) # args.size => num
@j obj.send(id, args..) # args.size => num
flag & VM_CALL_ARGS_SPLAT_BIT != 0 -> splat last arg
flag & VM_CALL_ARGS_BLOCKARG_BIT != 0 -> Proc as Block
flag & VM_CALL_FCALL_BIT != 0 -> FCALL ( func() )
flag & VM_CALL_VCALL_BIT != 0 -> VCALL ( func )
@j
obj.send(id, args..) # args.size => num
flag & VM_CALL_ARGS_SPLAT_BIT != 0 -> splat last arg
flag & VM_CALL_ARGS_BLOCKARG_BIT != 0 -> Proc as Block
flag & VM_CALL_FCALL_BIT != 0 -> FCALL ( func() )
flag & VM_CALL_VCALL_BIT != 0 -> VCALL ( func )
...
*/
DEFINE_INSN
send
@ -1056,7 +1057,8 @@ send
NODE *mn;
VALUE recv, klass;
rb_block_t *blockptr = 0;
rb_num_t num = caller_setup_args(th, GET_CFP(), op_flag, op_argc, (rb_iseq_t *)blockiseq, &blockptr);
rb_num_t num = caller_setup_args(th, GET_CFP(), op_flag, op_argc,
(rb_iseq_t *)blockiseq, &blockptr);
rb_num_t flag = op_flag;
ID id = op_id;
@ -1076,7 +1078,9 @@ send
/**
@c method/iterator
@e super(args) # args.size => num
@j super(args) # args.size => num
@j super
super(args) # args.size => num
flag send
*/
DEFINE_INSN
invokesuper
@ -1101,7 +1105,8 @@ invokesuper
/**
@c method/iterator
@e yield(args) # args.size => num, flag shows expand argument or not
@j yield(args) # args.size => num
@j yield
yield(args) # args.size => num
*/
DEFINE_INSN
invokeblock
@ -1142,7 +1147,7 @@ leave
/**
@c method/iterator
@e return from this vm loop
@j VM loop
@j VM loop
*/
DEFINE_INSN
finish
@ -1165,7 +1170,7 @@ finish
/**
@c exception
@e longjump
@j longjump
@j
*/
DEFINE_INSN
throw
@ -1240,7 +1245,7 @@ branchunless
/**
@c optimize
@e inline cache
@j inline cache
@j dst
*/
DEFINE_INSN
getinlinecache
@ -1261,7 +1266,7 @@ getinlinecache
/**
@c optimize
@e inline cache (once)
@j inline cache (once)
@j once
*/
DEFINE_INSN
onceinlinecache
@ -1282,7 +1287,7 @@ onceinlinecache
/**
@c optimize
@e set inline cache
@j set inline cahce
@j
*/
DEFINE_INSN
setinlinecache
@ -1299,7 +1304,7 @@ setinlinecache
/**
@c optimize
@e case dispatcher
@j case dispatcher
@j case
*/
DEFINE_INSN
opt_case_dispatch
@ -1308,7 +1313,7 @@ opt_case_dispatch
() // inc += -1;
{
if (0) {
/* if some === method is overrided */
/* TODO: if some === method is overrided */
}
else {
VALUE val;
@ -1324,7 +1329,7 @@ opt_case_dispatch
/**
@c optimize
@e check environment
@j check environment
@j
*/
DEFINE_INSN
opt_checkenv
@ -1343,7 +1348,6 @@ opt_checkenv
/** simple functions */
/**
@c optimize
@e optimized X+Y.
@ -1830,7 +1834,7 @@ opt_ge
/**
@c optimize
@e <<
@j <<
@j X<<Y
*/
DEFINE_INSN
opt_ltlt
@ -1864,7 +1868,7 @@ opt_ltlt
/**
@c optimize
@e []
@j []
@j recv[obj]
*/
DEFINE_INSN
opt_aref
@ -1894,7 +1898,7 @@ opt_aref
/**
@c optimize
@e recv[obj] = set
@j recv[obj] = set
@j recv[obj] = set
*/
DEFINE_INSN
opt_aset
@ -1928,7 +1932,7 @@ opt_aset
/**
@c optimize
@e optimized length
@j optimized length
@j recv.length()
*/
DEFINE_INSN
opt_length
@ -1961,7 +1965,7 @@ opt_length
/**
@c optimize
@e optimized succ
@j optimized succ
@j recv.succ()
*/
DEFINE_INSN
opt_succ
@ -2007,7 +2011,7 @@ opt_succ
/**
@c optimize
@e optimized regexp match
@j
@j
*/
DEFINE_INSN
opt_regexpmatch1
@ -2040,7 +2044,7 @@ opt_regexpmatch2
/**
@c optimize
@e call native compiled method
@j kick
@j
*/
DEFINE_INSN
opt_call_c_function
@ -2077,7 +2081,7 @@ bitblt
/**
@c joke
@e The Answer to Life, the Universe, and Everything
@j
@j
*/
DEFINE_INSN
answer

Просмотреть файл

@ -5,7 +5,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -5,7 +5,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -5,7 +5,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

2
vm.h
Просмотреть файл

@ -6,7 +6,7 @@
$Date$
created at: 04/01/01 16:56:59 JST
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -5,7 +5,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/

Просмотреть файл

@ -6,7 +6,7 @@
$Author$
$Date$
Copyright (C) 2004-2006 Koichi Sasada
Copyright (C) 2004-2007 Koichi Sasada
**********************************************************************/